请问使用DIM出现对象不支持此属性或方法: 'from'
<form action="booksave.asp" method="post" name="form1">姓名<input name="title" type="text" maxlength="5 "/>
内容<textarea name="con" cols="70" rows="12"></textarea>
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重置">
</form>
BOOKSAVE。ASP
<!--#include file="conn.asp"-->
<%
dim title,con
title=request.from("title")
con=request.from("con")
if trim(title)="" or trim(con)="" then
response.write"所填标题和内容不能为空"
else
set rs= Server.CreateObject("adodb.recordset")
sql= "select * from guestbook"
rs.open sql,conn,1,3
rs.addnew
rs("title")=title
rs("con")=con
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write "添加成功"
end if
%>
conn.asp
<%
Dim Conn, StrSQL
StrSQL = "provider=microsoft.jet.oledb.4.0;" & "data source = " & server.mappath("abc.mdb")
set Conn = Server.Createobject("Adodb.Connection")
Conn.open StrSQL
%>
原帖来自于网易社区:http://p5.club.163.com/viewArticleByWWW.m?boardId=program&articleId=program_108e235fc81413c