台灣最大程式設計社群網站
線上人數
1504
 
會員總數:243325
討論主題:188102
歡迎您免費加入會員
討論區列表 >> ASP >> 網頁連結Access DB呈現畫面
[]  
[我要回覆]
1
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
網頁連結Access DB呈現畫面
價值 : 50 QP  點閱數:79 回應數:1

樓主

阿菇
門外漢
0 3
16 1
發送站內信

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\inetpub\wwwroot\page\page-g\gbook.mdb
Microsoft VBScript 執行階段錯誤 錯誤 '800a01a8'

此處需要物件: 'rs'

/page/page-g/Gform.asp, 行17

Gform.asp程式碼如下:

<!-- #include virtual="/page/func/DB.fun" -->
<%
' 讀取各欄位的資料
Name = Request("Name")
Email = Request("Email")
Subject = Request("Subject")
Memo = Request("Memo")
Pic = Request("Pic")

' 檢查各欄位是否輸入有資料
If Name = "" Or Email = "" Or Subject = "" Or Memo = "" Then
ShowMessage "欄位留白不接受!"
Response.End
End If

Set rs = GetMdbRecordset( "gbook.mdb", "GuestBook" )
rs.AddNew
rs("姓名") = Name
rs("Email") = Email
rs("主題") = Subject
rs("留言") = Memo
If Pic <> "No" Then rs("圖示") = Pic
rs.Update

' 將網頁導至「觀看留言」的網頁 gbook.asp
Response.Redirect "gbook.asp"

%>

<%
Sub ShowMessage( msg )
%>
<body bgcolor="#FFFFCC">
<CENTER>
<H3 align="left"><font color="#FF0000"><img src="../DATA/00007.gif" width="20" height="30"><%=msg%>
</font>
<HR align="left" noshade>
</H3>
<FORM><INPUT Type=Button Value="返回上一頁" OnClick="history.back();"></FORM>
</CENTER>
<%
End Sub
%>


搜尋相關Tags的文章: [ 網頁 ] , [ DB ] , [ ASP ] ,
本篇文章發表於2018-10-01 18:33
別忘捐VP感謝幫助你的人 新手會員瞧一瞧
1樓
回應

想睡覺
檢舉此回應
GOOGLE 搜尋一下 應該不難
這是小舖以前的解答
http://www.blueshop.com.tw/board/FUM200410061525290EW/BRD20060327115216534.html
本篇文章回覆於2018-10-02 10:43
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
   
1

回覆
如要回應,請先登入.