MySQL koppling

[MML]

Håller på att försöka koppla mot MySQL i stället för ACCESS.

Använder detta nedan:

Set Conn = Server.CreateObject("ADODB.Connection")

Conn.Open "Driver={MySQL};Server=mysql.minadress.se;Db=databasnamn;UID=minuser;pwd=mittlösen;"

 

Visa = "SELECT * FROM tabell1"

RecSet.Open Visa, DB, adOpenForwardOnly, adLockReadOnly

 

Men får felmeddelande<Microsoft VBScript runtime error '800a01a8' Object required: '' >

på raden som börjar på RecSet.Open...........

[Kristianstad]

Nybörjarfel? =P

 

RecSet.Open Visa, DB, adOpenForwardOnly, adLockReadOnly

skall vara

RecSet.Open Visa, Conn, adOpenForwardOnly, adLockReadOnly

 

:-)

/ Kristoffer

Windows kunde inte hitta något tangentbord. Tryck F1 för att försöka igen eller F2 för att avbryta.

 

[MML]

Nope, exakt samma felmeddelande

 

[Magnus Gladh]

Har du skapat RecSet då?

 

så här hade jag gjort

 

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={MySQL};Server=mysql.minadress.se;Db=databasnamn;UID=minuser;pwd=mittlösen;"

Visa = "SELECT * FROM tabell1"
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Driver={MySQL};Server=mysql.minadress.se;Db=databasnamn;UID=minuser;pwd=mittlösen;"

sSQL = "SELECT * FROM tabell1"
set oRs = oConn.execute(sSQL)
.
.
.
oRs.close : set oRs = nothing
oConn.close: set oConn = nothing

 

- Magnus

-----------------------------------------------------

ju mer jag lär mig ju mer inser jag så lite jag kan

 

 

[MML]

Tack, funkar nu, nu börjar arbetet med att flytta allt från ACCESS till MySQL......... PUH