UC知道网页错误，求救！！！！
来源：百度知道 编辑：UC知道 时间：2024/06/08 03:03:20
<% Response.Write("<TR bgcolor=orange align=middle>");
dim conn,mdbfile
mdbfile=server.mappath("kangjian.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};uid=admin;dbq="&mdbfile
rs=conn.Execute("select * from zhuce");
for (I=0;I<rs.Fields.count;I++)
{Response.Write("<TD><font color=white><b>"+rs(I).name+"</b></font></TD>");}
Response.Write("</TR>");
rs.MoveFirst();
while(!rs.Eof)
{row="<TR align=middle>"
for(I=0;I<rs.Fields.count;I++)
{row=row+"<TD>"+rs(I)+"</TD>"}
Response.Write(row+"</TR>");
rs.MoveNext();}%>
出现错误如下：
Microsoft JScript 编译错误 (0x800A03EC)
缺少 ';'
/zcsc.asp, line 2, column 4
dim conn
dim conn,mdbfile
mdbfile=server.mappath("kangjian.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};uid=admin;dbq="&mdbfile
rs=conn.Execute("select * from zhuce");
for (I=0;I<rs.Fields.count;I++)
{Response.Write("<TD><font color=white><b>"+rs(I).name+"</b></font></TD>");}
Response.Write("</TR>");
rs.MoveFirst();
while(!rs.Eof)
{row="<TR align=middle>"
for(I=0;I<rs.Fields.count;I++)
{row=row+"<TD>"+rs(I)+"</TD>"}
Response.Write(row+"</TR>");
rs.MoveNext();}%>
出现错误如下：
Microsoft JScript 编译错误 (0x800A03EC)
缺少 ';'
/zcsc.asp, line 2, column 4
dim conn
dim conn,mdbfile
改成
var conn,mdbfile;
这样写:
<% Response.Write("<TR bgcolor=orange align=middle>");
var conn,mdbfile;
mdbfile=server.mappath("kangjian.mdb");
set conn=server.createobject("adodb.connection");
conn.open "driver={microsoft access driver (*.mdb)};uid=admin;dbq="&mdbfile;
rs=conn.Execute("select * from zhuce");
for (I=0;I<rs.Fields.count;I++)
{Response.Write("<TD><font color=white><b>"+rs(I).name+"</b></font></TD>");}
Response.Write("</TR>");
rs.MoveFirst();
while(!rs.Eof)
{row="<TR align=middle>";
for(I=0;I<rs.Fields.count;I++)
{row=row+"<TD>"+rs(I)+"</TD>";}
Response.Write(row+"</TR>");
rs.MoveNext();}%>
把dim改成var
然后每行后面加分行
Response.Write(&quo