1. 连接数据库
2. 插入数据
3. 更新数据
4. 删除数据
4. 删除数据
<% '删除数据
set rsDelete=server.CreateObject("adodb.connection")
rsDelete.open MM_conn_String
'注意, 输入为数字不能加单引号
sql= "DELETE FROM article WHERE articleid in(3263, 3262, 3261)" '删除 ID 为 3263, 3262, 3261 的文章
rsDelete.execute(sql)
rsDelete.close
set rsDelete=nothing
response.Redirect("../index.asp") '返回首页
%>
3. 更新数据
<% '更新数据
set rsUpdate=server.CreateObject("adodb.connection")
rsUpdate.open MM_conn_string
'数字不加单引号, 字符加, 日期加井号
sql= "update article set classid="&classid_&", nclassid="&nclassid_&", writer='"&writer_&"', email='"&email_&"', www='"&www_&"', url='"&url_&"', title='"&title_&"', content='"&content_&"' where articleid="&request("articleid")
rsUpdate.execute(sql)
rsUpdate.close
set rsUpdate=nothing
%>
2. 插入数据
<% '插入数据
set rsInsert = Server.CreateObject("ADODB.connection")
rsInsert.open MM_conn_STRING '数据库连接字符串
'注意单引号的使用
sql = "INSERT INTO article (classid,nclassid,title,content ) VALUES ("&classid_&","&nclassid_&",'"&title_&"','"&content_&"' ) " '选择列, 并插入数据
rsInsert.Execute(sql) '执行数据库插入语句
rsInsert.close
set rsInsert=nothing
%>
1. 连接数据库
<% '连接数据库
set rs=server.CreateObject("adodb.recordset") '创建 rs 数据查询
rs.open "select * from article" '数据查询语句
response.Write rs("title") '简单读出数据
rs.close '关闭 rs 连接
set rs=nothing
%>
/****************************************************************/
ASP写入数据库 <script language="javascript" type="text/javascript">document.title="ASP写入数据库 - "+document.title</script>
客户输入部分:luo123a.htm
<form method="POST" action="http://www.3ttt.cn/luo123a.asp">
<p> </p>
<p> 姓名:<input type="text" name="name" size="20"></p>
<p> 电邮:<input type="text" name="mail" size="20"></p>
<p> 留言:<input type="text" name="word" size="20"></p>
<br>
</p>
<p> <input type="submit" value="提交" name="B1"> <input
type="reset" value="复原" name="B2"></p>
</form>
<%'ASP写入数据库部分:http://www.3ttt.cn/luo123a.asp%>
<%
sz = "'" & Request.Form("name") &_
"', '"& Request.Form("mail") &_
"', '"& Request.Form("word") & "'"
Set obj = Server.CreateObject("ADODB.Connection")
obj.Open "luo01"
into_db = "INSERT INTO 表2 ( name, mail, word ) VALUES(" &_
sz & ")"
obj.Execute(into_db)
obj.Close
%>您的数据已经写入数据库!!!
在服务器端建立SDN为 LUO01
建立一个含有 表2,含有 name,mail,word字段的数据库
然后,在客户端输入的FORM 便永久地存在于数据库中
这无疑就是各种留言簿,论坛的核心部分!!
实际上,这便是一个简单的留言簿!!
ASP写入数据库