Interrogation base registre creation fichier texte
Résolu
psgman37
Messages postés
18
Date d'inscription
jeudi 22 septembre 2005
Statut
Membre
Dernière intervention
13 octobre 2006
-
20 oct. 2005 à 09:52
psgman37 Messages postés 18 Date d'inscription jeudi 22 septembre 2005 Statut Membre Dernière intervention 13 octobre 2006 - 20 oct. 2005 à 14:37
psgman37 Messages postés 18 Date d'inscription jeudi 22 septembre 2005 Statut Membre Dernière intervention 13 octobre 2006 - 20 oct. 2005 à 14:37
A voir également:
- Interrogation base registre creation fichier texte
- Fichier .ini - Conseils pratiques -Visual Basic / VB.NET
- Vba écrire dans un fichier texte - Conseils pratiques -Visual Basic / VB.NET
- Fichier json - Conseils pratiques -Javascript
- Javascript base de données - Conseils pratiques -Javascript
- Mode création excel ✓ - Forum VBA Office (Excel, Word ...)
4 réponses
cs_DARKSIDIOUS
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Membre
Dernière intervention
4 mars 2013
130
20 oct. 2005 à 11:21
20 oct. 2005 à 11:21
c'est sûrement un problème de majuscule :
If InStr(1, UCase(a), UCase("sp1")) > 0 Then
Open App.Path & "\ok.txt" for output as #1
close #1
Else
Open App.Path & "\nok.txt" for output as #1
close #1
End If
Ceci ta créera ton fichier texte dans le dossier de ton prog.
_____________________________________________________________________
DarK Sidious
Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) tout en français : www.ProgOtoP.com/popapi/
If InStr(1, UCase(a), UCase("sp1")) > 0 Then
Open App.Path & "\ok.txt" for output as #1
close #1
Else
Open App.Path & "\nok.txt" for output as #1
close #1
End If
Ceci ta créera ton fichier texte dans le dossier de ton prog.
_____________________________________________________________________
DarK Sidious
Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) tout en français : www.ProgOtoP.com/popapi/
cs_DARKSIDIOUS
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Membre
Dernière intervention
4 mars 2013
130
20 oct. 2005 à 10:10
20 oct. 2005 à 10:10
If InStr(1, a, "sp1") > 0 Then
'contient "sp1"
Else
'ne contient pas "sp1"
End If
_____________________________________________________________________
DarK Sidious
Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) tout en français : www.ProgOtoP.com/popapi/
'contient "sp1"
Else
'ne contient pas "sp1"
End If
_____________________________________________________________________
DarK Sidious
Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) tout en français : www.ProgOtoP.com/popapi/
psgman37
Messages postés
18
Date d'inscription
jeudi 22 septembre 2005
Statut
Membre
Dernière intervention
13 octobre 2006
20 oct. 2005 à 10:57
20 oct. 2005 à 10:57
comment je fais pour lui dire si contient sp1 tu crée le fichier ok.txt sinon nok.txt?
c'est bizarre le bout de code ci dessus ne fonctionne pas il m'affiche "ne contient pas" alors que dans ma clé qui est ";sp1,q589633,q58663" il y a bien SP1 !
c'est bizarre le bout de code ci dessus ne fonctionne pas il m'affiche "ne contient pas" alors que dans ma clé qui est ";sp1,q589633,q58663" il y a bien SP1 !
psgman37
Messages postés
18
Date d'inscription
jeudi 22 septembre 2005
Statut
Membre
Dernière intervention
13 octobre 2006
20 oct. 2005 à 14:37
20 oct. 2005 à 14:37
merci!!!