[求助]我的系统提交过出现了"Microsoft OLE DB Provider for ODBC Drivers ( - ASP技术论坛

得分:0

回复代码

两个也面嘛！
一个是课程设置：kcsz．asp：
<%
If Session("flag")<>1 Then Response.Redirect "../dl/invalid2.asp"
id=Session("id")
%>
<html>

<body background="../tupian/b.jpg">
<form action="kctj.asp" method="post" name="liuyan">
<p align="center"><b><font size="7" face="华文彩云">课程设置</font></b></p>
<div align="center">
<center>
<table border="1" width="48%" height="270">
<tr>
<td width="30%">
<p align="center">课程编号</td>
<td width="45%">
<p align="center"><input type="text" name="cid" size="20"></td>
</tr>
<tr>
<td width="30%">
<p align="center">课程名称</td>
<td width="45%">
<p align="center"><input type="text" name="name" size="20">　</td>
</tr>
<tr>
<td width="30%">
<p align="center">上课时间</td>
<td width="45%">
<p align="center"><input type="text" name="lks" size="20"></td>
</tr>
<tr>
<td width="30%">
<p align="center">上课地点</td>
<td width="45%">
<p align="center"><input type="text" name="ladd" size="20"></td>
</tr>
<tr>
<td width="30%">
<p align="center">任课老师</td>
<td width="45%">
<p align="center"><input type="text" name="tname" size="20"></td>
</tr>
<tr>
<td width="30%">
<p align="center">教师编号</td>
<td width="45%">
<p align="center"><input type="text" name="tid" size="20"></td>
</tr>
<tr>
<td width="30%">
<p align="center">开课院系</td>
<td width="45%">
<p align="center"><select name="cname">
<option "计科系">计科系
<option "管理系">管理系
<option "数学系">数学系
<option "中文系">中文系
<option "化学系">化学系
<option "体育系">体育系
<option "外语系">外语系
<option "艺术系">艺术系
<option "政法系">政法系
</select>　　</td>
</tr>
<tr>
<td width="30%">
<p align="center">学分</td>
<td width="45%">
<p align="center"><input type="text" name="xf" size="20"></td>
</tr>
<tr>
<td width="30%">
<p align="center">课程性质</td>
<td width="45%">
<p align="center"><select name="xz">
<option "必修">必修
<option "选修">选修
</select></td>
</tr>
</table>
<p> 　</p>
<hr>
<CENTER><table width=700 background="file:///D:/web/tupian/05.jpg" >
<TBODY>
<tr align="middle">
<td width="352"><input type="submit" value="提交"></td>
<td width="352"><input type="reset" value="清除"></td>
</form>
<DIV align=center>
<form action="cKSZ.asp" method="post">
</div>
<td width="749"><a><input type="submit" value="查看设置"></a></td></TR></TBODY></TABLE></CENTER></FORM>
</body>

还有一个是提交也面嘛！＂kctj.asp：

<%
If Session("flag")<>1 Then Response.Redirect "../dl/invalid2.asp"
id=Session("id")
%>
<html>
<head>
<meta http-equiv="Conten23t-type"content="text/html;charset=gb2312">
<meta http-equiv="content-language"content="zh-cn">
<title>课程提交</title>
</head>
<%
dim A1
dim A2
dim A3,A4,A5,A6,A7,a8,a9
Dim exec
A1=Request("cid")
A2=Request("cname")
A3=Request("lks")
A4=Request("ladd")
A5=Request("tname")
A6=Request("tid")
A7=Request("xf")
a8=Request("xz")
msg=""
set rs=conn.execute("select cid from xtk where cid='"&A1&"'")
if not rs.eof and not rs.bof then
er=true
msg=msg&"该课程编号已经有了!\n"

end if

if A1="" then
er=true
msg=msg&"请填写课程编号!\n"
end if

if A2="" then
er=true
msg=msg&"请填写课程名字!\n"
end if

if a3="" then
er=true
msg=msg&"请填写上课时间!\n"
end if
if a4="" then
er=true
msg=msg&"请填写上课地点!\n"
end if
if a5="" then
er=true
msg=msg&"请填写任课老师!\n"
end if
if er then
response.write "<script>alert('错误!错误如下：\n\n"&msg&"');history.back(-1)</script>"
response.end
end if
if er<>true then

conn.execute("insert into xtk(cid,cname,lks,ladd,tname,tid,xf,xz) values ('"&A1&"','"&A2&"','"&A3&"','"&A4&"','"&A5&"','"&A6&"','"&A7&"','"&A8&"')")
end if
%>
<body bgcolor="#E6E6FA" background="../tupian/b.jpg">
<p>　</p>
<p>　</p>
<p>　</p>
<P align="center"><STRONG><BIG><font face="华文彩云" size="6">已经提交^_^</font><font size="6">
</font>
</BIG> </STRONG></P>
<hr>
<%

Conn.Execute exec
conn.Close
%>
<div align="center">
　</div>
<div align="center">
<font face="幼圆" size="6"><a border="0" style="color: #000000" href="cksz.asp">查看课程</a></font>
</body>
</HTML>

提交以后就出现上面的错误了１，我也不知道是怎么回师！
哎！可以解决不嘛？？？
谢谢了哈