Posez votre question Signaler

Format non reconnu

rd1rc2 1Messages postés 27 septembre 2003Date d'inscription - Dernière réponse le 7 jui 2009 à 21:15
Bonjour,
je dispose de acces 2000 et de vb6 sous xp pro
mais le vb6 ne veut pas reconnaitre le format d'acces.
le message : "format non reconnu"
cependant, les deux programmes tournent bien séparément
existe - t -il un moyen de conversion ?
merci
Lire la suite 

Format non reconnu »

13 réponses
Réponse
+0
moins plus
meme probleme : existe t il une reponse a se probleme ?
Ajouter un commentaire
Réponse
+0
moins plus
Salut,

je ne suis pas sûr de comprendre le problème. Tu veux faire quoi avec VB et Access exactement ?
Ajouter un commentaire
Réponse
+0
moins plus
je veu relier access et vb sans lien odbc, voici le code

Dim db As Database
Dim rs As Recordset

Set db = OpenDatabase(App.Path & "\solution2.mdb")
Set rs = db.OpenRecordset("select * from contrat")

qd je lance l'execution, il me marque format base de donnée non reconnu. ma base de donnée es une base access 2000 et j'utilise vb6
Ajouter un commentaire
Réponse
+0
moins plus
Comment ça tu veux relier VB et access sans lien ODBC
Tu utilises quoi alors pour attaquer ta base DAO, ADO ?

Le code que tu montres utilise la syntaxe DAO. As tu fais une référence dans ton projet à DAO (dans le menu Projet puis référence)
Ajouter un commentaire
Réponse
+0
moins plus
quel reference faut-il mettre exactement ?
Ajouter un commentaire
Réponse
+0
moins plus
Tu choisis dans le menu Projet puis référence la référence à "Microsoft DAO 3.51 Object Library" ou à défaut de l'avoir tu choisis "Microsoft DAO 2.5/3.51 compatibility library"

Un conseil tout de même. DAO commence à se faire vieux. Je te conseille d'utiliser ADO. Pour se faire il faut utiliser la référence à "Microsoft ActiveX Data Object 2.x Library" (x étant le numéro de version dont ton pc est équipé). Cependant, DAO n'utilise pas la même syntaxe que ADO. A toi de voir. Perso, ADO est mieux.
Ajouter un commentaire
Réponse
+0
moins plus
je l'ai mise cette librairie mais ça ne marche pas, ça me met que ma base n'es pas reconnu
Ajouter un commentaire
Réponse
+0
moins plus
Sur quelle ligne du programme ça plante exactement ?
La base de données n'est-elle pas en lecture seule ?
Ajouter un commentaire
Réponse
+0
moins plus
ça plante sur cette ligne la :
Set db = OpenDatabase(App.Path & "\solution2.mdb")
la base de donnée n'es pa en lecture seule
Ajouter un commentaire
Réponse
+0
moins plus
jette un oeil sur ce site http://faq.vb.free.fr/index.php?question=43 en espérant que ça puisse t'aider
Ajouter un commentaire
Réponse
+0
moins plus
oki, merci bien
Ajouter un commentaire
Réponse
+0
moins plus
tapez ça dans un le code click d'un bouton

Dim Chaine_De_Connection As String
Dim Cnx As ADODB.Connection
Dim RS As ADODB.Recordset
Dim Requete As String
Chaine_De_Connection="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\solution2.mdb;Persist Security Info=False"
Requete = "SELECT * FROM CONTRAT"

Set Cnx = New ADODB.Connection
On Error Resume Next
With Declarations.Cnx
.ConnectionString = Chaine_De_Connection
.ConnectionTimeout = 5
.Open
End With
If Err.Number = 0 Then
Set RS = Cnx.Execute(Requete)
If Err.Number = 0 Then
Do Until RS.EOF
Msgbox RS.Fields(0).Value
Declarations.RS.MoveNext
Loop
Cnx.Close
Set Cnx = Nothing
Else
MsgBox Err.Description, vbExclamation, "Avertissement"
Cnx.Close
Set Cnx = Nothing
End If
Else
MsgBox Err.Description, vbExclamation, "Avertissement"
Cnx.Close
Set Cnx = Nothing
End If
On Error GoTo 0
Ajouter un commentaire
Réponse
+0
moins plus
bah je sais po comment formater cette appareil il ya un pro dans l'ectriture il necrite po b1 les donner ve ti maider sttp?
Ajouter un commentaire
Ce document intitulé « format non reconnu » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
5 extensions si vous voulez revenir à l'ancien Facebook