Profil de Almandric - CodeS SourceS

HELP AU PLUS VITE!!!!

Voila, j'ai une ocx, de laquelle dépendent tout plein de dll, mais cette une ocx de vb5, et il me faudrait absolument convertir ca en visual basic 6, comment je peux faire???? un grand merci!!!!

Si tu as les sources, il te suffit d'ouvrir ton projet avec VB6, et éventuellement corriger quelques comportement qui changé entre VB5 et VB6 mais rien de bien méchant. Tu recomplies le tout mais fait attention que dans les propriétés de ton projet (Je ne sais plus quel onglet)tu précise que la compatbilité soit faite avec ton ancien OCX...

message d'erreur que je comprends pas

Salut! J'ai un pb: mon interface VB cree des fichiers. Quand je fais ca sur ma machine tout va bien et qd je passe sur la machine ou je dois mettre en place l'interface (apres avoir creer un executable et l'avoir installe) et que j'arrive a la creation des fichiers j'ai le message d'erreur suivant: Runtime error 429 ActiveX component... Lire la suite

L'erreur 429 arrive souvent lorsque tu refiles un exe a quelqu'un sans setup. En effet VB utilise des composants OCX pour créer tous les objets que tu mets sur une form (Bouton, Textbox....). Ces OCX sont des composants activeX qui nécessite un enregistrement dans ta base de registre. Il ne suffit pas de copier l'OCX ou la DLL sur le PC. ...

Initialisation de vecteur en VB

Bonjour, Peut t'on initialiser un vecteur de string sur une seule ligne ? Du genre Vecteur() = ("Coordonnée1", "Coordonnée2") Ou faut'il initialiser les coordonnées une à une. Je sais qu'il existe un truc du genre Vecteur = Array(...) mais le vecteur est variant ce qui bouffe de la place Lire la suite

> non, en java et en C oui, mais pas en VB Et si en VB aussi c'est possible avec une déclaration du genre : Dim vecteur() As Variant = {"1", "2", "3"} Et voila... @+

Access ou MySql

FranckP J'ai une appli VB6 a faire ( gestionnaire de projet - Clients, fournisseurs , projets ....). C'est une petite societe de 30 personnes. donc 30 connexions possibles maxi sur la base réseau.* Faut -il utiliser ACCESS avec Microsoft jet OU MySQL veritable client server .............. ? Ou un ... Lire la suite

Je ne suis pas d'accord avec toi : > dans une entreprise, ça implique qu'il faut payer une > liscence pour tout les poste où on installe l'application L'utilisation de Microsoft Jet pour attaquer une base Access n'implique pas l'achat d'une license Access. Seul le poste ou Access est installé, pour administrer la bas par exemple, s...

FORM COEUR (REGION ET TRANSPARENCE)

/source/8132-form-coeur-region-et-transparence

Pas mal, mais il est un peu carré ton coeur. Essaye avec AddCurve plutot que AddPolygon, c'est encore plus joli! @+ et bonne prog

APERÇU AVANT IMPRESSION

/source/4101-apercu-avant-impression

Pourquoi t'as mis ça dans la catégorie .net ??????

LISTER TOUS LES REPERTOIRES D'UN DRIVE

/source/3683-lister-tous-les-repertoires-d-un-drive

C'est quoi la fonction 'IsOnDirList' ??? Et je n'ai pas utilisé la fonction 'DIR' dans mon soirce pour des problèmes de performance, c'est trop long..... Sinon c'est quoi ton problème exactement car je n'arrive pas à le reproduire? A+

INVERSER ORDRE DES MOTS DANS UNE PHRASE AMELIORÉ ;)

/source/3499-inverser-ordre-des-mots-dans-une-phrase-ameliore

Moi je vois qu'une seule solution, il te faut un 2ème tableau temporaire...

Oops, j'ai fais pleins de fautes.....

Plutôt que de faire ta boucle 'For a = 0 To Len(Text1.Text) + 200' et de tester à chaque fois si tu as déjà récuperer ce mot voila ce que je te conseil : - Tu as une phrase de 5 mots - 'Split' te retourne un tableau avec un index allant de 0 à 4 (ou de 1 à 5 peu importe) - Tu fais un random compris entre 0 et 4 et tu obtiens to 1er mot...

RECHERCHE DE FICHIERS

/source/1500-recherche-de-fichiers

Le graphisme est sympa mais le code marche pas. Je me suis pas plongé à fond dans tes source mais ca merde dans ta 'DirDiver', j'ai l'impression qu'il y a des 'exit function' placé bizarrement ce qui qu'il n'y a pas de récursivité. A+

RENDRE LES EXE VB AUTONOME (SANS RUNTIME - MSVBVM60.DLL, VB6FR.DLL)

/source/1502-rendre-les-exe-vb-autonome-sans-runtime-msvbvm60-dll-vb6fr-dll

J'ai pas encore regarder les sources mais je suis sur que c'est bon boulot. Mais dis-moi quel est l'interêt si ce n'est d'éviter d'avoir à donner 2 dll quand on veut donner notre prog? Sachant que bien souvent il y a un ou plusieurs OCX utilisés qui demande un setup ou au moins l'enregistrement dans la base de registre. A moins que tu ne ...

RECHERCHER UN FICHIER

/source/3486-rechercher-un-fichier

Ouais t'as raison, les caractères génériques ne marchent pas encore. Mais je voulais changer tout ça a la fin, une fois que la vitesse sera pas trop mal....

RECHERCHE DE FICHIERS

/source/3477-recherche-de-fichiers

Je t'ai déposé une source pour t'aider : http://www.vbfrance.com/article.aspx?Val=4431 A+

INVERSER ORDRE DES MOTS DANS UNE PHRASE... C'EST BIEN MARRANT :]

/source/3470-inverser-ordre-des-mots-dans-une-phrase-c-est-bien-marrant

Eh Willi, facile de dire y'a plus simple mais je vois pas de code!!!

Et bien en voila des remarques : * Le test 'If i

UN TEST DROLE POUR SAVOIR SI VOUS ETES FORT EN PC

/source/3449-un-test-drole-pour-savoir-si-vous-etes-fort-en-pc

Je crois que c'est le source le plus pourri et le plus inutil que j'ai vu jusqu'à maintenant!!!

EXECUTER UN FICHIER SANS DONNER LE CHEMIN DE L'APPLICATION

bonjour j'ai vu plusieurs fois sur ce site, que pour lancer une application externe à votre programme vous utilisez la fonction shell(..), le problème est qu'il faut connaitre l'emplacement de l'appication!! j'aimerais savoir s'il est possible de lancer un document (par exemple en fichier txt) sans avoir à donner le chemin de l'appl... Lire la suite

Salut Effectivement, il y a une API qui permet d'ouvrir un fichier directement avec le programme lié (Ex : *.txt avec le notepad...) Essaye ca: Const SEE_MASK_INVOKEIDLIST = &HC Const SEE_MASK_NOCLOSEPROCESS = &H40 Const SEE_MASK_FLAG_NO_UI = &H400 Private Type SHELLEXECUTEINFO cbSize As Long fMask As Long hwnd ...

textbox saut de ligne

Bonjour, J'aimerais pouvoir associer un texte à mon textbox dans le code, c'est-à-dire : monTextBox.text = "blablabla" mais je ne sais pas comment faire pour pouvoir mettre du texte et y insérer une ligne vide entre deux lignes de textes... monTextBox.text = "ma premiere ligne..." + char(13) + "ma deuxième ligne..." etc.. ... Lire la suite

Salut Tu peux essayer cet exemple mais attention tu as une propriété multiline sur une textbox qu'il faut passer à true pour que ca marche. Text1.text = "Toto" & vbCrLf & vbCrLf & "est" & vbCrLf & "content" vbCrLf : constante VB pour chr(13) & chr(10) A+