Microsoft JET Database Engine (0x80040E57)溢出

问题描述

<%@LANGUAGE="JAVASCRIPT"CODEPAGE="936"%><!--#includefile="Connections/conn.asp"--><%varRecordset1=Server.CreateObject("ADODB.Recordset");Recordset1.ActiveConnection=MM_conn_STRING;Recordset1.Source="SELECT*FROMdb1";Recordset1.CursorType=0;Recordset1.CursorLocation=2;Recordset1.LockType=1;Recordset1.Open();varRecordset1_numRows=0;%><%varstr="1234567890";functiongetRandomNum(lbound,ubound){return(Math.floor(Math.random()*(ubound-lbound))+lbound);}vars=str.split("");vart="";for(vari=0;i<4;i++){t+=s[getRandomNum(1,10)];}varnumber=t;%><%//***EditOperations:declarevariables//settheformactionvariablevarMM_editAction=Request.ServerVariables("SCRIPT_NAME");if(Request.QueryString){MM_editAction+="?"+Server.HTMLEncode(Request.QueryString);}//booleantoabortrecordeditvarMM_abortEdit=false;%><%//***RedirectifusernameexistsvarMM_flag="MM_insert";if(String(Request(MM_flag))!="undefined"){varMM_dupKeyRedirect="zcsb.asp";varMM_dupKeyUsernameValue=String(Request.Form("user_name"));varMM_rsKey_cmd=Server.CreateObject("ADODB.Command");MM_rsKey_cmd.ActiveConnection=MM_conn_STRING;MM_rsKey_cmd.CommandText="SELECTuser_nameFROMdb1WHEREuser_name=?";MM_rsKey_cmd.Prepared=true;MM_rsKey_cmd.Parameters.Append(MM_rsKey_cmd.CreateParameter("param1",200,1,50,MM_dupKeyUsernameValue));//adVarCharvarMM_rsKey=MM_rsKey_cmd.Execute();if(!MM_rsKey.EOF||!MM_rsKey.BOF){//theusernamewasfound-cannotaddtherequestedusernamevarMM_qsChar="?";if(MM_dupKeyRedirect.indexOf("?")>=0)MM_qsChar="&";MM_dupKeyRedirect=MM_dupKeyRedirect+MM_qsChar+"requsername="+MM_dupKeyUsernameValue;Response.Redirect(MM_dupKeyRedirect);}MM_rsKey.Close();}%><%if(String(Request("MM_insert"))=="form1"){if(!MM_abortEdit){//executetheinsertvarMM_editCmd=Server.CreateObject("ADODB.Command");MM_editCmd.ActiveConnection=MM_conn_STRING;MM_editCmd.CommandText="INSERTINTOdb1(user_name,passwd,passwd_question,passwd_answer,qq,sex,byear,weight,married,province,city,relation,imgfile,wangming)VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?,?)";MM_editCmd.Prepared=true;MM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param1",202,1,50,Request.Form("user_name")));//adVarWCharMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param2",202,1,50,Request.Form("passwd")));//adVarWCharMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param3",202,1,50,Request.Form("passwd_question")));//adVarWCharMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param4",202,1,50,Request.Form("passwd_answer")));//adVarWCharMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param5",202,1,50,Request.Form("qq")));//adVarWChareMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param6",202,1,50,Request.Form("sex")));//adVarWCharMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param7",202,1,50,Request.Form("byear")));//adVarWCharMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param8",5,1,-1,(String(Request.Form("weight"))!="undefined"&&String(Request.Form("weight"))!="")?Request.Form("weight"):null));//adDoubleMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param9",202,1,50,Request.Form("married")));//adVarWCharMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param10",202,1,50,Request.Form("province")));//adVarWCharMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param11",202,1,50,Request.Form("city")));//adVarWCharMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param12",202,1,50,Request.Form("relation")));//adVarWCharMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param13",201,1,-1,Request.Form("imgfile")));//adLongVarCharMM_editCmd.Parameters.Append(MM_editCmd.CreateParameter("param14",202,1,50,Request.Form("wangming")));//adVarWCharMM_editCmd.Execute();MM_editCmd.ActiveConnection.Close();Session.Contents.Remove("MM_Username");Session.Contents.Remove("MM_UserAuthorization");varloginUser=String(Request.Form("user_name"));Session("MM_Username")=loginUser;//appendthequerystringtotheredirectURLvarMM_editRedirectUrl="zccg.asp";if(MM_editRedirectUrl&&Request.QueryString&&Request.QueryString.Count>0){MM_editRedirectUrl+=((MM_editRedirectUrl.indexOf('?')==-1)?"?":"&")+Request.QueryString;}Response.Redirect(MM_editRedirectUrl)}}%><!DOCTYPEhtmlPUBLIC"-//W3C//DTDXHTML1.0Transitional//EN""http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><htmlxmlns="http://www.w3.org/1999/xhtml"><head><metahttp-equiv="Content-Type"content="text/html;charset=gb2312"/><scripttype="text/javascript"><!--functionvalidateImg(imgfile){varfileext=imgfile.value.substring(imgfile.value.lastIndexOf("."),imgfile.value.length);fileext=fileext.toLowerCase();if((fileext!='.jpg')&&(fileext!='.gif')&&(fileext!='.jpeg')&&(fileext!='.png')&&(fileext!='.bmp')){alert("对不起,系统仅支持标准格式的照片,请您调整格式后重新上传,谢谢!");imgfile.outerHTML=imgfile.outerHTML;imgfile.focus();returnfalse;}}functionviewmypic(mypic,imgfile){if(imgfile.value){mypic.src=imgfile.value;mypic.style.display="";mypic.border=1;}}functionMM_findObj(n,d){//v4.01varp,i,x;if(!d)d=document;if((p=n.indexOf("?"))>0&&parent.frames.length){d=parent.frames[n.substring(p+1)].document;n=n.substring(0,p);}if(!(x=d[n])&&d.all)x=d.all[n];for(i=0;!x&&i<d.forms.length;i++)x=d.forms[i][n];for(i=0;!x&&d.layers&&i<d.layers.length;i++)x=MM_findObj(n,d.layers[i].document);if(!x&&d.getElementById)x=d.getElementById(n);returnx;}functionMM_validateForm(){//v4.0vari,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;for(i=0;i<(args.length-2);i+=3){test=args[i+2];val=MM_findObj(args[i]);if(val){nm=val.name;if((val=val.value)!=""){if(test.indexOf('isEmail')!=-1){p=val.indexOf('@');if(p<1||p==(val.length-1))errors+='-'+nm+'mustcontainane-mailaddress.n';}elseif(test!='R'){num=parseFloat(val);if(isNaN(val))errors+='-'+nm+'mustcontainanumber.n';if(test.indexOf('inRange')!=-1){p=test.indexOf(':');min=test.substring(8,p);max=test.substring(p+1);if(num<min||max<num)errors+='-'+nm+'mustcontainanumberbetween'+min+'and'+max+'.n';}}}elseif(test.charAt(0)=='R')errors+='-'+nm+'请认真填写注册表,按要求填写无误,方可注册成功.n';}}if(errors)alert('Thefollowingerror(s)occurred:n'+errors);document.MM_returnValue=(errors=='');}functionform1_onsubmit(){if(document.form1.user_name.value==''){alert("请输入您的用户名。");document.form1.user_name.focus();returnfalse;}if(document.form1.passwd.value==''){alert("请输入您的密码。");document.form1.passwd.focus();returnfalse;}if(document.form1.pwdcomfirm.value==''){alert("请再次输入您的密码。");document.form1.pwdcomfirm.focus();returnfalse;}if(document.form1.pwdcomfirm.value!=document.form1.passwd.value){alert("两次输入的密码不一致,请再次输入。");document.form1.pwdcomfirm.focus();returnfalse;}if(document.form1.passwd_question.value==''){alert("请选择密码提示问题。");document.form1.passwd_question.focus();returnfalse;}if(document.form1.passwd_answer.value==''){alert("请填写密码提示答案。");document.form1.passwd_answer.focus();returnfalse;}if(document.form1.qq.value==''){alert("请填写正确的QQ号码。");document.form1.qq.focus();returnfalse;}if(document.form1.byear.value==''){alert("请填写您的年龄。");

时间: 2024-09-16 03:02:29

Microsoft JET Database Engine (0x80040E57)溢出的相关文章

asp连接access错误:Microsoft JET Database Engine (0x80004005) 未指定的错误

在一次配置网站空间的过程中,把一个调试好的程序上传到服务器,出现连接数据库错误:Microsoft JET Database Engine (0x80004005) 未指定的错误 出现错误后,百般调试不得其解.先后给ACCESS数据库目录所有权限,数据库文件修复压缩等等方法,问题依然出现,后来翻阅一些资料后,找到解决方法! 连接ACCESS数据库错误 错误类型:Microsoft JET Database Engine (0x80004005) 未指定的错误 原因:在服务器安全配置中,没有开放I

Microsoft JET Database Engine 错误 &#039;80004005&#039; 错误

  一个批处理清理了一下电脑垃圾,结果ACC数据库就出错. 系统环境 Windows 2003+IIS6+NTFS ASP+Access 错误信息 Microsoft JETDatabase Engine 错误 '80004005' 未指定的错误 故障原因 此类错误一般出现于文件系统为NTFS格式中,是IIS匿名帐号(IUSR_计算机名)对相关文件.文件夹操作权限不足引起的. 一.存放数据库文件夹对IIS匿名帐号没有写入.修改权限,错误表现为无法对数据库进行更新.写入 二. 系统临时文件夹目录对

Microsoft JET Database Engine 错误 &#039;80004005&#039; 未指定的错误的完美解决方法_应用技巧

一般情况下asp可以正常运行,但只要连接数据库就提示,Microsoft JET Database Engine 错误 '80004005',我的电脑因为用批处理清理文件,所以不能运行了, 只1.查看数据库连接语句没有发现错误: 2.查看文件夹的权限已经全部给了everyone: 3.打开数据库的同时,系统会在临时文件夹 %SystemRoot%/temp/ 下创建临时文件,而 %SystemRoot%/temp/ 的权限不够 解决:%SystemRoot%/temp/ 的权限加上(IUSER_

Microsoft JET Database Engine 错误 标准表达式中数据类型不匹配。

问题描述 Microsoft JET Database Engine 错误 标准表达式中数据类型不匹配. <% Dim XMID,pages2,xyz XMID = request("XMID") pages = request("pages") pages2 = request("pages2") xyz= request("xyz") Dim Rs2 Set Rs2 = oConn.Execute("SEL

Microsoft JET Database Engine(0x80004005)未指定错误的解决方法_应用技巧

今天在给一台新的电脑安装IIS,安装成功,建立虚目录后,运行一个已经在别的机器上的正确的asp文件,就是不成功,提示:Microsoft JET Database Engine (0x80004005) 未指定的错误,于是我又将这个文件放到另一台机器上运行,正常,一点问题没有,但在这台机器上就出问题.这样就排除了asp文件问题了.于是就想到,重装IIS.重装后,还是一样.最后发现是硬盘的分区有问题,那些安装好IIS后就能asp程序的电脑是fat32分区,这台是ntfs分区.需要给c:\windo

解决Access出现Microsoft JET Database Engine (0x80004005)未指定的错误_Access

Microsoft JET Database Engine (0x80004005)未指定的错误,这个错误只有在使用Access数据库时才能出现   出现以上问题,可以使用以下步骤进行解决问题:   1.系统可能没有注册msjetoledb40.dll,解决办法是    点 开始--->运行, 输入 regsvr32 msjetoledb40.dll, 回车即可: 2.数据库所在文件夹权限    打开办法是:打开我的电脑,然后点菜单上的"文件夹选项"--->查看,然后把&q

iis“Microsoft JET Database Engine(0x80004005)未指定错误”

出现这个问题的朋友很多所以小编在这里为大家整理一下详细的解决方案. 一般情况下asp可以正常运行,但只要连接数据库就提示,Microsoft JET Database Engine 错误 '80004005',我的电脑因为用批处理清理文件,所以不能运行了, 只 1.查看数据库连接语句没有发现错误: 2.查看文件夹的权限已经全部给了everyone: 3.打开数据库的同时,系统会在临时文件夹 %SystemRoot%/temp/ 下创建临时文件,而 % SystemRoot%/temp/ 的权限不

Microsoft JET Database Engine (0x80040E09)

错误提示是: _____________________________________________ 错误类型: Microsoft JET Database Engine (0x80040E09) 不能更新.数据库或对象为只读. /upfile.asp, 第 19 行 浏览器类型: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) 出现这种提示,解决办法: EveryOne写入把它钩上,如图 我们只要选中everyone把它全钩

Microsoft JET Database Engine(0x80004005)未指定错误的解决方法

今天在给一台新的电脑安装IIS,安装成功,建立虚目录后,运行一个已经在别的机器上的正确的asp文件,就是不成功,提示:Microsoft JET Database Engine (0x80004005) 未指定的错误,于是我又将这个文件放到另一台机器上运行,正常,一点问题没有,但在这台机器上就出问题.这样就排除了asp文件问题了.于是就想到,重装IIS.重装后,还是一样.最后发现是硬盘的分区有问题,那些安装好IIS后就能asp程序的电脑是fat32分区,这台是ntfs分区.需要给c:\windo