Hejsan jag har skapat en access databas som jag vill använda i mitt program. <BR>Jag skapade en Reference till Microsoft ActiveX Data Objects 2.5 Library (ADO) och även en SystemDSN som pekade på databasen.<BR><BR>

Sen öppnade jag ett Standard EXE projekt och skrev in följande

<code>

Private Sub Form_Load()
Me.Icon = Nothing

Dim objConn As ADODB.Connection
Dim objErr As ADODB.Error

objConn.Open "DSN=Webshop_old ; UID= ; PWD="
If objConn.State = adStateOpen Then
MsgBox "Connection established"
Else
For Each objErr In objConn.Errors
Debug.Print objErr.Description
Next
End If

objConn.Close
Set objConn = Nothing
End Sub

</code>

Och får följande fel meddelande

Run-time error '91':<BR>
Object variable or With block variable not set<BR><BR>

Någon som kan se vad jag gör för fel ?

Nevermind.. hittade det själv

<code>
Dim objConn As ADODB.Connection
</code>

skall givetviss vara

<code>
Dim objConn As New ADODB.Connection
</code>

//Andreas Håkansson

Nja,

det är inte riktigt rätt sätt att göra det ...

använd Dim objConn As ADODB.Connection

skriv sedan set objConn = New ADODB.Connection

blir för det första mycket snabbare, och för det andra kommer det funka bättre i ett distribuerat system ...

Man tackar för rekommendationen. skulle du ha något emot att förklara lite varför det är snabbare och bättre ? Är som en kunskaps sugsvamp du vet =)

// Andreas Håkansson

På ditt sätt så kör vb en koll varje gång du gör en referens till objektet om det är initierat(ex, rs.movenext, rs!id osv...) .. På det andra skiter den i det och antar att den är initierad kör ändå..

Du ser själv var overheaden ligger :)