Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : sql&vb6 [ Base de données / SQL ] (ingstat)

mercredi 27 août 2008 à 08:07:32 | sql&vb6

ingstat

Bonjour,
J'ai un problemme dans l'affichage des résultats d'une requêtte SQL dans un controle DataGrid sur VB6.. 
j'ai implimenter ce code mais on m'affiche("variable non définie"),pour la datagrid1.
   Private Sub Command6_Click()
   Dim d As String
   Dim f As String
   d = InputBox("Entrer la première date", "Nombre d'affaires Executées")
   f = InputBox("Entrer la deuxième date", "Nombre d'affaires Executées")
   Dim rst As New ADODB.Recordset
   If rst.State = adStateOpen Then rst.Close
   rst.Open " T1", db, adOpenDynamic, adLockOptimistic
   Dim sql As String
   Dim rst1 As New Recordset
   sql = "Select* From T1 where Numero Affaire between d and f"
   If rst1.State = adStateOpen Then rst1.Close
   rst1.Open sql, db, adOpenDynamic, adLockOptimistic
   Set dataGrid1.DataSource = rst1
   End Sub
Merci de me repondre

mercredi 27 août 2008 à 09:06:07 | Re : sql&vb6

ghuysmans99

Membre Club
L'as-tu seulement placée sur ton form ?
_________________________________________________________________________
VB.NETis good ...VB6is better<

mercredi 27 août 2008 à 09:15:32 | Re : sql&vb6
mercredi 27 août 2008 à 10:05:14 | Re : sql&vb6

ghuysmans99

Membre Club
sql = "Select * From T1 where Numero Affaire between " & d & " and " & f & ";"
_________________________________________________________________________
VB.NET is good ... VB6 is better<

mercredi 27 août 2008 à 10:35:45 | Re : sql&vb6

ingstat

Desolé ghuysmans99,
je suis encore debutant en vb6
j'ai pas placé le controle datagrid sur form,je le trouve pas dans ma boite aà outils et je connait pas le composant qui permet de le faire!
merci de me l'indiquer
desilé encore une fois,mes questions sont tres cucus!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

mercredi 27 août 2008 à 11:09:25 | Re : sql&vb6

JPGVB

Bonjour,
quelques remarques pour t'orienter:
si un nom de champ contient des espaces il faut la mettre des crochets : 
      [Numero Affaire ]

à priori, vu les inputbox d et f seraient plutot des dates, dans les requetes il doit faloir les mettre entre #. Si tu travailles sous access, il faut utiliser le format date américain.

mets un espace entre SELECT et *

sauf utilisation ailleurs, il ne me semnble pas utile d'ouvrir rst; tu peux requeter rst1 directement.
ta chaine sql pourrait ressembler à qqchose de ce genre:

sql = "Select * From T1 where [Numero Affaire] between " & d & " and " & f & ";"
ou d="#01/01/2007#"
et f="#12/31/2007#" (dans le cas d'access)


mercredi 27 août 2008 à 11:11:54 | Re : sql&vb6

ghuysmans99

Membre Club
Clic-droit sur la boite à outils => Composants.
http://img440.imageshack.us/img440/1592/msdatagridto0.jpg
Coche (comme dans l'image) MS Datagrid ... => Clique sur "Appliquer", ensuite sur "OK"
_________________________________________________________________________
VB.NETis good ...VB6is better<

mercredi 27 août 2008 à 11:19:35 | Re : sql&vb6

ingstat

merci pour l'information,
c'est très gentil
t'es vraiment gentil


mercredi 27 août 2008 à 11:42:52 | Re : sql&vb6

ingstat

Merci JPGVB pour l'indication,
mais ca tourne pas, la requette(sql = "Select * From T1 where [Numero Affaire] between & d & " And "& f & ") est selectionner et on m'affiche:"Type incompatible"
desolé si je te dérange mais je sais pas quoi faire

mercredi 27 août 2008 à 11:57:29 | Re : sql&vb6

JPGVB

Salut, type incompatible, ça veut dire que le type que tu recherche une date dans un champ contenant des nombres ou du texte ...

Dans ta base de données, quel est le type du champ [Numero Affaire]  ? date, nombre? ...
et quelle 'valeur' veux-tu affecter à d et f par exemple?



1 2

Cette discussion est classé dans : vb6, string, sql, rst, rst1


Répondre à ce message

Sujets en rapport avec ce message

SQL 7.0 - VB6 - Procedures stockées [ par anspauldou ] Salut Je voudrais faire des operations sur ma base de données SQL 7.0 : Ajout, Modifiaction, Suppression et Lecture avec VB6. Cela me demande t'il des VB6 SQL Server [ par CHAHID ] Salut tout le mondeJ ai ecrit une fonction FC1 en vb et je veux l'introduire dans une requete sql par exemple :select champ1,chmp2,FC1(chmp3) from Nom Rafraichissement Data Combo VB6/Sql Server [ par Eric J ] Avec VB6 ed. Pro je travaille sur une base SQL SERVER 7.Pour accèder à des fiches d'1 table plus facilement je remplis 1 data combo avec 1 commande SQ Nom des Tables et Champs via SQL et/ou VB6 [ par BSide ] Bonjour,pouvez-vous me dire :1) comment récupérer le nom d'une Table et d'un Champ dans une BD ?2) comment ajouter un champ à une table (create field VB6, SQL et base de données SAARI [ par alaaji ] Est-il possible à partir de VB, d'ecrire des requetes sql qui agissent sur des tables d'une base de données saari?Il paraît que ces requêtes ne peuve Exécution requete SQL... Erreur [ par CochonPerdu ] Au secour ! ça ne marche pas !Ca me met :"No value given for one or more required parameters"Dim adoRs As New ADODB.RecordsetDim adoCon As ADODB.Conne Openrecordset et sql string de plus de 255 caractere [ par eric_aix13 ] Bonjour,je construit dynamiquement une requete sql que je veux executer sur ma base mdb, mais celle ci fait plus de 255 caracteres de long !Quelle est Le SQL de VB6 est incomplet ? [ par Bushi ] Apparemment il existe des limitations dans le code SQL que l'on peut inclure dans du code VB6(SP5).Exemple :select upper(nation) from pays upper (pour Requête SQL sous VB6 [ par jeanluc ] SalutJ?ai problème de requête SQL et cherche une solution :Je cherche à extraire des infos dans une table(ACCESS 2000)Voici ma requêtemaRequete = "SEL Rowsource & Requête [ par Grippen ] Bonjour,avec le code suivant je devrai théoriquement afficher le résultat de la requête sql dans la combobox intitulé macombo (appartenant à la feuill


Nos sponsors

Sondage...

CalendriCode



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,218 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.