Profil de EddiePonpon - CodeS SourceS

Utilisateur Connecté vu depuis un service WXP

Bonjour a tous, Quelqu'un connait-il le moyen de connaitre l'utilisateur connecte, sachant que c'est un service WXP qui se pose la question. Si j'utilise les procedures trouvees ici, le service m'annonce le compte SYSTEM (ce qui est normal). Ce que je voudrais connaitre c'est l'utilisateur (s'il existe) qui est connecte sur une ses... Lire la suite

C'est pas de moi, mais je l'avais déjà trouvé sur le site ... Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpbuffer As String, nsize As Long) As Long Public Function UserName() As String ' Retourne le login windows actif Dim stTmp As String, lgTmp As Long stTmp = Space$(250) lgTmp...

Importer les données d'une base Oracle vers Access avec du code VB

Slt a tous Je voudrais pouvoir avec du cide VB importer des données des tables d'une base Oracle dans une base Access. Pourrais je avoir ce code derriere un bouton de commande par exemple?

Je viens de poser une source qui s'appelle transfert multibase qui peut t'interesser.

Impression entre 2 variables

Salut à tous, Je suis un vrai débutant en ce qui concerne VBA et notamment en ce qui concerne Excel. Je suis confronté à un problème dont j'ai du mal à trouver une solution. D'avance je remercie ceux qui pourraient m'éclairer dans ma recherche. J'ai actuellement un tableau contenant des données classées par date. ex:... Lire la suite

Tu peux faire une macro qui retrouve la première et la dernière ligne concernée, puis qui définit une zone d'impression entre ces deux lignes ... ça devrait pas poser trop de problème surtout si tes données sont classées par date Eddie Ponpon is still alive

Controler une macros sous vb6 Résolu

Bonjour, J'ai un classeur excel qui contien une macros. Avec une application vb6, je doit ouvrir le classeur et exécuter la macros. Pour ouvrir le classeur je n'ai pas de problème, mais pour exécuter la mocro je n'ai aucune idée comment procéder, quelqu'un pourrait-il m'aider??? Voici mon code pour ouvri le classeur excel: ... Lire la suite

Salut la syntaxe est la suivante si mes souvenirs sont bons : xls.run(cdfichier.fileName&"!NomdetaMacro) Eddie Ponpon is still alive

Importer un fichier csv dans access

Bonjour , Je suis débutante en programmation ,et j'ai un petit souci Je souhaiterai savoir comment faire pour importer monfichier.txt en par module ou en programmant un bouton Fandy

Salut, tu dois utiliser la comande Docmd.TransferText avec l'argument acExportDelim Eddie Ponpon is still alive

Utilisation de code barre en VBA Résolu

J'ai un programme de gestion de stock, je veux lire le code barre des articles... en vba

Votes

Il te suffit d'appeler une inputbox que tu place dans une variable MonCodeBarre=Inputbox("Veuillez scanner le code barre") Et la clè de ton code barre est placée dans la variable MonCodeBarre, si en plus ton lecteur est paramétrer pour envoyer un return après le scan, tu n'as pas besoin de valider l'entrée de ton inputbox

Votes

Peux tu être plus précis sur la nature de ton problème s'il te plait ? A partir du moment ou tu as un lecteur Code barre, tu gères la lecture du code comme une saisie au clavier

gerer le .dbf

Bonjour à tous, le probleme doit etre simple mais inextricable pour moi. Je voudrais me connecter à une base en .dbf par le code. Et remplir un datareader avec une commande SQL. Merci d'avance

Créé un ALIAS ODBC sur ton dbf avec les connexions ODBC de windows. Ensuite tu peux l'utiliser dans une controle ADO ou DATA

Traitement de chaine Résolu

Salut a tous, Eh voila j'essai de faire un tri d'une chaine de caratere contenant des noms de fichiers separes par une virgule, de maniere a placer chaque fichiers ds un tableau.... Quelqu'un saurait il me dire ou est l'erreur(s) ds mon code : Dim NbChr As Long Dim SepStrng As String Dim Txt As String Dim File(1 To 100) As Str... Lire la suite

Votes

Comme ça Apparement, ça marche Do i = i + 1 Occ2 = InStr(Occ1, Txt, SepStrng) If Occ2 0 Then File(i) Mid(Txt, Occ1, NbChr): Exit Do File(i) = Mid(Txt, Occ1, Occ2 - Occ1) Occ1 = Occ2 + 1 Loop

importer les données d'une datagrid ou d'une requette access vers excel

merci de m'aider j'ai prob c'est que je veux transférer les données d'une requêtes ou d'une datagrid vers Excel et je sais pas comment si vous possédez un code ou une ptit app qui fait cette tache ,merci de me la communiquer

Plus en détail ça donne ça ... Set MaTable = New ADODB.Recordset MaTable.Open TxtSql, db 'Ouvre le recordset Set SpaceExcel = New Excel.Application 'Définit l'instance Excel SpaceExcel.Workbooks.Add 'Création d'un nouveau Classeur Ligne=1 Do Until MaTable.EOF For Colonne=0 To MaTable....

Salut, il faut que tu référence Excel dans ton projet (Projet/Référence/Microsoft Excel XXX Library Object) Puis dans ton code tu appelles Excel comme ça Dim AppliExcel as Excel.application Set AppliExcel as New Excel.application AppliExcel.workbooks.add N'oublie pas à la fin de faire un AppliExcel.quit et un Set AppliExcel=Nothi...

Erreur Objet Requis

Bonjour, Je suis sur un code pour bosser avec un fichier excel, et alors que cette partie était acquise et marchait j'ai commencé a avoir des messages d'erreurs 'Objet Requis' Voila le code : Public DocExcel As Object Set DocExcel = CreateObject("Excel.Application") DocExcel.Workbooks.Open FileName:=txtFichier.Text, E... Lire la suite

Salut, Avec les références cohées essaie comme ça Public DocExcel as Excel.application Set DocExcel=new excel.application DocExcel.workbooks.add new ... Et le reste devrait être identiques

Pb de port de connexion avec winsock

bonjour a tous, je travaille actuelement sur une application vb dans laquelle je dois me connecter a une imprimante disponible sur le reseau local. je dois donc utiliser winsock dapres ce que j'ai compris. seulement le port de connexion de cette imprimante s'appelle [file://bdr2/prn1 \\bdr2\prn1] et le probleme c'est que ce nom n'est ... Lire la suite

Pourquoi veux tu utiliser un Winsock pour te connecter à une imprimante ? Utilise plutot un Controle CommonDialog et la fonction BoiteDialogue.ShowPrinter Aprsè avoir paramétrer l'imprimante sur ta machine.

Copie de tables avec colonnes sélectionnées Résolu

Bonjour à tous! Je suis débutant en vba et ne connait pas toutes les fonctions de ce language. J'aimerais vous demander un peu d'aide concernant un problème que je rencontre. Je voudrais faire par le code en vba, une copie de table vers une autre table avec les colonnes selectionnées. Suis je obligé de faire un select et de créer la... Lire la suite

Votes

Salut ... Tu peux faire une commande SQL de type INSERT INTO Table (Champ1,Champ2) SELECT Champ1b,Champ2b Fom Table2

Critere !

Bonjour, J'ai un petit problème Access-VBA. Dans un formulaire, j'ai une liste (liste de nom), et un champ qui permet de "chercher" un enregistrement ex si je tape "c" dans le champ et que je clique sur mon boutton "positionner" le premier enregistrement commencant par C devrait etre selectionner ... Cependant mon ode VBA ne f... Lire la suite

Au fait, désolé de demander ça si tard, mais ça plante comment ? Eddie Ponpon is still alive :clown)

As-tu essayé de simplement enlever le nom de ta table dans le critere ? critere = "[Adr_nom] >= '" & Formulaire![Nom] & "'" Eddie Ponpon is still alive :clown)

Reporte les modifications que j'ai faites aux ligne 3 6 et 8 Eddie Ponpon is still alive :clown)

Désolé je n'es pas d'ACCESS 2000 mais je viens de tester sous 97 et ça passe comme ça : Function Positionner(num) Dim bds As Database Dim donnees As Recordset Dim Formulaire As Form, critere, champ Set bds = CurrentDb() Set donnees = bds.OpenRecordset("Adresses",DB_OPEN_DYNASET) Set Formulaire = Forms![Maintenance Adresses] cr...

Je viens de recréer ton cas dans une base Access 2002 et si j'enlève le nom de la table dans le critère ça passe, alors que si je le laisse ça plante critere="[Adr_nom] >= '" & Formulaire![Nom] &"'" Eddie Ponpon is still alive :clown)

MEGA URGENTISSIME ACCESS-ORACLE

Salut, j'ai un probleme urgentissime a regler. J'effectuais jusqu'a y a pas longtemps des requetes sur une base access. L'une d'entre elle me permettait de remplir un tableau. Sous access tout se passait bien mon tableau etait rempli entierement. Mais depuis 2 jours je dois effectuer les memes requetes mais sous une base oracle et la c l... Lire la suite

Ou alors ça vient du type de données (ex memo sous access et Blob sous oracle) . Au fait, c'est quoi le test que tu fais sur le champ de l'enregistrement ? Eddie Ponpon is still alive :clown)