Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Attivare il server di accesso remoto

Devo fare in modo che più PC sui quali sarà installata una mia applicazione
scritta in VB5 si colleghino via modem per effettuare una sincronizzazione
dei database.
Ho fatto in modo che un PC si occupi di tutto il lavoro e ad una certa ora
chiami tutti gli altri per prelevare ed inviare i dati modificati ma fin che
si tratta di chiamare nessun problema, il fatto è che non riesco a trovare
informazioni su come mettere in attesa una mia applicazione in modo che al
primo squillo risponda automaticamente.
Ora ho risolto il problema attivando il server di accesso remoto di win 98
ma cosi l'utente deve prima premere un tasto per mettere in attesa il mio
programma e poi deve attivare il server di accesso remoto facendosi tutto il
suo bel percorso (Risorse del computer / accesso remoto / connessioni /
Server di acceso remoto ecc.ecc).
Sarebbe molto carino invece se riuscissi a fare tutto io, cioè, premi un
pulsantino nel programma e sei già in attesa.
In alternativa potrei abbassarmi a fare in modo di aprire io la finestra del
server di accesso remoto senza obbligare l'utente a fare tutto il giro ma
non sò proprio come fare.
Spero che qualche anima buona mi dia una mano.
Grazie ciao
Maurizio Coffinardi

Puoi inviare un file con un certo nome copiandolo in una certa
directory. Sul client usando una routine con un API puo' monitorare
questa directory e quando viene rilevato questo file fai partire la
trasmissione dati.
Devi usare:
Public Declare Function FindFirstChangeNotification Lib "kernel32" _
    Alias "FindFirstChangeNotificationA" _
   (ByVal lpPathName As String, _
    ByVal bWatchSubtree As Long, _
    ByVal dwNotifyFilter As Long) As Long
Public Declare Function FindCloseChangeNotification Lib "kernel32" _
   (ByVal hChangeHandle As Long) As Long
Public Declare Function FindNextChangeNotification Lib "kernel32" _
   (ByVal hChangeHandle As Long) As Long
Public Declare Function WaitForSingleObject Lib "kernel32" _
   (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long
Se hai bisognoi di dettagli fammelo sapere cosi' ti mando un link o una
routine ...
Oppure usi le API per gestire le mailbox; setti il computer rispondente
come maislotserver e quello chiamante come mailslotclient. Dopo che la
connessione e' avvenuta mandi un messagio al mailslot e il client se ne
accorge e fa partire la trasmissione dati.
In questo caso devi usare:
'mailslot
Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As
Long
Declare Function ReadFile Lib "kernel32" (ByVal hFile As Long, lpBuffer
As Any, ByVal nNumberOfBytesToRead As Long, lpNumberOfBytesRead As Long,
lpOverlapped As Any) As Long
Declare Function CreateMailslot Lib "kernel32" Alias "CreateMailslotA"
(ByVal lpName As String, ByVal nMaxMessageSize As Long, ByVal
lReadTimeout As Long, lpSecurityAttributes As Any) As Long
Declare Function GetMailslotInfo Lib "kernel32" (ByVal hMailslot As
Long, lpMaxMessageSize As Long, lpNextSize As Long, lpMessageCount As
Long, lpReadTimeout As Long) As Long
ciao
			maxx


 wrote in message
3913CC63...@laserinforma.com...


Per far funzionare come server un PC devi:
1.Avere un S.O che funzioni sia server ;-) Mi sa che non e' il tuo caso!
2.Acquistare un programma che faccia da server
3.Usare server di accesso remoto, che ha qualche limite perche' non
permette, che io sappia, di riconoscere l'utente che si e' collegato.
4.Fare tu un programma che gestisca il modem, cioe' lo metta in attesa
di una chiamata, risponda ed una volta avvenuta la connessione fisica
devi farti un protocollo di riconoscimento, come quello di un ISP o di
telnet: username, password.
Per quest'ultimo punto devi avere una gran voglia di lavorare.



Sia in Windows 95 SE, che in Windows 98 (oltre naturalmente al 2000)
esiste un programma che ha le funzione RAS, ti mette cioč in
condizioni di ricevere telefonate per un collegamento remoto al
computer
Per installarlo, se č previsto dalla tua versione, devi andare
Installazione Applicazioni, Installazione di Windows,  Comunicazioni,
Accesso Remoto. Credo abbia un suo help per la spiegazione del
funzionamento. Comunque č uscito un articolo che ne descriveva
l'utilizzo su  PCOpen di Marzo 2000.
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

 wrote in message
39143CD5...@laserinforma.com...


Anch'io ho cercato istruzioni per far partire il server di accesso
remoto, ma non ho trovato nulla.
Non so se risolve il tuo problema, ma una volta avviato Server di
accesso remoto riparte automaticamente ad ogni riavvio del PC.
Ovviamente l'uso di una password in questo caso e' necessaria.
Purtroppo e' necessaria una linea dedicata, altrimenti tutte le
telefonate, anche quelle vocali, vengono intercettate!
Una volta qualcuno mi ha detto di guardare bene nello help che si trova
sul CD di Win 98. Io non ho trovato nulla, ma tu forse sei piu'
fortunato o hai la vista piu' acuta :-)
