Kronakoria
Messages postés7Date d'inscriptionjeudi 30 novembre 2000StatutMembreDernière intervention31 janvier 2008
-
31 janv. 2008 à 10:59
cs_Chevalerie
Messages postés5Date d'inscriptionvendredi 4 juin 2004StatutMembreDernière intervention12 février 2009
-
13 févr. 2009 à 09:26
Bonjour,
J'aimerais savoir comment vérifier la connexion d'un PPC sur le PC comme le fait ActiveSync.
J'ai essayé avec la librairie RAPI, le seul problème c'est que si le PPC n'est pas branché, le programme est mis en attente.
J'ai essayé la fonction CeRapiInitEx, mais il semblerait qu'il ne marche que sur PPC ?
Enfin, j'ai regardé un peu partout, voir si il n'y aurait pas un autre moyen, mais je n'ai trouvé que du code qui marche sur PPC et non pas sur PC.
Merci de votre aide.
Voici le code que j'ai utilisé avec CeRapiInitEx, où il me retourne une erreur
"La référence de l'objet n'est pas définie à une instance d'un objet" :
Public Structure RAPIINIT
Public cbSize As Integer
Public heRapiInit As IntPtr
Public hrRapiInit As Integer
End Structure
Const S_OK As Integer = 0
Public Function PPConnectedSecure() As Boolean
'allocate structure for call to CeRapiInitEx
Dim ri As RAPIINIT = New RAPIINIT
Dim MonMarshal As Marshal
ri.cbSize = MonMarshal.SizeOf(ri)
Try
'Call init function
Dim hr As Integer = CeRapiInitEx(ri)
Catch ex As Exception
MessageBox.Show(ex.ToString)
End Try
'Wrap event handle in corresponding .NET object
Dim mrev As ManualResetEvent = New ManualResetEvent(False)
mrev.Handle = ri.heRapiInit
'Wait fove secondes, then fail.
If mrev.WaitOne(5000, False) And ri.hrRapiInit = S_OK Then
'Connection established
MessageBox.Show("connection establie", "RapiStartup")
Else
'on failure, disconnect from RAPI
CeRapiUninit()
MessageBox.Show("timeout - no device", "Rapistartup")
End If