Tuto VB/Access
MrSlave
Messages postés
2587
Date d'inscription
Statut
Membre
Dernière intervention
-
Rikkunter Messages postés 6023 Date d'inscription Statut Membre Dernière intervention -
Rikkunter Messages postés 6023 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je dois réaliser une base de temps avec le couple VB6 / Access.
Je recherche donc des tutos car je n'ai jamais utilisé ni l'un, ni l'autre.
Merci.
Je dois réaliser une base de temps avec le couple VB6 / Access.
Je recherche donc des tutos car je n'ai jamais utilisé ni l'un, ni l'autre.
Merci.
A voir également:
- Tuto VB/Access
- Vb - Télécharger - Langages
- Tuto tableau croisé dynamique - Guide
- Tuto torrent - Guide
- Tuto chromecast - Guide
- Tuto rufus windows 11 - Guide
284 réponses
Euh ... Polux ? :P
Je viens d'avoir une erreur "erreur initialisation table" après avoir modifié le type d'une variable (de long à double).
Le problème c'est que cette erreur ferme ma fenêtre.
Je ne comprend pas parce que dans ma table, la variable en question est définie en tant que réel double. :S
Je viens d'avoir une erreur "erreur initialisation table" après avoir modifié le type d'une variable (de long à double).
Le problème c'est que cette erreur ferme ma fenêtre.
Je ne comprend pas parce que dans ma table, la variable en question est définie en tant que réel double. :S
oupsss ... tu es sur que d'avoir bien défini le champ dans la table ? et dans le code ? la variable passe bien partout en double ?
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
'tain c'est trop bizarre. :S
Définition de table : th_act As Double
Récupération :
Initialisation : .th_act = 0#
Fillstruct :
Pis dans ma table, je l'ai bien en tant que réel double.
Définition de table : th_act As Double
Récupération :
Public Function getthact() As Double
getthact = entStd.th_act
End Function
Initialisation : .th_act = 0#
Fillstruct :
If Not IsNull(rs.Fields(10)) Then
.th_act = rs.Fields(10)
Else
.th_act = 0#
End If
Pis dans ma table, je l'ai bien en tant que réel double.
De rien pour le kawa.
C'est toujours dur la reprise, surtout quand tu passes de 34° à l'ombre à 16° sous la pluie en moins de 10h....
Il n'y a pas de bricolage en programmation, l'essentiel c'est l'appli réponde au besoin du client
;o)
C'est toujours dur la reprise, surtout quand tu passes de 34° à l'ombre à 16° sous la pluie en moins de 10h....
Il n'y a pas de bricolage en programmation, l'essentiel c'est l'appli réponde au besoin du client
;o)
J'ai été dans les Alpes de Haute Provence (Sisteron)... Que du bonheur ...
Que 17 formulaires et 17 modules ... ^^
;o)
Que 17 formulaires et 17 modules ... ^^
;o)
Salut Polux, en forme ?
Bon une p'tite dernière question pour la route ?
Je veux ajouter une photo à un standard (au cas où tu l'aurais oublié verbe+sujet+complément. ^^).
Avec la DirListBox, on peut se balader n'importe où, mais je veux qu'il restent dans le dossier que j'ai assigné, ou dans les dossiers créés dans ce dossier. (toujours compréhensible ?)
Pour le moment, j'ai :
Avec ça, ils restent dans le dossier que j'ai assigné :
Et avec ça, je récupère le nom du fichier :
Le problème c'est que si je suis dans un dossier à l'intérieur du dossier par défaut, ça pose problème.
A cause de SelectedFile = File1.Path & "\" & File1.FileName .
Je pensais donc utiliser les expressions régulières, mais je ne comprend pas trop comment les utiliser en vb.
Une petite idée ?
Merci.
Bon une p'tite dernière question pour la route ?
Je veux ajouter une photo à un standard (au cas où tu l'aurais oublié verbe+sujet+complément. ^^).
Avec la DirListBox, on peut se balader n'importe où, mais je veux qu'il restent dans le dossier que j'ai assigné, ou dans les dossiers créés dans ce dossier. (toujours compréhensible ?)
Pour le moment, j'ai :
Avec ça, ils restent dans le dossier que j'ai assigné :
Private Sub Dir1_Change()
If Left$(Dir1.Path, Len("X:\SELHA\Applications\BASE_TEMPS\PHOTOS")) <> "X:\SELHA\Applications\BASE_TEMPS\PHOTOS" Then Dir1.Path = "X:\SELHA\Applications\BASE_TEMPS\PHOTOS"
File1.Path = Dir1.Path ' filelistbox
End Sub
Et avec ça, je récupère le nom du fichier :
Private Sub File1_Click() 'L'utilisateur a sélectionné l' objet SelectedFile = File1.Path & "\" & File1.FileName Image1.Picture = LoadPicture(SelectedFile) End Sub
Le problème c'est que si je suis dans un dossier à l'intérieur du dossier par défaut, ça pose problème.
A cause de SelectedFile = File1.Path & "\" & File1.FileName .
Je pensais donc utiliser les expressions régulières, mais je ne comprend pas trop comment les utiliser en vb.
Une petite idée ?
Merci.
Salut,
Si je comprends bien, l'utilisateur peut se balader dans les dossiers, et ça pose problème pour le code lors de la selection. C'est ça ?
Si je comprends bien, l'utilisateur peut se balader dans les dossiers, et ça pose problème pour le code lors de la selection. C'est ça ?
Euh .... bah en fait non. >.<
J'ai pas eu de bol, j'ai mis 2 images dans un dossier à l'intérieur du dossier par défaut et aucune des 2 ne fonctionnait.
J'ai remis une troisième image et là ... miracle, aucun problème. :D
Bon et bien je te remercie de l'aide que tu m'as apportée. :)
Je parle depuis le début, hein !
Deux mois où je n'ai pas pu me passer de toi, alors encore une fois, merci ! :D
J'ai pas eu de bol, j'ai mis 2 images dans un dossier à l'intérieur du dossier par défaut et aucune des 2 ne fonctionnait.
J'ai remis une troisième image et là ... miracle, aucun problème. :D
Bon et bien je te remercie de l'aide que tu m'as apportée. :)
Je parle depuis le début, hein !
Deux mois où je n'ai pas pu me passer de toi, alors encore une fois, merci ! :D
De rien ... c'est toi qui a tout fait ... je n'ai fait que te guider un peu ... et ça a été un vrai plaisir de le faire.
Bon courage pour la suite de ton cursus.
;o)
Bon courage pour la suite de ton cursus.
;o)
Wah, ça a tenu jusqu'au 8 août.
Bah bravo Slave, comment bien exploiter Polux, j'applaudis °°
*C'était le post de fin pour clôturer le topic :o*
Bah bravo Slave, comment bien exploiter Polux, j'applaudis °°
*C'était le post de fin pour clôturer le topic :o*
Bonjour Rikki,
Ca fait plaisir de te revoir ici :D
Comment tu vas bien toi ? finich les vacances ?
Quant à l'exploitation .... Slave c'est très bien débrouillé sans moi pour 95% de son boulot ...
;o)
Ca fait plaisir de te revoir ici :D
Comment tu vas bien toi ? finich les vacances ?
Quant à l'exploitation .... Slave c'est très bien débrouillé sans moi pour 95% de son boulot ...
;o)
SI j'chui parti 3 semaines au soleil des Alpes de Haute provence ... j'en ai profité un max ...
Rhoooo tu rentres de vacances et t'es déjà crevée ... mdrrrr vivement les cours pour que tu te reposes alors !!!
;o)
Rhoooo tu rentres de vacances et t'es déjà crevée ... mdrrrr vivement les cours pour que tu te reposes alors !!!
;o)
J'te le fais pas dire.
Non mais, de se coucher chaque soir/nuit à 2-3h du matin... Et de se réveiller le plus souvent à 8h car tu peux pas faire ta grasse mat tranquille, ça créée un petit manque de sommeil ;)
Nonononon ! Faut pas je dorme cette année !
Au fait, Slave est parti ? J'le vois se connecter sur MSN le soir, mais sans plus.
Non mais, de se coucher chaque soir/nuit à 2-3h du matin... Et de se réveiller le plus souvent à 8h car tu peux pas faire ta grasse mat tranquille, ça créée un petit manque de sommeil ;)
Nonononon ! Faut pas je dorme cette année !
Au fait, Slave est parti ? J'le vois se connecter sur MSN le soir, mais sans plus.
Slave est toujours là ... je le croise de temps en temps. Mais là il bosse dur, alors peut être le soir il se met au dodo plus tôt ... pas facile de tenir le rythme :DDD
C'est pas raisonnable 2/3h du mat ... non, c'est pas raisonnable ... :DDD
;o)
C'est pas raisonnable 2/3h du mat ... non, c'est pas raisonnable ... :DDD
;o)
Le slave il bosse sans arrêt, c'est pour ça qu'il est pas vraiment présent sur msn. :D
Pis il passe ses we dehors aussi.
Youhou, durée moyenne des nuits ce we = 2h. \o/
Je sens mes paupières lourdes, lourdes ....
Au fait, bonjour, comment ça va bien tous les 2 ? :)
Ca fait plaisir de te revoir au boulot Rikk.
xD
Ps : il a tenu jusqu'à mes 20 ans le topic, j'suis heureux, c'est un signe. Ca veut dire que mon année sera placée sous le signe de la prog. \o/
Pis il passe ses we dehors aussi.
Youhou, durée moyenne des nuits ce we = 2h. \o/
Je sens mes paupières lourdes, lourdes ....
Au fait, bonjour, comment ça va bien tous les 2 ? :)
Ca fait plaisir de te revoir au boulot Rikk.
xD
Ps : il a tenu jusqu'à mes 20 ans le topic, j'suis heureux, c'est un signe. Ca veut dire que mon année sera placée sous le signe de la prog. \o/
C'est ton anniversaire aujourd'hui ? Encore un ? Ca fera le 3e que je connais, et encore un demain... By the way, Happy beurzday tou youe, que ce soit en retard, en avance, ou à l'heue. (T'es vieux.)
Boulot ? Huh ? Kesako ? xD
Toi, travailler ? Faut rire ? :D
Na ça fait plaisir de revenir glander parmis vous aussi. Tant qu'à faire. xD
Boulot ? Huh ? Kesako ? xD
Toi, travailler ? Faut rire ? :D
Na ça fait plaisir de revenir glander parmis vous aussi. Tant qu'à faire. xD
Hellow. :)
Bon euh .... j'ai encore besoin de vous. :$
Une erreur de syntaxe.
C'est surement rien mais .....
Cette requête fonctionnait. J'ai rajouté action (champ texte existant dans ma table) ainsi que Insertion. Et là, c'est le drame.
Peut être une petite idée ? :)
Bon euh .... j'ai encore besoin de vous. :$
Une erreur de syntaxe.
C'est surement rien mais .....
Set rs = New ADODB.Recordset
rs.Open "insert into histo_seq(id_std,id_seq,position_affichage,statut,date_MAJ,libelle,action) values (" & stdid & "," & seqid & "," & Me.txtPosAff.Text & ",1,'" & Date & "','" & libel & "','Insertion')"
Cette requête fonctionnait. J'ai rajouté action (champ texte existant dans ma table) ainsi que Insertion. Et là, c'est le drame.
Peut être une petite idée ? :)
Salut,
Bon euh .... j'ai encore besoin de vous. ... c'est qui l'autre ??? :o)
Le nom du champ "action" est-il bien orthographié ? N'y a t-il pas de contrainte sur ce champ (longueur, masque de saisie ...) ???
Sinon, il n'y a pas de raison que ça ne fonctionne pas.
;o)
Bon euh .... j'ai encore besoin de vous. ... c'est qui l'autre ??? :o)
Le nom du champ "action" est-il bien orthographié ? N'y a t-il pas de contrainte sur ce champ (longueur, masque de saisie ...) ???
Sinon, il n'y a pas de raison que ça ne fonctionne pas.
;o)
L'autre c'est Rikk mais en fait elle ne sert à rien .... *patapey, patapey*
Le champ est bien orthographiée, c'est un champ texte de longueur 255.
Je vois pas quoi dire de plus. :(
Quand tu rajoutes un mot comme je le fais avec Insertion directement dans la table, on met juste ce mot entre ' ou il y a quelque chose que j'ai zappé ?
Le champ est bien orthographiée, c'est un champ texte de longueur 255.
Je vois pas quoi dire de plus. :(
Quand tu rajoutes un mot comme je le fais avec Insertion directement dans la table, on met juste ce mot entre ' ou il y a quelque chose que j'ai zappé ?
oui c'est bien 'mot' si c'est un champ texte ... pour les autres insertions, tu es sûr du typage des données ?
PS : Ne dit pas que Rikki ne sert à rien ... elle te soutient moralement ... c'est énorme, je trouve ...
PS : Ne dit pas que Rikki ne sert à rien ... elle te soutient moralement ... c'est énorme, je trouve ...
J'suis con, s'too !