各位先進您好:
小弟有個錯誤訊息,麻煩一下!!
技術資訊 (供技術支援人員使用)
錯誤類型：
Microsoft Jforbidden 執行階段錯誤 (0x800A138F)
必須要有物件
/Index.asp, line 118
瀏覽器類型：
Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Foxy/1; Foxy/1; .NET CLR 2.0.50727; .NET CLR 1.1.4322)
頁數：
POST 42 bytes to /Index.asp
POST Data:
Name=kenny&Password=k655714&Login=µn¤J
請問一下該如何解決這個物件問題?(附上以下Code)


[code xml]
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="950"%>
<!--#include file="Connections/LinkDB.asp" -->
<%
var Recordset1 = Server.CreateObject("ADODB.Recordset");
Recordset1.ActiveConnection = MM_LinkDB_STRING;
Recordset1.Source = "SELECT * FROM UserAcount ORDER BY Name ASC";
Recordset1.CursorType = 0;
Recordset1.CursorLocation = 2;
Recordset1.LockType = 1;
Recordset1.Open();
var Recordset1_numRows = 0;
%>
<%
var Recordset2 = Server.CreateObject("ADODB.Recordset");
Recordset2.ActiveConnection = MM_LinkDB_STRING;
Recordset2.Source = "SELECT * FROM Data ORDER BY 日期時間 ASC";
Recordset2.CursorType = 0;
Recordset2.CursorLocation = 2;
Recordset2.LockType = 1;
Recordset2.Open();
var Recordset2_numRows = 0;
%>
<%
var MM_LoginAction = Request.ServerVariables("URL");
if (Request.QueryString!="") MM_LoginAction = "?" Server.HTMLEncode(Request.QueryString);
var MM_valUsername=String(Request.Form("Name"));
if (MM_valUsername != "undefined") {
var MM_fldUserAuthorization="";
var MM_redirectLoginSuccess="/DataBase.asp";
var MM_redirectLoginFailed="/Login-Fail.asp";
var MM_flag="ADODB.Recordset";
var MM_rsUser = Server.CreateObject(MM_flag);
MM_rsUser.ActiveConnection = MM_LinkDB_STRING;
MM_rsUser.Source = "SELECT Name, Password";

if (MM_fldUserAuthorization != "") MM_rsUser.Source = "," MM_fldUserAuthorization;
MM_rsUser.Source = " FROM UserAcount WHERE Name='" MM_valUsername.replace(/'/g, "''") "' AND Password='" String(Request.Form("Password")).replace(/'/g, "''") "'";
MM_rsUser.CursorType = 0;
MM_rsUser.CursorLocation = 2;
MM_rsUser.LockType = 3;
MM_rsUser.Open();

if (!MM_rsUser.EOF || !MM_rsUser.BOF) {
Session("MM_Username") = MM_valUsername;
if (MM_fldUserAuthorization != "") {
Session("MM_UserAuthorization") = String(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value);
} else {
Session("MM_UserAuthorization") = "";
}//if (MM_fldUserAuthorization != "")
if (String(Request.QueryString("accessdenied")) != "undefined" && false) {
MM_redirectLoginSuccess = Request.QueryString("accessdenied");
}//if (String(Request.QueryString("accessdenied"))

Response.Buffer=true;
Expiredate=DateAdd("d",365,Date()); --------line 118
Response.Cookies("Username")=MM_valUsername;
Response.Cookies("Username").Expires=Formatdatetime(Expiredate);

MM_rsUser.Close();

Response.Redirect(MM_redirectLoginSuccess);
}//if (!MM_rsUser.EOF || !MM_rsUser.BOF)

MM_rsUser.Close();
Response.Redirect(MM_redirectLoginFailed);
}//if (MM_valUsername != "undefined")
%>
<%
function MM_findObj(n, d) { //v4.01
var p,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 x=d.forms[i][n];
for(i=0;!x&&d.layers&&i x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById)
x=d.getElementById(n);
return x;
}//function MM_findObj(n, d)
//確認Form函式
function MM_validateForm() { //v4.0
var i,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 ' must contain an e-mail address.\n';
}
else if (test!='R')
{
num = parseFloat(val);
if (isNaN(val))
errors ='- ' nm ' must contain a number.\n';
if (test.indexOf('inRange') != -1)
{
p=test.indexOf(':');
min=test.substring(8,p);
max=test.substring(p 1);
if (num errors ='- ' nm ' must contain a number between ' min ' and ' max '.\n';
}//if (test.indexOf('inRange') != -1)
}//if (test.indexOf('isEmail')!=-1)
}//if ((val=val.value)!="")
else if (test.charAt(0) == 'R')
errors = '- ' nm ' is required.\n';
}//if (val)
}//for (i=0; i<(args.length-2); i =3)
if (errors)
alert('The following error(s) occurred:\n' errors);
document.MM_returnValue = (errors == '');
}//function MM_validateForm()
%>
<!-- 初始化HTML文件參考XHTML 1.0
過渡的(Transitional):要求非常寬鬆的 DTD，它允許你繼續使用 HTML4.01 的標識(但是要符合 xhtml 的寫法)。-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<!-- 匯入XML的Namespaces -->
<html href="http://www.w3.org/1999/xhtml">http://www.w3.org/1999/xhtml">
<head><br /><!-- <meta是指定描述語言,所有的文字型態為文字和HTML,且文字為big5(繁體中文) --><br /><meta http-equiv="Content-Type" content="text/html; charset=big5" /><br /><title>補隙站網管子系統</title><br /></head><br /><body><br /><!--

是
多跳一行的, ->顯示空白 -->

<!-- 以下內的屬性以PIXEL為單位
cellspacing="0"-> 這個屬性允許使用者可以在表格欄位間可以插入空白，用空白來代替字元。主要的效果是欄位與欄位間的空隔加大，也可以說是界線加粗。
cellpadding="0"->
這個屬性允許使用者可以在表格欄位資料和表格欄位界線之間插入空白。
-->

<!-- 主要是說明表格列的狀態，在表格中的各列被這個語法所區隔開來 -->

<!-- 是用來顯示在表格各欄位間的界線，而所有的欄線都必需介在列TR的語法之中才有作用
rowspan->它可以指定有多少個列的表格欄位可以組合在一起
元件用來在 /> /> < width="30%" rowspan="3">
<!-- valign-> 這個參數是用來指定資料在表格各欄位中放置的地方，這個語法和ALIGN不同的地方在於左右位置和上下位置的擺放。可以接受的參數有 top(向上對齊)，middle(居中)，bottom(向下對齊)，baseline(基線)。 -->

<!-- -> 內文區分 --> <!-- ACTION->Form的資料傳出後，必須要由一個CGI程式將所傳的資料做使用者想要的處理 --> <!-- POST-> 將Form所傳的參數經包裝後放在STDIN當中，由於這種傳輸方式會將資料加以包裝，其隱密性較高 --> <form ACTION="<%=MM_LoginAction%>" id="form1" name="form1" method="POST" > 帳號: <input name="Name" type="text" id="Name" /><br /> 密碼: <input name="Password" type="password" id="Password" /><br /> <input name="Login" type="submit" id="Login" value="登入" document.MM_returnValue" /><br /> <input type="reset" value="更正" name="Modify" /><br /> </form><br />

<form name="f1" id="f1"><br />