ASP 数据库操作语句

来源:互联网 发布:黄伟文 林夕 知乎 编辑:程序博客网 时间:2024/04/29 07:56

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写入数据库

 


客户输入部分: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写入数据库