5 svar · 259 visningar · startad av ampy
Är det någon som ser något fel med denna kod?
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("members.mdb")&";pwd=losen"
SET shop = Server.CreateObject("ADODB.Recordset")
SQLstmt=("SELECT TOP5")
SQLstmt= SQLstmt & (" FROM members ORDER BY id ASC")
shop.Open SQLstmt, Connect
%>
prova detta:
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("members.mdb")&";pwd=losen"
SET shop = Server.CreateObject("ADODB.Recordset")
SQLstmt=("SELECT TOP 5 * FROM members ORDER BY id ASC")
shop.Open SQLstmt, Connect
%>
det borde funka...
annars får du posta felmeddelandet
Skippa parenteserna runt SQL-strängen. De ger inget fel, men de är fullständigt onödiga.
ett till förslag...
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("members.mdb")&";pwd=losen"
SQLstmt= "SELECT TOP 5 * FROM members ORDER BY id ASC"
set shop = Connect.execute(SQLstmt)
%>
det funkar nu men jag undrar hur man gör så att när ni skriver blir koderna röda och mindre?