Vb+sql+datagrid

expl -
Joël - 24 nov. 2008 à 15:47

Bonjour,

je veux afficher le resultat d'une requette sql dans une datagrid.
je bloque sur ce problemme depuis des jours et je trouve pas la solution et je ne peux pas avancer.
Merci pour votre aide,

Voici le code et l'erreur est "le jeu d'enregistrement ne peut pas prendre en compte les signets"

Private Sub Command6_Click()
Dim d As Date
Dim f As Date
Dim RS As New ADODB.Recordset
Dim RS1 As New ADODB.Recordset
Dim sql As String
d = InputBox("Entrer la première date", "Afficher Etat")
f = InputBox("Entrer la deuxième date", "Afficher Etat")
If RS.State = adStateOpen Then RS.Close
RS.Open "T1", db, adOpenDynamic, adLockOptimistic
sql = "Select * From T1 where [Date Execution] Between " & d & " And " & f
If RS1.State = adStateOpen Then RS1.Close
Set RS1 = New ADODB.Recordset
RS1.Open sql, db, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = RS1
End Sub

A voir également:

Vb+sql+datagrid
Vb - Télécharger - Langages
Vb cable - Télécharger - Audio & Musique
Logiciel sql - Télécharger - Bases de données
Requete sql pix - Forum PHP
Additions et multiplication dans des requêtes SQL ✓ - Forum MySQL

5 réponses

Réponse 1 / 5

RailBird

Essaye au lieu de
sql = "Select * From T1 where [Date Execution] Between " & d & " And " & f

ceci :

sql = "Select * From T1 where [Date Execution] Between " + d + " And " + f +""

expl

ca tourne pas,
type incompatible

Réponse 2 / 5

RailBird

Vérifie que ton format date est bien dd/mm/yyyy car access fou souvent les dates au format mm/dd/yyyy
Le type incompatible il se situe où ?

expl

j'ai vérifié le format du champ dans la base.
le format est :date,abregée pour access(dd/mm/yyyy).
la requette est selectionnée.

expl

si je supprime : Set DataGrid1.DataSource = RS1
on m'affiche aucune erreur.
Pourais je recuperer le resultat du requette autrement(mis a part le datagrid)
Merci de me repondre.

Réponse 3 / 5

yagami_raito1 Messages postés 12 Date d'inscription Statut Membre Dernière intervention

vous devez dabord ecrire des reqetes en sql

voila j ai rempli datagrid en utilisant ce code en c #

protected void Button1_Click(object sender, EventArgs e)
{
string ID_Activites = Request.QueryString["id"].ToString();
SqlConnection sqlconn = new SqlConnection(ConfigurationManager.ConnectionStrings["MyNewConnectionString"].ToString());
SqlCommand cmd = sqlconn.CreateCommand();
cmd.CommandText = "spActDetail ";
cmd.Parameters.Add(new SqlParameter("@Id_Activites", ID_Activites));
cmd.Parameters.Add(new SqlParameter("@description", Textdescription.Text));
cmd.Parameters.Add(new SqlParameter("@INN",TextINN.Text));
cmd.Parameters.Add(new SqlParameter("@OUT",Textout.Text));
cmd.Parameters.Add(new SqlParameter("@Doc_Remarque", Textremarque.Text));

cmd.CommandType = CommandType.StoredProcedure;
sqlconn.Open();
cmd.ExecuteNonQuery();
Response.Redirect("Saisie_Detail.aspx?id=" + ID_Activites);

}

c mon projet personel vous pouvez remplacer les champs

Réponse 4 / 5

expl

Merci,mais je comprend pas c #
je trvail avec VB6

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 5

ingstat Messages postés 49 Date d'inscription Statut Membre Dernière intervention

Mais pourquoi je ne trouve pas de réponse?

Joël

En sql la date est en anglais il te suffit de transformer ta date jj/mm/aaa en mm/jj/aaaa
Personne je pratque toujours avec une dateDeb et dateFin c'est plus facile
....where.....> dateDebânglais an < dateFinanglais
'ce qui revient au même que Beetwen

Discussions similaires

[PL/SQL] le rôle exact du (+) dans une clause

Qu'est ce qu'un BLOB en SQL ou MySQL?

SQL Lister les tables d'une base

Certification Pix - Python et SQL

Jointure et requête sur 3 tables

Votre réponse

Discussions similaires