Avatar billede -l_jogge_l- Nybegynder
22. maj 2003 - 11:32 Der er 13 kommentarer og
1 løsning

Access Kolonnenavn = TextBox.text, Hvordan?

Jeg har en Access Database, vor jeg gerne vil søge i forskellige kolonner alt efter hvad der står i en TextBox... hvordan definer jeg det?

Min søge sætning ser sådan her ud:
-----------------------------------------------
Set datDB = DBEngine.Workspaces(0).OpenDatabase(App.Path & "\" & "data.mdb")
strSQL = "SELECT * FROM materiel WHERE KOLONNENAVN Like '*" & cboMaterial.Text & "*'"
Set recRecord = datDB.OpenRecordset(strSQL)
-----------------------------------------------
Og det er lige der hvor der står KOLONNENNAVN jeg gern vil have at den skal bruge indholdet af en textBox....
Avatar billede jrl0469 Nybegynder
22. maj 2003 - 11:40 #1
Where " & KOLONNENAVN & Like '*  etc... * skal vist kun være efter & cboMaterial.Text
Avatar billede jrl0469 Nybegynder
22. maj 2003 - 11:41 #2
KOLONNENAVN=TextBox.Text
Avatar billede -l_jogge_l- Nybegynder
22. maj 2003 - 11:44 #3
KOLONNENAVN = cboNameOfStandard.Text

Så kommer den med fejlen "Variable not defined"!!!!
Avatar billede jrl0469 Nybegynder
22. maj 2003 - 11:47 #4
Har du ikke defineret; KOLONNENAVN as String ?
Avatar billede -l_jogge_l- Nybegynder
22. maj 2003 - 11:48 #5
Jow da!

Dim KOLONNENAVN As String
KOLONNENAVN = cboNameOfStandard.Text
Avatar billede jrl0469 Nybegynder
22. maj 2003 - 11:50 #6
Prøv lige Cstr(cboNameOfStandard.Text)
Avatar billede -l_jogge_l- Nybegynder
22. maj 2003 - 11:53 #7
Ingenting.... :(

Dim KOLONNENAVN As String
KOLONNENAVN = CStr(cboNameOfStandard.Text)
Avatar billede -l_jogge_l- Nybegynder
22. maj 2003 - 11:54 #8
Jow vent lige!
Avatar billede -l_jogge_l- Nybegynder
22. maj 2003 - 11:57 #9
Tror jeg har den nu!!!!!!

Jeg vender lige tilbage!
Avatar billede -l_jogge_l- Nybegynder
22. maj 2003 - 12:13 #10
Nej der er noget galt!

Se her:
-------------------------------------------------------------------------------
Dim KOLONNENAVN As String
KOLONNENAVN = CStr(Tabel.Text)
Set datDB = DBEngine.Workspaces(0).OpenDatabase(App.Path & "\" & "data.mdb")
strSQL = "SELECT * FROM test WHERE KOLONNENAVN = '*" & Navn.Text & "*'"
Set recRecord = datDB.OpenRecordset(strSQL)
Efternavn.Text = recRecord("Efternavn") & ""
-------------------------------------------------------------------------------

Men den kommer med fejlen: Der er for få parametre. Der var ventet 1.

MEN skifter jeg så KOLONNENAVN ud med Navn, som er det som den faktisk skal hente fra en TextBox... så kører den fint!
Avatar billede jrl0469 Nybegynder
22. maj 2003 - 12:15 #11
strSQL = "SELECT * FROM test WHERE " & KOLONNENAVN & " = '*" & Navn.Text & "*'"
Prøv lige igen
Avatar billede -l_jogge_l- Nybegynder
22. maj 2003 - 12:21 #12
Yes det virker!!

Hvad skal det der " & foran og efter betyde????
Avatar billede jrl0469 Nybegynder
22. maj 2003 - 12:24 #13
& bruges til at "binde" dine enkelte strenge sammen med!
Avatar billede jrl0469 Nybegynder
22. maj 2003 - 12:51 #14
Ski' godt...
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester