充气雨衣:Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)

来源:百度文库 编辑:高考问答 时间:2024/04/29 19:36:13
set conn=opendb("oabusy","conn","accessdsn")
set rs=server.createobject("adodb.recordset")
sql="select * from userinf where username='" & oabusyusername&"'"
rs.open sql,conn,1
allow_send_note=rs("allow_send_note")
if allow_send_note<>"yes" then
response.write("<script language=""javascript"">")
response.write("alert(""对不起,你没有进行此项操作的权限!"");")
response.write("</script>")
response.end
rs.close
set rs=nothing
end if
rs.close
set rs=nothing
%>
<%
dim newsid
newsid=request.QueryString("id")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css/css.css">
<meta http-equiv="pragma" content="no-cache">
<title><%=Session("company")%>--<%=Session("systemname")%></title>
</head>
<script language="javascript">
function OpenHTMLEditor(){
window.open('./htmleditor/editor.html','','width=768,height=500,top=10,left=10');
}
function OpenHTMLPreview(){
srcstr=document.all.content.value
srcstr=srcstr.replace("[HTML]","");
srcstr=srcstr.replace("[/HTML]","");
PreviewPage=window.open('','_blank','');
PreviewPage.document.write(srcstr);
}
</script>

<body bgcolor="#ffffff" topmargin="5" leftmargin="5">
<%
call bghead()
%>
<center>
<b>更新通告</b>    "<font color=red>*</font>"号的表示必须填写
</center>
<%
call bgmid()
%>
<center>
<%
if request.form("submit")="更新" then

set rs=server.CreateObject("adodb.recordset")
rs.open "select * from newnotice where id="&newsid,conn,1,1
rs("title")=trim(request("title"))
rs("content")=trim(request("content"))
rs.update
rs.close
set rs=nothing
session("content")=""
response.write "<script language=javascript>alert('更改成功!');window.location.href='"&request("linkaddress")&"';</script>"
response.End

%>
<br><br>
<font color="red" size="+1">通告编辑成功!</font>
<br><br>
<%
else
%>
<script Language="JavaScript">
function maxlength(str,minl,maxl)
{
if(str.length <= maxl && str.length >= minl)
{
return true;
}
else
{
return false;
}
}

function form_check()
{
var l1=maxlength(document.form2.title.value,1,50);
if(!l1)
{
window.alert("标题的长度大于1位小于50位");
document.form2.title.focus();
return (false);

不知道你数据库里面的字段名是不是跟这代码里面的是不是不一样
把错误提示详细点的贴上来看看