Avatar billede madsmpedersen Nybegynder
16. april 2003 - 17:38 Der er 6 kommentarer og
1 løsning

Database

Jeg har følgende kode

Dim conn As ???
Dim SQL As String
Dim rs As ???

Set conn = CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Sti & "\billeder.mdb"

SQL = "Select * FROM Billeder"
Set rs = conn.Execute(SQL)
text1.text = rs("Filnavn")

Hvad skal ??? erstattes med og hvordan får jeg mere end første post ud i text1
Avatar billede terry Ekspert
16. april 2003 - 20:02 #1
Dim conn As connection
Dim SQL As String
Dim rs As recordset


rs.movenext
Avatar billede terry Ekspert
16. april 2003 - 20:05 #3
This is more correct
Dim conn As ADODB.connection
Dim SQL As String
Dim rs As ADODB.recordset
Avatar billede Slettet bruger
16. april 2003 - 20:39 #4
Hvis du bruger:

Dim conn As ADODB.Connection

er det også en god idé at erstatte følgende linje:

Set conn = CreateObject("ADODB.Connection")

med:

Set conn = New ADODB.Connection

CreateObject() er i der hele taget ikke en god idé i Visual Basic. Brug Components/References i menuen Tools i udviklingsmiljøet så vidt muligt, hvis du vil anvende eksterne moduler i dit projekt.
Avatar billede Slettet bruger
16. april 2003 - 20:39 #5
Med Tools mener jeg selvfølgelig Project.  ;)
Avatar billede madsmpedersen Nybegynder
17. april 2003 - 07:35 #6
Tak til jer begge to.
Avatar billede terry Ekspert
17. april 2003 - 09:57 #7
selv tak
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