Profil de PhilocheMan - CodeS SourceS

EXTRAIRE TOUS LES MOTS D UN FICHIER TEXTE ET LES METTRE DANS UN TABLEAU

Salut a tous, J'ai un problème j'aimerais extraire tous les mots d'un fichier texte 1 à 1 et ensuite les ranger dans un tableau de string afin de pouvoir les traiter ensuite. C'est un peu ce que fait la fonction split avec une zone de texte. Si vous avez une idée la dessus prevenez moi c'est assez urgent. merci d'avance. Lire la suite

Salut, Avant d'insérer ton nouvel enregistrement dans ton tableau, tu peux utiliser un algo comme QuickSort pour le positionner à son bon emplacement.

Valider numero telephone Résolu

J'ai petit exercice à faire et j'aurais besoin d'un coup de main svp :) Je dois réaliser un petit programme permettant de valider le format (CCC-CCCC, où C est un chiffre) d'un numéro de téléphone inscrit dans une boîte de texte lorsqu'un utilisateur clique sur un bouton. merci bcp ! Lire la suite

Votes

Salut, Je ne sais pas si tu utilises VB6, mais si c'est le cas, tu peux utiliser : - Split pour découper ton CCC-cccc en CCC et cccc - IsNumeric pour vérifier si CCC et cccc sont bien des chiffres (des nombres plutôt...) - CCC

fourmulaire access2000 et vb6.0 Résolu

salut j'aimerai savoir si c'est possible d'appeler des formulaire access du code vb6.0?? merci a vous tous

Votes

Salut, Malheureusement non, ni formulaire, ni état... Juste les données... Simplement par le fait que les états et formulaires sont destinés à l'IDE (l'interface) Access et à lui seulement. A+

Bouton d'action imprimer sous PowerPoint Résolu

Salut, je fait une présentation de système dans PowerPoint 2003 et je montre un tableau exemple. J'aimerai que les utilisateurs puissent imprimer ce tableau mais vierge qui se situe dans une diapo dont ils nont pas accés. Est-ce qu'une personne compétente pourrait me renseigner? Ca serai simpat de sa part. Merci . jeromepre... Lire la suite

Votes

Salut, Ca ne me parait pas bien compliqué : - tu créees ton tableau "vierge" dans une diapo que tu masques (diapo 99 par exemple) - tu enregistres une nouvelle macro (Outil/macro/nouvelle macro) - tu es en mode enregistrement de ta macro. Fichier/imprimer et tu entres "99" dans le champ "diapositive", en pensant à cocher "imprimer les...

fenetre incourtournable

Salut a tous je programme une application qui gere l'acces a des machine proteger par des mots de passe dans reseau local tout semblr ben marcher mais j'ai un petit soucis .. un .itulisateur qui s 'y connais un peu en info contourne ma protection avec un " ctrl + echap" ya t'il pas un moyen pour en pecher cela

Humm... les modos risquent de commencer à trouver que je cite un peu souvent ce site... http://www.vbnet.mvps.org/code/hooks/lowlevelkeyboardproc.htm Tu trouveras toutes les API qui te permettent d'intercepter et de bloquer les CTRL+ALT+SUPPR, ALT+TAB, CTRL+ESC,...

[VB6] IsDate mais en tenant compte du format c'est possible ?

Bonjour à tous et toutes, mon cher boss a eu une super idée, il veut que je récupère un chaine dans un textbox (jusque là ça va hein lol), que je vérifie si cette chaine est bien une date et si cette date est valide. Pour faire ça, je reçois deux paramètres (mais je peux en rajouter au besoin) qui sont la chaine et un format (AAAAMMJJ... Lire la suite

Salut, Au pif sans tester : Public Function VerifDate(StrIn as String, FormatIn as String) as boolean VerifDate = IsDate(Format(StrIn,FormatIn)) End Function

Liste de nombres aléatoires

Hello j'voudrais savoir comment on fait une liste de nombre aléatoire QUI NE RÉPÈTE JAMAIS 2 FOIS LE MÊME NOMBRE.

Salut, Dim NbAleat(1 to 8) For i% = 1 to 8 NbAleat(i%) = int((50*rnd)+1) For j% = 1 to i% if NbAleat(i%) NbAleat(j%) then i% i% -1 Next j% Next i%

Vba et sql

j'ai la requete suivante dans mon code cmd.commandText = "select nom_M into :nomMat from Matiere" cmd.execute je voudrais savoir comment est-ce qu'on récupère ce qu'il y a dans nomMat et comment on le déclare merci d'avance.

Salut, 1° je pense que le : devant :nomMat est une faute de frappe, sinon c'est pas bien (risque de déclaration interdite) 2° Ta requete est une requete de création de table... c'est bien ce que tu veux ???? En francais, ca se traduit "Prends tous les nom_M dans la table Matière et mets les moi dans la nouvelle table nomMat" 3° Si c'e...

problemme de base de donner ( access )

Salut a tous je suis novice en developement j'aimerais savoir commet faire pour recupere une base de donner en access ( office 95 office 2000 ) j'essais de l'ouvrir avec access ( office xp) il me demande de la convertir mais je ne peut toujour pas l'ouvir help svp j'ai perdu l'exemple pour refaire ma base de donner ( *.mdb ) Lire la suite

Salut, Je confirme que pour Access XP (2003), c'est la même chose, à la différence près qu'il te propose la conversion vers Access 97, Access 2000 ou Access 2002/2003. Ne pas oublier que l'opération s'exécute BASE DE DONNEE FERMEE, c.a.d. avec accès sans aucune base ouverte !

supprimer un label dynamiquement Résolu

Salut mon pb est comment faire pour supprimer des label crées Dynamiquement dans un prog. Pour les créer ca marche....mais je sais pas comment faire pour les supprimer.:( help meeee pleasssee merci

Vote

Salut, Est-ce que : Set LabelMachin = Nothing te conviendrait ?

Urgent: Problème aidez moi svp

Bonjour à tous, Est-ce que vous pouvez m'aider à créer un script en Basic pour tester l'heure par rapport aux equipes de travail? En fait, J'ai 3 crénaux horaires: 6h-14h, 14h-22h, 22h-6h. J'aimerais tester à quel crénaux appartiennent l'équipe de travail et s'il a changé me dire à quel créneaux il appartient. En fait comment éc... Lire la suite

Salut, Sans vouloir te vexer, ta question n'est pas claire... En fait, tu as des vacations théoriques pour tes équipes (c.a.d. l'heure à laquelle il sont censés travailler), et des vacations effectives, c.a.d. l'heure à laquelle ils travaillent réellement, c'est ca ? Pour l'heure effective, tu as déjà le code non ? Alors que cherches-...

impossible d'imprimer une image ou case à cocher dans un Etat access!!! Résolu

impossible d'imprimer une image ou case à cocher dans un Etat access!!! Les images et les cases à cocher sont bien visibles sur l'aperçu avant impression Quelqu'un peut me donner une idée? Merci

Votes

Salut, L'apercu avant impression d'Access étant WYSIWYG (ce que tu vois c'est ce que tu obtiens) (ce qui fait bien rire d'ailleurs ), je pencherais pl^tôt pour un souci de config. imprimante... Tu ne serais pas en mode "brouillon" ou "économie d'encre" par hasard ?

console

bonjour Comment, après avoir ouvert la console par un .bat, la refermer automatiquement? Ou mieux encore, comment l'exécuter de façon invisible? (je ne l'utilise que pour copier un fichier du cd vers le disque dur, et doit la faire disparaitre) merci Lire la suite

Salut, Normalement Shell "c:\test.bat", vbMinimizedNoFocus te lance ton .bat et te rends la main sans que la console soit visible. A toi de faire en sorte que dans le .bat, il n'y ait pas une attente (de saisie par exemple avec un "pause") A+

Installation d'imprimantes

Bonjour à tous, J'ai écrit en VB un programme qui liste les imprimantes disponibles sur un réseau en lisant leurs caractéristiques directement sur le serveur d'impression. Ceci permet de se concnetrer sur l'installation de ce serveur en offrant une interface sympatique de recherche et d'installation aux utilisateurs. Le choix de l'i... Lire la suite

Salut, Toujours mon site fétiche (A part VBF bien sûr ) : http://www.vbnet.mvps.org/ Tu y trouveras des API qui permettent de lister, d'ajouter et te connecter à une imprimante local ou réseau En particulier ici : http://www.vbnet.mvps.org/code/system/addprinter.htm Bon courage

Info bulle à la place de MsgBox

Bonjour, Lorsque q'un utilisateur rentre un mauvais caractére, j'ai mis en place un msgbox critical pour l'avertir. je voudrais mettre une info bulle avec le même message que le msgbox pour le prévenir et que cette info bulle disparaisse toute seule au bout de 2s. Quelqu'un connait il le code source ou les propriétés à mettre en place ... Lire la suite

Salut, Tu as aussi la solution de créer un label normalement invisible, dont tu modifies le caption et qui devient visible pour une durée quelconque (avec un controle timer) quand une erreur de saisie apparait.. A+

[VB6] Suite ! un champ au sein du fichier créé qui s'incrémente!

Merci beaucoupr les amis et spécialement PhilocheMan pour l'astuce, j'aimerai bien completer cà par une autre partie qui dit que sur chaque fichier crée, je dois écrire une ligne (enregistrement) dont les champs: ORDSEQCNS "ORD" chaine de caractère fixe "SEQ" entier, correspond à un numéro sequentiel (s'inrémentnat à chaque creation d'u... Lire la suite

Re... Si ton SEQ est lié au n° de ton fichier (c'est à dire égal à ton n° 001 de tout à l'heure), tu peux essayer : Dim fso, strName, i& Set fso = CreateObject("Scripting.FileSystemObject") Do i& = i& + 1 strName = "c:\monchemin\FIC." & Format$(i&, "###") & ".txt" Loop While (fso.FileExists(strName)) Set a = fso.Crea...

Renommer une table

Bonjour, je voudrais savoir comment je peux renommer une table access à partir du code vb6 merci :)

Salut, En VB6, une CommandText ne peut pas être de type "RENAME" (c'est le message d'erreur qu'on obtient), seuls "SELECT", "UPDATE", "DELETE", "INSERT" ou "PROCEDURE" sont autorisés. Peut-être en passant par les sysobjects... Je continue à fouiller...

Comment faire une requete SQL sur un nom de table composé de 2 mots

Comment faire une requete SQL sur un nom de table composé de 2 mots exemple : Nom de table : Ma Table RequeteSql="Select * from Ma Table" -> Ne fonctionne pas ! Je ne peux pas renommer ce nom de table

Salut, Un peu de confiance en soi, que diantre Avec le nom de la table entre crochets [], ca marche impec ! (je viens d'essayer pour m'en convaincre aussi)

Retourner plusieur variables Résolu

Bonjours, je débute plus ou moins en vb et j'ai besoin d'aide. j'ai créé une fonction qui a pour but de calculer deux valeur "Mdmax" et "Mdmin". Pour le moment les deux valeurs sont ecrite dans un fichier excel. J'aimerai que ma fonction puisse retourner ces deux valeur après les avoir calculées.Pour le moment tous est fait dans la fonct... Lire la suite

Salut, Je crois que JRivet t'a donné la bonne soluce Private Type Resultat Min as Integer Max as Integer End Type Function CotePige() as Resultat CotePige.Min = Range("E36") CotePige.Max = Range("E37") End Function Après, tu récupères où tu veux CotePige.Min et CotePige.Max A+

requete SQL et access Résolu

Bonjour, Voilà, j'ai un petit soucis avec une requete SQL. Je développe une application en vb6 connecté à une base de donnée access mais lorsque je souhaite faire la requête suivante je n'ai aucun résultat ce qui n'est pas normal. par ex. SELECT * FROM table WHERE chp like 'variable' marche très bien mais si je fais SELECT * FROM tabl... Lire la suite

Salut, Petite différence entre les requetes dans access et dans VB .... 'variabl%' devrait marcher A+