databas hjälp

7 svar · 322 visningar · startad av CyriQ 6 maj 2002

CyriQMedlem sedan maj 20025 inlägg

Trådstart6 maj 2002 11:17#1

kod:
-----
Dim Connect As New ADODB.Connection
Dim Recset As New ADODB.Recordset

file = App.Path + "\data\colt.mdb"
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & file

SQL = "SELECT * FROM losen"
Recset.Open SQL, Connect, adOpenStatic, adLockOptimistic
Do Until Recset.EOF
adress = Recset("losen")

Recset.MoveNext
Loop
Recset.Close
Connect.Close
---

får felkoden: compile error
user-defined type not defined
ado är förbockad i references och ado i components e det också.
ok den gör inget speciellt men har inte hunnit längre...

JonMedlem sedan juli 20011 304 inlägg

6 maj 2002 11:45#2

Hmm... är det all kod som finns eller finns det nåt mer du kan visa?
Blir det bara fel när du försöker kompilera eller även när du kör?

CyriQMedlem sedan maj 20025 inlägg

6 maj 2002 16:43#3

det är allt för tillfälligt, har inte haft tid till mer. Det blir fel även om jag kör det.... fattar inte vad som e fel......

UlfTMedlem sedan maj 20018 027 inlägg

6 maj 2002 20:06#4

För att kolla att du har alla referenserna rätt för ADODB, kan du pröva om ADODB kommer upp i den meny som dyker upp efter ord som "As" och "New" i variabeldeklarationerna. Funkar det så ligger ditt fel någon annanstans.

CyriQMedlem sedan maj 20025 inlägg

7 maj 2002 12:10#5

får felet runtime error 91:
Object variable or With block variable not set...

@ndersMedlem sedan juni 200032 967 inlägg

7 maj 2002 13:06#6

Hur ser din kod ut nu då?

CyriQMedlem sedan maj 20025 inlägg

7 maj 2002 17:22#7

samma som innan fast :

Dim Connect As ADODB.Connection
Dim Recset As ADODB.Recordset

funkade bättre då.. kom lite längre...

UlfTMedlem sedan maj 20018 027 inlägg

7 maj 2002 18:39#8

Ok, då har du deklarerat vilka slags objekt som "Connect" och "RecSet" ska peka på. Men du måste skapa objekten för att kunna använda dem. Det kan du göra på följande vis:

Set Connect = New ADODB.Connection
Set Recset = New ADODB.Recordset

Först då existerar objekten och kan användas.