Discussion :

[lepiou]

Bonjour a tous,

Dans le cadre de mon stage de fin d'année de BTS, je dois réaliser une application VB/MySQL.

Toute l'année nous avons réaliser ce genre de programme avec des dsn, dataenvironment etc et j'ai lu qu'il est plus sérieux et propre de faire ca avec ADO.

Pour m'entrainer j'ai donc fait une base de données nommée test avec une table toto contenant NomToto et PrenomToto

Sur vb j'ai réaliser un formulaire contenant deux textbox, Text1 et Text2 et un bouton Command1.

Le but est de recuperer les infos dans les textbox et de les envoyer dans la base.

J'ai donc essayé ca :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub Command1_Click()
 
Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
 
Set conn = New ADODB.Connection
conn.CursorLocation = adUseClient
conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _
                        & "SERVER=localhost;" _
                        & "DATABASE=test;" _
                        & "UID=root;" _
                        & "PWD=passroot;" _
                        & "OPTION=" & 1 + 2 + 8 + 32 + 2048 + 16384 'Ne changer rien pour cette ligne!!
conn.Open
Set rs = New ADODB.Recordset
rs.Open "insert into toto values('Text1.Text','Text2.Text')", conn, adOpenStatic, adLockPessimistic
conn.Close
End Sub

Vous l'aurez compris, ce qui vas dans la base c'est Text1.text et Text2.text et non ce que contiennent les textbox.

J'espere avoir été clair, merci de m'aider

[mimil77210]

Salut !

rs.Open "insert into toto values('Text1.Text','Text2.Text')", conn, adOpenStatic, adLockPessimistic

Le problême se situe au niveau de cette ligne. En effet, tu as placé Text1.Text et Text2.Text entre deux ", ce qui fait que ce n'est plus considéré comme du code mais comme du text. Essayes avec ceci :

rs.Open "insert into toto values('" & Text1.Text & "','" & Text2.Text & "')", conn, adOpenStatic, adLockPessimistic

[lepiou]

Arf j'étais pas loin j'avais essayé en separant comme ca mais ca n'avait pas marché.

C'est bien plus simple qu'avec les dataenvironment !

Merci a toi