第四章session和application對象-資料下載頁
2025-08-01 13:35本頁面
【正文】 ere 條件 ] 例如： Update link Set intro=“贏利網(wǎng)站” Where name=“新浪” % 39。首先根據(jù)傳入的 Link_ID將原有數(shù)據(jù)顯示在表單內(nèi) Dim varLink_id varLink_id=(link_id) dim db set db=() DBQ=amp。()amp。DRIVER={Microsoft Access Driver (*.mdb)}。 Dim strSql,rs strSql=select * from link where link_id= amp。 varLink_id 39。varLink_id是傳過來的 set rs=(strSql) % center table border=1 width=90% form action= method=post name=form1 tr td網(wǎng)站名字 /tdtdinput type=text name=name size=20 value=%=rs(Name)%/td /tr tr td網(wǎng)站網(wǎng)址 /tdtdinput type=text name=URL size=60 value=%=rs(URL)%/td /trtr td網(wǎng)站簡介 /tdtd textarea name=Intro rows=2 cols=60 wrap=soft %=rs(Intro)%/textarea/td /trtr tdinput type=submit value= 確 定 /td /tr /form /table /center % 39。如果上面的信息填全了，就修改記錄，否則給出錯誤信息 If Request(name) AND Request(URL) AND Request(intro) Then 39。以下修改記錄 Dim varName,varUrl,varIntro varName=Request(“name”) varURL=Request(URL) varIntro=Request(intro) StrSql=update link set name=39。 amp。 varName amp。 39。,URL=39。 amp。 varURL amp。 39。,intro=39。 amp。 varIntro amp。 39。 where link_id= amp。 varLink_id (strSql) 39。這里利用 Execute方法，修改記錄 39。修改完畢，返回首頁 Else 請將所有信息填寫完整 End If % 存取 SQL數(shù)據(jù)庫 (一 ) % Dim db Set db=(“”) “l(fā)ink”,”myusername”,”mypassword” % 存取 SQL數(shù)據(jù)庫 (二 ) % Dim db Set db=(“”) “Database=link。Uid=myusername。Pwd=mypassword。Driver={SQL Derver}” % 對多個數(shù)據(jù)庫進行操作 ? 基本情況表 TA： student_id, password, name ? 詳細(xì)情況表 TB： student_id, department, age ? 組合查詢 顯示學(xué)生的學(xué)號、姓名、年齡、系別 對多個數(shù)據(jù)庫進行操作 ? 基本情況表 TA： student_id, password, name ? 詳細(xì)情況表 TB： student_id, department, age ? 組合查詢 顯示學(xué)生的學(xué)號、姓名、年齡、系別 % ?以下建立 Recordset對象實例 rs Dim strSql,rs strSql=“Select , From TA,TB Where =” Set rs=(strSql) ?以下顯示數(shù)據(jù)庫查詢結(jié)果 “學(xué)號 ” amp。rs(“student_id”)amp?！眀r” “姓名 ” amp。rs(“name”)amp?！眀r” “年齡 ” amp。rs(age”)amp。”br” “系別 ” amp。rs(“department”)amp?！眀r” …… %
外語相關(guān)推薦
鄂ICP備17016276號-1