DÉPANNAGE POUR 'PILOTE ISAM INTROUVABLE'
cs_nouchka
Messages postés
4
Date d'inscription
vendredi 21 novembre 2003
Statut
Membre
Dernière intervention
16 août 2004
-
26 nov. 2003 à 11:59
cs_Kounta Messages postés 9 Date d'inscription samedi 15 novembre 2003 Statut Membre Dernière intervention 21 mars 2008 - 24 janv. 2007 à 11:36
cs_Kounta Messages postés 9 Date d'inscription samedi 15 novembre 2003 Statut Membre Dernière intervention 21 mars 2008 - 24 janv. 2007 à 11:36
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/7492-depannage-pour-pilote-isam-introuvable
https://codes-sources.commentcamarche.net/source/7492-depannage-pour-pilote-isam-introuvable
24 janv. 2007 à 11:36
5 janv. 2007 à 14:54
installer le sp6 et ça va marcher§§
:)
16 mars 2005 à 12:07
Quelqu'un a une idée pour résoudre mon problème?
2 mars 2005 à 08:45
Private Sub Data1_Validate(Action As Integer, Save As Integer)
Select Case Action
Case vbDataActionMoveFirst
' Ne fait rien.
Case vbDataActionMovePrevious
' Ne fait rien.
Case vbDataActionMoveNext
' Ne fait rien.
Case vbDataActionMoveLast
' Ne fait rien.
Case vbDataActionAddNew
' Ne fait rien.
Case vbDataActionUpdate
' S'est déplacé vers le code de l'événement cmdUpdate_click.
Case vbDataActionDelete
' Ne fait rien.
Case vbDataActionFind
' Définit l'indicateur pour l'utiliser dans l'événement Reposition.
mbJustUsedFind = True
Case vbDataActionBookmark
' Ne fait rien.
Case vbDataActionClose, vbDataActionUnload
If Save Then
Save = False
End If
End Select
End Sub
Sub ConfigureData()
Dim DB As DAO.Database, RS As DAO.Recordset, xx As Integer
Set DB = OpenDatabase(, False, gnReadOnly, sConnect)
Set RS = DB.OpenRecordset("Clients")
Data1.DatabaseName = "C:\Documents and Settings\paul\Bureau\Comptoir.mdb"
Set Data1.Recordset = RS
' Data1.RecordSource = "Clients"
' Data1.RecordSource = "SELECT DISTINCTROW * FROM [Clients]"
' Data1.Recordset.MovePrevious
' Data1.Recordset.MoveFirst
' Data1.Recordset.MoveLast
' Data1.Recordset.MoveNext
End Sub
Private Sub cmdadd_Click()
With Data1.Recordset
.AddNew
!Code client = [txt_Code client].txt
!Société = [txt_Société].txt
!Contact = [txt_Contact].txt
!Fonction = [txt_Fonction].txt
!Adresse = [txt_Adresse].txt
!Ville = [txt_Ville].txt
!Région = [txt_Région].txt
!Code postal = [txt_Code postal].txt
!Pays = [txt_Pays].txt
!Téléphone = [txt_Téléphone].txt
!Fax = [txt_Fax].txt
.Update
End With
End Sub
http://multibases.site.voila.fr
2 mars 2005 à 08:20
c'est a toi de programmer sa configuration.
en pricincipe il n'y a aucune difficulte
paul
22 juil. 2004 à 04:03
http://support.microsoft.com/default.aspx?scid=kb;en-us;299457
Il faut une DLL msvbvm600.dll version supérieur à 6.00.8877 et tout fonctionne normalement
Remarque : Windows 2000 SP4 corrige le PB
26 nov. 2003 à 14:50
26 nov. 2003 à 12:05
Bon courage.
26 nov. 2003 à 11:59
Avec Access simplement un base Access 2000 n'est pas reconnu.
Si vous avez une solution... Merci.