Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 5 su 5

verifica connessione internet

  1. #1
    peterfish non è in linea Novello
    Post
    4
    Like Inviati  
    0
    Like Ricevuti  
    0
    buongiorno. ho sviluppato un gestionale access che permette a più clients di accedere ad alcune tabelle in hosting su microsoft sharepoint. dato che i clients accedono alle tabelle con alcuni processi che si avviano autonomamente in modo periodico, per evitare che il client rimanga bloccato a lungo per assenza di connessione ad internet vorrei introdurre un controllo sulla connessione al server, un modulo vba che prima di avviare l'aggiornamento verifichi che il server sia raggiungibile, e in base alla risposta (true o false) avvii il processo o segnali l'assenza di connessione e liberi il client per altri processi. qualcuno mi può aiutare? Grazie.

  2. #2
    L'avatar di @Alex
    @Alex non è in linea Very Important Person
    Post
    16,745
    Like Inviati  
    0
    Like Ricevuti  
    20
    Prova una cosa simile, già adeguata al 64bit
    #If Win64 Then
        Public Flg As LongPtr
        Public Declare PtrSafe Function InternetGetConnectedState _
                Lib "wininet.dll" (lpdwFlags As LongPtr, _
                ByVal dwReserved As Long) As Boolean
    #Else
        Public Flg As Long
        Public Declare Function InternetGetConnectedState _
                Lib "wininet.dll" (lpdwFlags As Long, _
                ByVal dwReserved As Long) As Boolean
    #End If
    
    Private Const INTERNET_CONNECTION_MODEM As Long = &H1
    Private Const INTERNET_CONNECTION_LAN As Long = &H2
    Private Const INTERNET_CONNECTION_PROXY As Long = &H4
    Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20
    
    Function IsInternetConnected() As Boolean
        Dim R As Long
    
        R = InternetGetConnectedState(Flg, 0&)
    
        If Flg >= INTERNET_CONNECTION_OFFLINE Then
            Debug.Print "INTERNET_CONNECTION_OFFLINE"
        End If
    
        If CBool(R) Then
            IsInternetConnected = True
        Else
            IsInternetConnected = False
        End If
    End Function
    
    ℹ️ Leggi di più su @Alex ...

  3. #3
    L'avatar di AntonioG
    AntonioG non è in linea Moderatore Globale Ultimo blog: Commodore 64 e Codemotion
    Post
    17,365
    Blogs
    5
    Like Inviati  
    5
    Like Ricevuti  
    31
    Più che un controllo della connessione ad Internet dovresti provare la connessione al server. Anche se questa prova non ti mette al riparo da problemi che si possono verificare successivamente.
    ℹ️ Leggi di più su AntonioG ...

  4. #4
    peterfish non è in linea Novello
    Post
    4
    Like Inviati  
    0
    Like Ricevuti  
    0
    grazie! oggi pom provo

  5. #5
    peterfish non è in linea Novello
    Post
    4
    Like Inviati  
    0
    Like Ricevuti  
    0
    hai ragione, ma dato che le mie competenze si limitano ad utilizzare access per sviluppare procedure, e non conosco vba, non saprei proprio da che parte cominciare per verificare che il server di sharepoint è raggiungibile. uso questa connessione ormai da 4 anni, e non mi è mai capitato di avere connessione ma non poter raggiungere il server. piuttosto, ci possono essere problemi col router, o di connettività col gestore, e a quel punto i processi che periodicamente accedono alle tabelle remote bloccano il gestionale. vorrei evitare quello, più che altro

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Verifica connessione internet [VB.NET 2015]
    Da vbrookie nel forum Visual Basic .Net
    Risposte: 13
    Ultimo Post: 12-06-2016, 09:40
  2. [VB2012] Verifica connessione attiva e invio mail
    Da imbranato nel forum Visual Basic .Net
    Risposte: 2
    Ultimo Post: 10-05-2013, 18:47
  3. Verifica connessione
    Da perseo74 nel forum Visual Basic .Net
    Risposte: 5
    Ultimo Post: 13-04-2011, 09:27
  4. Connessione a internet
    Da boldi96 nel forum Visual Basic .Net
    Risposte: 2
    Ultimo Post: 02-01-2008, 12:48
  5. Verifica connessione FTP
    Da luciano.net nel forum Visual Basic .Net
    Risposte: 0
    Ultimo Post: 06-07-2007, 11:51