MySQL fejl : ODBC Driver does not support

Punkt 1 Download MyODBC fra www.mysql.com
Brug en af følgende connections:

mySQL (ODBC):

objConn.Open "Driver={mySQL}; Server=ServerNavn; Option=16834; Database=DatabaseNavn;"

Eller mySQL (remote) (ODBC):

objConn.Open "Driver={mySQL}; Server=host.domain.com; Port=3306; Option=131072; Stmt=; Database=DatabaseNavn; uid=Brugernavn; pwd=Adgangskode;"

//>Rune

>Rune
Det er skam installeret og jeg kan også sagtens tilgå db på andre sider, men det er den her specifikke metode der fejler.
Jeg tror at det er RS.Open... der ikke er, jeg ved det ikke, understøttet ?

Prøv at opdatere din mdac driver, det er meget muligt at det er det..

http://www.microsoft.com/data/download_270RTM.htm

;)

Det er det ikke, kører MDAC 2.6.
Ellers tak (igen)

prøv lige at skrive noget mere af koden :)

accessConnect = "Driver={mySQL}; Server=xxx.115.128.133; Port=3306; Option=131072; Stmt=; Database=bbst; uid=????; pwd=????;"
tempDir = "C:\temp"
destDir = "C:\Documents and Settings\Administrator\My Documents\dev\bbst\site\files\"
Set upload = Server.createobject("persits.upload.1")
upload.overwritefiles = FALSE
upload.save tempDir

'// ICON A
Set forsideFile = Upload.Files("forsidebillede")
If Not forsidefile Is Nothing Then '// User uploaded a file
    strForsidetitel = upload.form("forsidetitle")
   
    Set RS = Server.Createobject("ADODB.RecordSet")
    RS.Open "filereg", AccessConnect, 1, 3   
    RS.addnew
    '// Insert data to record
        RS("title") = strForsidetitel
    '// End insert
    RS.Update
        newid = RS("id")
    '// Rename and copy the file
        newname = newid & forsidefile.ext       
        forsidefile.copy destDir & newname
        forsidefile.delete
    '// Now update the record
        RS("url") = "/files/"& newname
    RS.update
    RS.Close
    Set RS = nothing
imgURL = "/files/"& newname   
dataarray(1) = imgURL
else
    strFoto1 = upload.form("foto1")
    dataarray(1) = strFoto1
End if
:-)

hvis du fjerner

    newid = RS("id")
    '// Rename and copy the file
        newname = newid & forsidefile.ext       
        forsidefile.copy destDir & newname
        forsidefile.delete
    '// Now update the record
        RS("url") = "/files/"& newname
    RS.update

virker det så?

iflg. ado docs

du åbner dit recordset med en "keyset" cursor (1 tallet)
RS.Open "filereg", AccessConnect, 1, 3

fra docs..
yuu can see changes made by other users, but new records are NOT visible

må vel betyde at du ikke kan opdatere en record du lige har oprettet

du kan evt. bruge en dynamic cursor (2 tal istedet for 1)

Nu ændrede jeg det til ,2,3 og fik flg. fejl:
Microsoft OLE DB Provider for ODBC Drivers error '80040e21'

ODBC driver does not support the requested properties.

/collectArticleWFiles.asp, line 16

Hov, det må du undskylde... Havde ikke læst fejlmeddelsen ordentlig!

-Du må ikke bruge "direkte" recordsets med MySQL... Der er du nødt til at skære det hele ud i normal SQL... Som sådan her:

<%
    objConn = Server.CreateObject("ADODB.Connection")
    objConn.Open "Driver={mySQL}; Server=host.domain.com; Port=3306; Option=131072; Stmt=; Database=bbst; uid=Brugernavn; pwd=Adgangskode;"
    tempDir = "C:\temp"
    destDir = "C:\Documents and Settings\Administrator\My Documents\dev\bbst\site\files\"
    Set upload = Server.createobject("persits.upload.1")
    upload.overwritefiles = FALSE
    upload.save tempDir

'// ICON A
Set forsideFile = Upload.Files("forsidebillede")
If Not forsidefile Is Nothing Then '// User uploaded a file
    strForsidetitel = upload.form("forsidetitle")
   
    '// Rename and copy the file
        newname = newid & forsidefile.ext       
        forsidefile.copy destDir & newname
        forsidefile.delete
       
    strSQL = "INSERT INTO filereg (titel,url) VALUES ('" & strForsidetitel & "','/files/" & newname & "',)"
    objConn.Execute(strSQL)
Set objConn = Nothing
imgURL = "/files/"& newname   
dataarray(1) = imgURL
else
    strFoto1 = upload.form("foto1")
    dataarray(1) = strFoto1
End if
%>

//>Rune

Jah, men jeg skal bruge den ny ID til at navngive filen med og så skrive en URL tilbage i den record. ? Er det noget med insert_id eller lign ?

Hmm du får den sidstnye ID ved at skrive:
strSQL = "SELECT TOP 1 [ID] FROM regfile ORDER [ID] BY ASC"
objRs = objConn.Execute(strSQL)

Response.Write(objRs("id"))

//>Rune

Det tør jeg ikke satse på, har MySQL ikke en tilsvarende funktion som SQL Server's @@IDENTITY ?
Hvis nu der sidder flere og opretter samtidig går der kuk i det hele!

Jov... Den hedder det samme...

//>Rune

Hmm, syntes ikke rigtig jeg får et resultat. Kigger lige min kode igennem.

Tak et kig her omkring sidste indsatte ID:

http://darkstar.ist.utl.pt/mysql/doc/O/D/ODBC_and_last_insert_id.html

eller, det er vist samme side...:
http://ftp.arnes.si/mysql/doc/en/ODBC_and_last_insert_id.html

Thx 4 Poinz

//>Rune