A voir également:
- Connexion / Déconnexion sous Access
- Formate pour taxer client connexion ✓ - Forum Matériel informatique
- Instagram connexion - Guide
- Facebook connexion - Guide
- Gmail connexion - Guide
- Access denied - Forum Bbox Bouygues
4 réponses
Personne n'a d'idées ?
C'est très important, même si vous n'est pas sur proposez moi des idées merci beaucoup
claude
C'est très important, même si vous n'est pas sur proposez moi des idées merci beaucoup
claude
J'aimerais bien taider.... sauf que je mis connais pas! Moi et Access... tk, c'était juste pour dire que on ne t'ignore pas mais qu'on est (je suis) ignorant dans ce domaine la! :p
D_d.
"J'ai fais le switch"
D_d.
"J'ai fais le switch"
Pas compris la question mais si tu insistes.
tu as peut-être une fonction de se type.
Public Function Connectiondatabase()
Set Cnx = New ADODB.Connection '
If Connection = True Then 'si la connection est possible
With Cnx
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source =" & cheminbase & " ;User Id=Admin;Password="
On Error Resume Next '.(Précaution)
.Open
'Si la connection n'est pas possible :
If Err.Number <> 0 Then Connection = False
End With
End If
End Function
Public Function Connectiondatabase()
Set Cnx = New ADODB.Connection '
If Connection = True Then 'si la connection est possible
With Cnx
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source =" & chemindetabase & " ;User Id=Admin;Password="
On Error Resume Next '.(Précaution)
.Open
End With
End if
End Function
En jouant avec le Cnx.Open ou.Close ça donne quoi?
Sinon losque tu veux effectuer un nouvel enregistrement tu test si le bouton Deconnect à été cliqué depuis la derniére fois Si oui tu refiltres Simple utilisateur, Mega utilisateur administrateur...
Le problême c'est que je ne comprend même pas la réponse.
tu as peut-être une fonction de se type.
Public Function Connectiondatabase()
Set Cnx = New ADODB.Connection '
If Connection = True Then 'si la connection est possible
With Cnx
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source =" & cheminbase & " ;User Id=Admin;Password="
On Error Resume Next '.(Précaution)
.Open
'Si la connection n'est pas possible :
If Err.Number <> 0 Then Connection = False
End With
End If
End Function
Public Function Connectiondatabase()
Set Cnx = New ADODB.Connection '
If Connection = True Then 'si la connection est possible
With Cnx
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source =" & chemindetabase & " ;User Id=Admin;Password="
On Error Resume Next '.(Précaution)
.Open
End With
End if
End Function
En jouant avec le Cnx.Open ou.Close ça donne quoi?
Sinon losque tu veux effectuer un nouvel enregistrement tu test si le bouton Deconnect à été cliqué depuis la derniére fois Si oui tu refiltres Simple utilisateur, Mega utilisateur administrateur...
Le problême c'est que je ne comprend même pas la réponse.