marco62118
Messages postés35Date d'inscriptionmercredi 30 janvier 2008StatutMembreDernière intervention25 juin 2015
-
11 avril 2008 à 18:28
Chrysostome
Messages postés121Date d'inscriptionvendredi 17 octobre 2003StatutMembreDernière intervention14 octobre 2016
-
14 avril 2008 à 12:57
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
Chrysostome
Messages postés121Date d'inscriptionvendredi 17 octobre 2003StatutMembreDernière intervention14 octobre 2016 14 avril 2008 à 12:57
Salut,
il manque aussi:
actrpt.dll
rptmot.Dsr
arviewer.ocx
Ça fait beaucoup! Merci de le corrigé afin qu'on puisse admirer ton travail!
BABUDROME
Messages postés151Date d'inscriptionlundi 16 janvier 2006StatutMembreDernière intervention19 avril 2016 14 avril 2008 à 08:11
BABU : je tente l'utilisation mais ...
Impossible de charger le fichier D:\VBFrance\Dico_Synonymes\Dictionnaire\rptmots.Dsr.
jmberriot
Messages postés19Date d'inscriptiondimanche 19 janvier 2003StatutMembreDernière intervention11 avril 2008 11 avril 2008 à 19:20
Modifier >>>>
Private Sub Main()
Dim A$
A$ = App.Path & "\base.mdb"
'connexion à la base des données qui se trouve dans le même dossier que l'application
cn.ConnectionString = "Provider=microsoft.jet.OLEDB.4.0;Data source=" & A$
cn.Open
'Ouverture de l'écran d'acceuil
frmSplash.Show
End Sub
>>>>Utilisateur="a"
>>>>Pass="a"
marco62118
Messages postés35Date d'inscriptionmercredi 30 janvier 2008StatutMembreDernière intervention25 juin 2015 11 avril 2008 à 18:28
Désolé mais un zip qui ne permets pas de faire fonctionner le prog est très peu intéressant!
14 avril 2008 à 12:57
il manque aussi:
actrpt.dll
rptmot.Dsr
arviewer.ocx
Ça fait beaucoup! Merci de le corrigé afin qu'on puisse admirer ton travail!
14 avril 2008 à 08:11
Impossible de charger le fichier D:\VBFrance\Dico_Synonymes\Dictionnaire\rptmots.Dsr.
11 avril 2008 à 19:20
Private Sub Main()
Dim A$
A$ = App.Path & "\base.mdb"
'connexion à la base des données qui se trouve dans le même dossier que l'application
cn.ConnectionString = "Provider=microsoft.jet.OLEDB.4.0;Data source=" & A$
cn.Open
'Ouverture de l'écran d'acceuil
frmSplash.Show
End Sub
>>>>Utilisateur="a"
>>>>Pass="a"
11 avril 2008 à 18:28