Profil de sygale - CodeS SourceS

empecher d executer une requete ACCESS 2000

Bonjour tout le monde Voila mon probleme: quand j appuie sur un bouton, ça m execute une requete mais si j appuie plusieurs fois il m execute a chaque fois la requete. J aimerais qu il m execute la requete une fois et si je reappuie qu il me dise que la requete a deja été effecué. Voila un bout de code: If reponse = vbYes T... Lire la suite

ohhhh TOULOUSE, la ville rose !! eh oui paris il pleut et ca motive pas non plus pour bossé allre @ + Sygale sygale@ifrance.com

pas de quoi bon courage en cette journée pluvieuse. Sygale sygale@ifrance.com

Tu peux mettre dans ta fonction une variavle static Exemple : Static booDejaFait As Boolean If not booDeajFait then > If reponse = vbYes Then > requete = "insert into stocker(datestock,numComposant,numEntrepot,QtéSortie)" & _ > " Select dateT,CodeComp,origine,qte" & _ > " from transfert,ligneTransfe...

Re dimensionnement

Bonjour, kk1 a une astuce ? J'ai un comtrole liste qui doit d'afficher sur tout ma form. J'ai donc codé sur Form.Rezise List1.move 0, 0, me.width, me.height Mais coome tout le monde sais la notion de height pour une form englobe la partie caption de la form. L'api GetSystemMetrics ne m'avance pas. (impossible de trouver le bo... Lire la suite

pourquoi faire simple quand on peut faire compliqué ? Mainteant je fais simple merci Sygale sygale@ifrance.com

type as DATE

kk1 peut m'expliquer : ? format$(cdate(format(cdate("31/12/2999"),"DD/MM/YY")),"DD/MM/YYYY") = 31/12/1999 ?? Moi je trouve pas ca logique du tout !!! Sygale sygale@ifrance.com

Le but de la manipulation est de récupérer des dates affichées dans des flexgrids pour l'instant au format DD/MM/YY (gain de place très grand flex). cependant lors de l'utilisation de cdate on s'apercoit que l'anée sur deux caractère s'arrête à 2029. test format$(cdate("31/12/29"),"DD/MM/YYYY") = 31/12/2029 format$(cdate("31/12/30")...

convert long en Date

Putain ca fait super longtemps que j'ai posté ca !! enfin utilisae ca c'est tres bien Bon courage Public Declare Function FileTimeToSystemTime Lib "kernel32" (lpFileTime As FILETIME, lpSystemTime As SYSTEMTIME) As Long Public Type SYSTEMTIME wYear As Integer wMonth As Integer wDayOfWeek As Integer ...

EXTRAIRE LES ICONS D'UN EXE, DLL OU OCX

/source/928-extraire-les-icons-d-un-exe-dll-ou-ocx

bien vu les sources completes sont elles dispo ?? Sygale@ifrance.com

Menus Contextuels en VB

Salut à tous :) J'ai une colle à poser, qui me turlupine depuis 2 jours. Y a-t-il un moyen de mettre des icônes dans un menu en VB6. Ca a l'air tout con, parce que c'est possible en VBA, mais pas avec l'éditeur de menu fourni avec VB6 ! Quelqu'un connaîtrait-il une méthode ? Merci d'avance les loulous :big) @peluche et bon de... Lire la suite

Sygale Le truc bien avec un forum c'est les sauvegarde et en plus la recherhe. J'ai déjè donné la solution une fois elle est : http://www.vbfrance.com/forum.asp?Article=31405 bon courage

START YOUR BRAINS

Question 1 Pour la 1039 ème fois, quelqu'un serait il comment imprimer le contenu d'un richetextbox lorsque celui ci contient une image en plus du texte. Question 2 Lorsque l'on insere une ligne dans un controle mshflexgrid, ce controle se replace toujours a la premiere ligne. Comment faire pour qu'il affiche la ligne voulue? MERC... Lire la suite

Sygale envoi moi un bout de code. Je ne comprend pas tout ce que tu veux faire. Dis moi dans un mail exatement ce que tu veux. Ensuite je te renvoie les sources corrigée si j'y arrive , je te promet rien mais je vais essayer. Passe par sygale@ifrance.com ca ira plus vite

Sygale Question 1 je sais pas! Question 2 : je suppose que par exemple tu insere une image dans la colonne 3 de la ligne 6, et juste près la première ligne du grid est automatiquement selectionné. Dans ce cas précis tu as déjà les coordonnées Row;col pourquoi ne pas les réaffecter à ton flex. soit par : flex.row = 6 flex.col=3 ...

Image dans Menu

Bonjour, je voudrais savoir comment on peut insérer des images dans le menu déroulant

Sygale Option Explicit 'Apis Private Declare Function GetMenu Lib "user32" (ByVal hwnd As Long) As Long Private Declare Function GetSubMenu Lib "user32" (ByVal hMenu As Long, ByVal nPos As Long) As Long Private Declare Function GetMenuItemID Lib "user32" (ByVal hMenu As Long, ByVal nPos As Long) As Long Private Declare Function Se...

SERIAL# et SID d'ORACLE.

Lors d'une connexion à ORACLE Celui-ci t'identifie avec Serial# et SID qui sont par exemple dans la vue v$session kk1 sait comment faire pour récupérer ces identifiants ??? Toad le fait dans la version 7.2. Dans le module Kill/Trace session il met ta connexion en Rouge. Merci Sygale Lire la suite

J'ai trouvé avec SELECT * FROM V$SESSION WHERE TERMINAL = USERENV('TERMINAL') AND AUDSID = USERENV('AUDSID') Pour les 60 Mo je suis preneur. Merci Sinon il y a aussi : http://download-west.oracle.com/otndoc/oracle9i/901_doc/ Mais une bonne maitrise de l'anglais est indispensable Sygale

Là tu marques 1 point, avec tout ca si j'y arrive pas je suis une merde! tu as eu ca où ?? Sygale

Ca fonctionne seulement si l'utilisateur n'a qu'une seule connexion à la base depuis sont poste. Sinon ca les crache toutes. Sygale

Ils ont le client oracle installé sur chacun de leur poste Sygale

Comment Utiliser un controle Multipage - a moitié urgent!-svp

Salut, tout est dit dans le titre, je n'arrive pas à utiliser le controle multipage, je le cree, je rajoute en l'editant des label,button et text box a l'interieur, et la Hic... Comment on accede au code de ces objets??? La je suis perdu malgre le net et les bouquins de 1500 pages sur vb, personne a l'air de savoir que ca exixte... Mer... Lire la suite

C'est quoi un controle multipage, c'est avec des onglet ?? Sygale

Ou peut-on trouver des ocxOCX

Ou peut-on trouver des controles ocx? Autre chose... J'ai l'air d'avoir un probleme de compatibilite entre VB6 et VB.net. Quelqu'un m'as dit que cela proviendrais peut etre d'un controle ocx qui serais manquant: lequel?

Tu tape le mot magique OCX dans n'importe quel moteur de recherche (ex:Google) et il t'en propose. Sinon tu as le site de Microsoft, ou n'importe quel site d'aide au développement VB qui se respecte en a . www.c2i.fr, www.vbasic.org etc.... Sygale

Contraire de Regsvr32

Bjr, comment effacer une ocx en base de registre, cad le contraire de regsvr32 mon_ocx.ocx Merci !

Installer : Regsvr32 mon_ocx.ocx déinstaller : Regsvr32 /u mon_ocx.ocx Sinon Pour plus d'info : Démarrer/Exécuter et tape : "regsvr / toto.ocx" Win Nt t'affiche les différentes possiblités Sygale