国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

ASP教程:刪除記錄和鏈接數據庫程序解釋

2024-05-04 11:07:15
字體:
來源:轉載
供稿:網友
v一、刪除記錄
  
  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 這句是過程的結束語,但從你貼出來的代碼來看并沒有開頭。
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 五大连池市| 建昌县| 宾川县| 茶陵县| 岑溪市| 开平市| 哈密市| 武威市| 庄浪县| 新巴尔虎左旗| 桐庐县| 米脂县| 普陀区| 阜新市| 桦南县| 葫芦岛市| 五原县| 玛纳斯县| 长武县| 浙江省| 米林县| 宜州市| 云浮市| 大宁县| 锦屏县| 津南区| 南澳县| 青海省| 锦州市| 肥城市| 太保市| 晋江市| 潜山县| 成都市| 恩平市| 涟水县| 南川市| 宜章县| 措美县| 富裕县| 漳州市|