Foumulaire insert to bdd
Résolu
idefixjd
-
idefixjd -
idefixjd -
Bonjour,
je veux recupere la valeut d'un textbox pour la rentre dans une base de données (access).j'y suis arrive le seul probleme que la valeur rentre n'est pas le texte mais son nom
voici le code
Label1.Text = TextBox1.Text
Dim obj_ConnectADODB
Dim fsFichierAccess
Dim str_ACCESSConnectCmd
Dim obj_DBACCESS_tbl_ComputerList
obj_ConnectADODB = CreateObject("ADODB.Connection")
fsFichierAccess = "C:\Users\Idefix\Documents\Visual Studio 2008\Projects\WindowsApplication2\WindowsApplication2\Base de données1.mdb"
str_ACCESSConnectCmd = "driver={Microsoft Access Driver (*.mdb)};DBQ=" & fsFichierAccess
obj_ConnectADODB.Open(str_ACCESSConnectCmd, fsFichierAccess, "")
obj_DBACCESS_tbl_ComputerList = CreateObject("ADODB.Recordset")
obj_DBACCESS_tbl_ComputerList.Open("INSERT INTO Presse (nom)VALUES ('TextBox1.Text')", obj_ConnectADODB, )
la valeur enregistre est : TextBox1.Text
comment mettre sa valeur texte ?
merci d'avance
PS/ sous VB2008
je veux recupere la valeut d'un textbox pour la rentre dans une base de données (access).j'y suis arrive le seul probleme que la valeur rentre n'est pas le texte mais son nom
voici le code
Label1.Text = TextBox1.Text
Dim obj_ConnectADODB
Dim fsFichierAccess
Dim str_ACCESSConnectCmd
Dim obj_DBACCESS_tbl_ComputerList
obj_ConnectADODB = CreateObject("ADODB.Connection")
fsFichierAccess = "C:\Users\Idefix\Documents\Visual Studio 2008\Projects\WindowsApplication2\WindowsApplication2\Base de données1.mdb"
str_ACCESSConnectCmd = "driver={Microsoft Access Driver (*.mdb)};DBQ=" & fsFichierAccess
obj_ConnectADODB.Open(str_ACCESSConnectCmd, fsFichierAccess, "")
obj_DBACCESS_tbl_ComputerList = CreateObject("ADODB.Recordset")
obj_DBACCESS_tbl_ComputerList.Open("INSERT INTO Presse (nom)VALUES ('TextBox1.Text')", obj_ConnectADODB, )
la valeur enregistre est : TextBox1.Text
comment mettre sa valeur texte ?
merci d'avance
PS/ sous VB2008
A voir également:
- Foumulaire insert to bdd
- Touche insert - Guide
- Qwerty to azerty - Guide
- Disk boot failure insert system disk and press enter - Guide
- Video to video - Télécharger - Conversion & Codecs
- Press del to enter setup ✓ - Forum Windows
