格式问题!!!
lsxy 2004-04-06 09:09:00 各位大虾帮忙看看,代码那么写格式有什么问题吗,怎么执行不了呢???(具体内容可以不用管),我在开头用<%@ language=Jscript%>就好用,怎么回事啊?
<body>
<SCRIPT language=JavaScript>
MID=Request("ID");
MIDCP=Request("IDCP");
MIDCQ=Request("IDCQ");
var conn=Server.CreateObject("ADODB.Connection");
conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" +Server.MapPath("upload.mdb"));
var obj=Server.CreateObject("LyfUpload.UploadFile");
txt=obj.Request("text1");
txt2=obj.Request("text2");
txt3=obj.Request("textfield");
strFileType=obj.FileType("file1");
strUserleixing=obj.Request("leixing");
if (txt=="")
{
strFileName=obj.SaveFile("file1",Server.MapPath(MIDCP),true);
if (strFileName !="")
{
Response.Write("选择的文件已经上传到服务器!");
Response.Write("<br>文件名:"+strFileName+"."+strUserleixing);
Response.Write("<br>上传者:"+txt2);
Response.Write("<br>文件类型:"+strFileType);
Response.Write("<br>文件大小:"+obj.FileSize);
Response.Write("<br>附言:"+txt3);
conn.Execute("Insert into 表1 values('"+strFileName+"."+strUserleixing+"','"+txt2+"','"+txt3+"','"+Server.MapPath(MIDCP)+"','"+strFileName+"')");
}
else
{
Response.Write("对不起,您没有选择上传文件!");
}
}
else
{
strFileName=obj.SaveFile("file1",Server.MapPath(MIDCP),true,txt+"."+strUserleixing);
if (strFileName !="")
{
Response.Write("选择的文件已经上传到服务器!");
Response.Write("<br>文件名:"+txt+"."+strUserleixing);
Response.Write("<br>上传者:"+txt2);
Response.Write("<br>文件类型:"+strFileType);
Response.Write("<br>文件大小:"+obj.FileSize);
Response.Write("<br>附言:"+txt3);
conn.Execute("Insert into 表1 values('"+txt+"."+strUserleixing+"','"+txt2+"','"+txt3+"','"+Server.MapPath(MIDCP)+"','"+txt+"')");
}
else
{
Response.Write("对不起,您没有选择上传文件!");
}
}
conn.close();
</SCRIPT>
</body>