06. juni 2001 - 15:25Der er
13 kommentarer og 1 løsning
Jeg har brug for hjælp med mySql.
Ok, nu skal du bare høre. Vi satte en mySQL 2000 server op på arbejdet (Backoffice 2000 på en win2k pro) ... koden jeg bruger ser således ud ...
<% Dim Connect,rs Set Connect = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER=mysql;SERVER=(SERVER);UID=(USERNAME);PWD=(PASSWORD);DATABASE=(DATABASE);\" Connect.Open DSN Set rs = Server.CreateObject(\"ADODB.Recordset\") sql=\"SELECT top 1 * FROM [tilbud_highlight] order by id desc\" rs.Open sql,Connect do until rs.EOF Response.write(rs(\"highlight_picture\")) rs.MoveNext loop rs.Close %>
Og fejlen jeg får ...
Error Type: Microsoft OLE DB Provider for ODBC Drivers (0x80004005) [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified /forside.asp, line 21
Det skal lige siges at linie 21 er den med \"Connect.Open DSN\" ...
Til at starte med vil jeg gerne have svar på hvorfor det ikke virker ... og sekundært vil jeg gerne have nogle eksempler på hvordan man læser / skriver / opdaterer en lokal mysql database. Der er mange point på spil her ... så skynd jer lige og svar.... hurtige svar vil få ekstra points :)
<% Dim Connect,rs Set Connect = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER=mysql;SERVER=(localhost);UID=(USERNAME);PWD=(PASSWORD);DATABASE=(navnet på databasen);\" Connect.Open DSN Set rs = Server.CreateObject(\"ADODB.Recordset\") sql=\"SELECT top 1 * FROM [tilbud_highlight] order by id desc\" rs.Open sql,Connect do until rs.EOF Response.write(rs(\"highlight_picture\")) rs.MoveNext loop rs.Close %> Husk at ændre Navn på databasen, Brugernavn og Password.
Connect.Execute(\"UPDATE tabelnavn SET kolonne1 = \'værdi1\', kolonne2 = \'værdi2\' Where Id = 5\")
Skriver til: Connect.Execute(\"INSERT INTO tabelnavn (Kolonne1,Kolonne2) VALUES(\'test1\',\'test2\')\")
Læser:
Her kan du faktisk bruge samme metode som du bruger herover med Recordset objektet.
Alternative kan du bruge:
Set Rs = Connect.Execute(\"SELECT top 1 * FROM [tilbud_highlight] order by id desc\") do until rs.EOF Response.write(rs(\"highlight_picture\")) rs.MoveNext loop rs.Close
Sat op? det lyder som om I har glemt at oprette et DSN til den. Det er det fejlen siger.
Under forudsætning at i har f.eks. en ODBC driver til mySQL kan i oprette et DSN under administrative tools og vælge Microsoft ODBC Administrator -> Under System DSN, vælger du Add -> mySQL (eller mySQL-et eller andet, kan ikke checke da jeg ikke har det installeret) derefter kommer en wizard og hjælper dig.
Jo men lige en sidste ting ... nu har jeg fået af vide hvordan man opdaterer ... hvordan man læser og hvordan man skriver fra en lokal mysql database .... hvad med sletter ? :)
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.
