begin process at 2010 02 10 02:24:20
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Visual Basic 6

 > 

Base de données

 > 

SQL

 > 

requête SQL et textbox


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

requête SQL et textbox

vendredi 16 mai 2008 à 09:30:24 | requête SQL et textbox

neg03

Bonjour,
je souhaiterai afficher dans un tableau le résultatde ma requête SQL qui a pour but de m'inscrire le nom et l'angle.
Je possède 2 textbox angle2.text et angle3.text qui me permette de faire une recherche d'un angle entre les 2 valeurs présentes dans ces 2 textbox.
Mon problème est la syntaxe à utiliser.

<code>
 With Adodc1
                     .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & MaBD & ""
                     .CommandType = adCmdText
                     .RecordSource = "select nom, angle_pointe where `angle_pointe`>'" & angle2.Text & "' and `angle_pointe`< " & angle3.Text
                     .Refresh
                      End With
                      Adodc1.Refresh
</code>

Merci

vendredi 16 mai 2008 à 10:00:16 | Re : requête SQL et textbox

rdrapeau

Bonjour,

une requete SQL c'est souvent select <nom de colonne> FROM <Nom de la table> WHERE condition

Or dans votre requête je ne vois pas le nom de la table et donc de clause FROM, n'est-ce pas cela le problème ?

flaggy
vendredi 16 mai 2008 à 10:03:07 | Re : requête SQL et textbox

molo molo

Réponse acceptée !
Salut,

Avec affichage dans un ctl datagrid par exemple

'******************************** Connexion ADO
Public Cn   As New ADODB.Connection
'******************************** Recordset ADO
Public Rst  As New ADODB.Recordset
'********************************

'*** En local
Dim ValAngle1 as integer
Dim ValAngle2 as integer
Dim SQL as string

'*** Je te passe la connexion à la base qui doit être faite ( dans mon cas Cn)
ValAngle1=val(text2)
ValAngle2=val(text3)

SQL="select nom, angle_pointe"
SQL=SQL & " From MonFichier
SQL=SQL & " where angle_pointe >" & valangle1
SQL=SQL & " and angle_pointe< " & valangle2

If RCli.State = adStateOpen Then CleanupRecordset RCli
With RCli
    .ActiveConnection = Cn
    .CursorType = adOpenKeyset
    .LockType = adLockReadOnly
    .Source = SQL
    .Open
    If .EOF Then
        CleanupRecordset RCli
        Screen.MousePointer = 1
        Exit Sub
    End If
    .MoveFirst
End With
Set DataGrid.DataSource = RCli

DataGrid.Columns(0).Caption = "Nom"
DataGrid.Columns(1).Caption = "Angle"

DataGrid.Columns(i).Width = 1000         '*** Largeur colonne
DataGrid.Columns(i).Width = 500        


Public Function CleanupRecordset(Rx As ADODB.Recordset) As Boolean

'*** Nettoyage recordset en cours
'*** /////////////////////////////////////////////////////////////////////////////////
On Error Resume Next
If Not Rx Is Nothing Then
    Rx.Close
    Set Rx.ActiveConnection = Nothing
    Set Rx = Nothing
    err.Clear
End If
CleanupRecordset = True
 
End Function

voila
Bon dev
vendredi 16 mai 2008 à 10:16:18 | Re : requête SQL et textbox

neg03

Merci beaucoup molo molo,

 sa marche nikel é dans le code que j'avé écris il n'y a pas FROM car  sans faire attention en enlevant certains nom de colonnes pour allégere le code je l'avé supprimer.

vendredi 16 mai 2008 à 12:53:57 | Re : requête SQL et textbox

karibenz

pourqoi chez moi ça marche pas !!!!il m'affiche les nom des colonnes mais pas les données de la table
lundi 19 mai 2008 à 09:43:45 | Re : requête SQL et textbox

neg03

En faite je n'ai pas testé tout le code j'avais surtout un problème avec la requête dc c'est pour sa que sa marche peut être pas chez toi.

Pour l'afficher dans un tableau moi je fais comme sa mais dans ton cas je sais pas si sa ira, j'utilise un datagrid et adodc  :
<code>
   Dim sql As String
    MaBD = App.Path & "\" & NomBaseMDB & ".mdb"

 sql = "select nom, prénom, age from personne where ...
            With Adodc1
                 .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & MaBD & ""
                 .CommandType = adCmdText
                 .RecordSource = sql
                 .Refresh
             End With
             Adodc1.Refresh
</code>



Cette discussion est classée dans : textbox, text, sql, requête, angle


Répondre à ce message

Sujets en rapport avec ce message

Date dans une requête SQL [ par Globig ] Salut !J'ai écrit une requête qui doit sélectionner des données comprises entre 2 dates :sql = "SELECT joueur, score FROM match_j WHERE joueur = '" & SQL et aposthrophe [ par globule ] Bonjour je désire faire la requête suivanteSelect * from TableNom where ChampNom like '" & Text_A_Chercher & "'Seulement si Text_A_Chercher contient d Insérer une requête SQL dans un text box VBNET [ par phenX ] bonjour,je voudrais savoir, en VBNET, comment faire pour mettre le résultat d'une requête sql dans un text box.Pour ca j'ai mis ma requete dan sune va variable VB dans une requête SQL [ par benny83 ] Bonjour,voilà je ne parviens pas à utiliser une variable (le champ .text d'une textbox) dans une requete sql du type "SELECT * FROM TABLE1 WHERE NUM_I Problème de synthaxe Requête SQL et datacombo1.text [ par cyberangel02 ] Bonjour,J'ai un souci de syntaxe avec la requête SQL suivante :With Adodc3        .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C: VB.Net Ado.Net Requête SQL ??? [ par MagDix ] Salut J'ai un problème avec mon DataAdapter...J'ai ce message d'erreur:Erreur de syntaxe (opérateur absent) dans l'expression "Purée de Pomme de Ter VB.Net Ado Requête SQL Problème avec Guilement [ par MagDix ] Bonjour à tous...   J'ai un problèeme avec une Requête SQL et avec les guillemets J'ai une BD Assce qui contient certaine fois des guillement da VB.Net ADO Requête SQL qui ne fonctionne pas... [ par MagDix ] Salut...J'ai encore un problème avec une Requête SQL...J'aimerais mentionner que j'en réussi quelques-unes requête SQL...Ok j'ai un textbox relié à ma probleme requête SQL [ par azstar ] voila j'ai code pour met un text dans une base de donnee mysql mais le probleme  est quant mon text contient des '   ce la me returne un erreur de sql VB.Net Requete SQL et date ??? [ par MagDix ] Bonjour à tous Je cherche un moyen pour enregistrer un nouvel enregistrement dans ma BD avec une requête SQL. J'ai une date dans cette reqête et je c


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), 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

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,437 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales