Home Page
Articoli
Tips & Tricks
News
Forum
Archivio Forum
Blogs
Sondaggi
Rss
Video
Utenti
Chi Siamo
Contattaci
Username:
Password:
Login
Registrati ora!
Recupera Password
Home Page
Stanze Forum
App. Visual Studio 6.0
Piccolo problema IN VB6... help!!!! PLEASE
lunedì 06 marzo 2006 - 19.08
Elenco Threads
Stanze Forum
Aggiungi ai Preferiti
Cerca nel forum
possola11
Profilo
| Newbie
3
messaggi | Data Invio:
lun 6 mar 2006 - 19:08
AIUTOOOO!!!!
HELP PLEASE !!
Sto facendo o almeno :) provando a fare un programma in VB 6. . . . k mi permetta di ricevere dati da 1 cellulare via cavo.. grazie al PROTOCOLLO AT...
Purtroppo m da 1 macello di problemi potete darmi 1 mano ???
VI SCRIVO il codice k ho formulato ma ank se errori di sintassi fonadmentalmente nn ne da... purtroppo nn mi fa le query del codice.. cioe nn m stampa a video in 1 text 1 semplice scritta OK ,..... HELP!!
Private sub FormLoad()
'Ricezione dati
' Per aprire la porta seriale
MSComm1.CommPort = 6
MSComm1.Settings = "115200,N,8,1"
MSComm1.PortOpen = True
MSComm1.Output = "At" & vbCrLf
End sub
Private Sub MSComm1_OnComm()
Dim Rx$
Rx$ = MSComm1.Input ' Leggo il contenuto del buffer di ricezione (e svuoto .Input)
If Len(Rx$) Then ' Se ho ricevuto qualcosa lo scrivo nella TextBox
txtDisplay.Text = txtDisplay.Text & Rx$
End If
MSComm1.PortOpen = False
End Sub
VI PREGO DATEMI 1 MANO M SERVE X LA TESINA DELL ESAME HELP.................
GRAZIE MILLE
ALESSANDRO OSSOLA...
Ciciu
Profilo
| Senior Member
233
messaggi | Data Invio:
lun 6 mar 2006 - 19:29
Ciao Alessandro...
Hai provato a collegarTi al cellulare utilizzando, per esempio, Hyperterminal, impostando gli stessi parametri di collegamento e digitando a manina "AT" ?
Ho avuto modo di "giocare" con un modem GSM, ma la velocità di comunicazione non era tanto alta, anzi... io proverei 9600 al posto di quel 115000....
Cmq, c'e' anche un interessante articoletto, che Ti illustra a quale evento sta rispondendo OnComm (Te lo consiglio...) :
http://support.microsoft.com/default.aspx?scid=kb;en-us;194922
Ma sonoragionevolmente convinto che sia solo un problema di velocità...
Fammi sapere
Ciao - Fabio
PS - Capisco che Tu, magari, sei giovane, ed io posso sembrarTi vecchio e rincoglionito, ma sappi che stai scrivendo su un forum... non stai mandando via SMS !!!!!!!!! ("che" si scrive "che", non "k"... "non" si scrive "non", non "nn"...)
Fabio G
possola11
Profilo
| Newbie
3
messaggi | Data Invio:
sab 11 mar 2006 - 13:23
innanzitutto grazie per la risposta...
hyperterminal non crea nessun problema e la risposta al mio "AT" inviato al telefono e un simpatico "OK". questo testo e copiato pari pari dal hyperterminal..:
-------------------
at
OK
at+cgmi
Nokia
OK
at+cgmm
Nokia N70
OK
--------------------
quindi funge... il mio problema e che purtroppo mi tocca farlo in visual basic oggi finalmente ha dato "segni di vita" permettendomi di chiamare da visual basic un numero grazie al comando ATD(e il numero di telefono)
ma il mio problema e che non ottengo nessuna risposta dal telefono al pc... questo e il codice che ho scritto in VISUAL BASIC:
Private Sub cmd_ok_Click()
MSComm1.PortOpen = True ' Apriamo la porta.
MSComm1.Output = txt_1.Text & Chr(13)
MSComm1.InputLen = 0
MSComm1.InputMode = comInputModeText
txt_2.Text = MSComm1.Input
MSComm1.PortOpen = False ' CHIUDIAMO la porta.
End Sub
Private Sub cmd_pulisci_Click()
txt_1.Text = ""
End Sub
Private Sub Form_Load()
MSComm1.CommPort = 6 ' Selezioniamo la COM1
MSComm1.Settings = "9600,n,8,1" ' Le impostazioni della seriale
End Sub
Private Sub MSComm1_OnComm()
MSComm1.PortOpen = False ' CHIUDIAMO la porta.
End Sub
Forse il problema è che non c'è risposta dal telefono o non riesce a leggerla cosa ho sbagliato/dimenticato di aggiungere??
Magari qualcosa che ha a che fare con il commevent? ? o magari il buffer? il mio problema e solo di far visualizzare la risposta per provare che si puo comunicare con il modem anche di 1 telefono grazie al protocollo AT usando visual basic.. grazie mille... per l 'aiuto!!!!
Ciciu
Profilo
| Senior Member
233
messaggi | Data Invio:
mar 14 mar 2006 - 09:07
>Private Sub MSComm1_OnComm()
>
>MSComm1.PortOpen = False ' CHIUDIAMO la porta.
>End Sub
>
Scusa, ma... Questo passaggio mi sfugge : perché chiudi la porta proprio mentre l'evento OnComm Ti sta dicendo che ci sono dei dati ? Hai provato a leggerli PRIMA di chiuderla ?
Ciao - Fabio
Fabio G
Torna su
Stanze Forum
Elenco Threads
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?
Dopo esserti registrato potrai chiedere
aiuto sul nostro
Forum
oppure aiutare gli altri
Consulta le
Stanze
disponibili.
Registrati ora !