WebjxCom提示:ASP教程:删除程序和链接数据库程序解释. |
一、删除记录
opendataconn ''打开数据库连接 xxlb=RtnReplaceInt(Trim(request("xxlb")),0) ''从里到外依次是接收xxlb变量,去除变量两端的空格,最外层是一个自定义函数,估计与替换有关。 id=changechr(request("id")) ''接收id,并转换成字符串 ids=split(id,",") ''把id按 "," 分割,并保存到数组ids中 for i=0 to ubound(ids) ''用for循环遍历数组 tt=trim(ids(i)) ''数组元素去除两端空格后赋值给tt conn.execute"delete from house where id="&tt&"" ''删除数据表中id=tt变量的记录 next ''循环结束 response.redirect "house.asp?xxlb="&xxlb&"" ''跳转到house页面并用get方法传递xxlb参数,值为xxlb变量的值. closedataconn 关闭数据库连接
二、连接数据库
dim conn ''定义变量 dim char_str(20) ''定义数组 sub OpenDataConn() ''自定义过程,用户链接数据库地 dim connstr 定义变量 connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" connstr = connstr & Server.MapPath("../../data/fyhouse_free.mdb") ''数据库驱动字符串 ''response.write connstr 输出变量connstr的值 set conn=Server.CreateObject("AdoDb.Connection") ''创建连接对象 conn.Open connstr ''链接数据库 end sub 这句是过程的结束语,但从你贴出来的代码来看并没有开头。
|