Newsgroup: it.comp.lang.visual-basic
Titolo: problema con RasDial

per assicurarmi che il mio computer sia sempre connesso a internet, ho
fatto questo programmino
Private Type RASDIALPARAMS
    dwSize As Long
    szEntryName As String * RAS_MaxEntryName
    szPhoneNumber As String * RAS_MaxPhoneNumber
    szCallbackNumber As String * RAS_MaxCallbackNumber
    szUserName As String * UNLEN
    szPassword As String * PWLEN
    szDomain As String * DNLEN
End Type
Private Declare Function rasDial Lib "RasApi32.DLL" Alias "RasDialA"
(lpRasDialExtensions As Any, ByVal lpszPhonebook As String,
lprasdialparams As Any, ByVal dwNotifierType As Long, lpvNotifier As
Long, lphRasConn As Long) As Long
Private Declare Function RasHangUp Lib "RasApi32.DLL" Alias
"RasHangUpA" (ByVal hRasConn As Long) As Long
Function dial(nomeCon$, user$, pass$) As Long
    Dim RasDialP As RASDIALPARAMS
    Dim hRasConn As Long
 
    With RasDialP
        .dwSize = 1052
        .szPhoneNumber = vbNullChar
        .szCallbackNumber = vbNullChar
        .szDomain = vbNullChar
        .szEntryName = nomeCon & vbNullChar
        .szUserName = user & vbNullChar
        .szPassword = pass & vbNullChar
    End With
    Do
        While InternetGetConnectedState(0&, 0&)
            DoEvents
        Wend
 
        dial = rasDial(ByVal 0&, vbNullString, RasDialP, &HFFFF, hWnd,
hRasConn)
 
        If dial <> 0 Then
            MsgBox "errore " & dial
            RasHangUp ByVal dial
        End If
    Loop
End Function
però come al solito c'è un problema.
Appena lo lancio la connessioene viene stabilita regolarmente, ma se
poi mi disconnetto di proposito, e ovviamente il programma tenta la
riconnessione, la variabile dial mi restituisce il codice di errore
756.
Cosa significa?

 Cosa significa?
756? Ne sei sicuro?
In ogni caso, prova a dar un'occhiata sul mio vecchio sito 
(
www.msvbsite.net
): c'è un esempio che fa al caso tuo.
Ciao,
Moreno
Inviato da 
www.mynewsgate.net

(
www.msvbsite.net
): c'č un esempio che fa al caso tuo.
Microsoft OLE DB Provider for ODBC Drivers error '80004005' 
[Microsoft][ODBC Microsoft Access Driver] Cannot open database
'(unknown)'. It may not be a database that your application
recognizes, or the file may be corrupt. 
/msvbsite/Main.asp, line 35 

 /msvbsite/Main.asp, line 35 
Aruba: ritenta, sarai più fortunato... :-)


ho creato un programma che controlla lo stato della connessione.
Cioč se ad esempio la connessione a internet viene interrotta, dopo un
minuto viene ristabilita.
Perň succede che se ad esempio il numero č occupato, dopo 2-3
tentativi l'api mi restituisce il codice d'errore 756.
Perchč?
ho pubblicato il programma qui
http://utenti.lycos.it/rinvir2/provatc.zip
prima di lanciarlo createvi un account di accesso remoto, chiamatelo
prova, e impostatelo cosě
numero: 7001010725
user: prova
pass: prova
N.B.
Il numero di giorno č sempre occupato, č normale!!!

"alex"
se' e' analogico 
www.google.it
 "black+list+modem"
Devi eliminare la cosiddetta black list . Controlla sul tuo manuale se
esiste un comando apposito. Non so che tipo di chip abbia il tuo modem
(dovrebbe essere un Rockwell), ma prova ad inserire una di queste stringhe
in Pannello di controllo, Generale, Proprieta', Connessione, Avanzate...,
Impostazioni addizionali: %tcb (Rockwell/Conexant), s40=2 o s40=7 (USR),
%t21,18,0 (Lucent),*nc2 o *nc9 (Cirrus).
Rockwell: %TCB
USR/3COM: S40=2
USR/3COM: S40=7
Lucent: %t21,18,0
Cirrus: *NC2
Cirrus: *NC9
PS:
756 comunque non e' un errore di modem o "connessi"
http://support.microsoft.com/default.aspx?scid=kb;it;163111
http://modemsite.com/56k/trouble.asp
http://www.vee90.net/trouble_main.html
--
Fosco