日本国产亚洲-日本国产一区-日本国产一区二区三区-日本韩国欧美一区-日本韩国欧美在线-日本韩国欧美在线观看

當(dāng)前位置:雨林木風(fēng)下載站 > 技術(shù)開發(fā)教程 > 詳細(xì)頁面

手把手教你運(yùn)用VB來創(chuàng)建ASP組件(7) 

手把手教你運(yùn)用VB來創(chuàng)建ASP組件(7) 

更新時(shí)間:2022-05-14 文章作者:未知 信息來源:網(wǎng)絡(luò) 閱讀次數(shù):

(2)DeleteCdInformation.asp程序

  點(diǎn)擊每條信息后的刪除鍵就會(huì)從表中把該條信息刪除,它也調(diào)用了我們剛剛注冊的組件。限于篇幅,我只把最重要的幾行代碼寫出:

〈%

Dim CD_Info

Set CD_Info =Server.CreateObject(“CD.CD_Handle”)

CD_Info.Delete Request.QueryString(“ID”)

%〉

(3)AddCDInformation.html

  本程序是一個(gè)純HTML文本,只出現(xiàn)一個(gè)表單,讓你填寫新的CD信息,然后再發(fā)給InsertintoDB.asp來加入數(shù)據(jù)庫。

〈html〉

〈head〉

〈meta http-equiv="Content-Language" content="zh-cn"〉

〈meta http-equiv="Content-Type" content="text/html; charset=gb2312"〉

〈title〉請您添加一條CD信息〈/title〉

〈/head〉

〈body〉

〈form method="POST" action="InsertintoDB.asp"〉

〈p〉 〈/p〉

〈p〉  請您添加一條CD信息〈/p〉

〈table border="1" cellspacing="1" width="34%" height="109"〉

〈tr〉

〈td width="24%" height="16"〉

〈p align="center"〉CD號(hào)〈/td〉

〈td width="76%" height="16"〉〈input type="text" name="ID" size="24"〉〈/td〉

〈/tr〉

〈tr〉

〈td width="24%" height="16"〉

〈p align="center"〉CD名〈/td〉

〈td width="76%" height="16"〉〈input type="text" name="Name" size="24"〉〈/td〉

〈/tr〉

〈tr〉

〈td width="24%" height="16"〉

〈p align="center"〉作者〈/td〉

〈td width="76%" height="16"〉〈input type="text" name="Author" size="24"〉〈/td〉

〈/tr〉

〈tr〉

〈td width="24%" height="16"〉

〈p align="center"〉價(jià)格〈/td〉

〈td width="76%" height="16"〉〈input type="text" name="Price" size="24"〉〈/td〉

〈/tr〉

〈tr〉

〈td width="24%" height="95"〉

〈p align="center"〉簡介〈/p〉

〈p〉 〈/td〉

〈td width="76%" height="95" valign="top"〉〈textarea rows="4" name="Information" cols="22"〉〈/textarea〉〈/td〉

〈/tr〉

〈tr〉

〈td width="100%" height="15" colspan="2"〉

〈p align="center"〉〈input type="submit" value="提交" name="B1"〉〈input type="reset" value="取消" name="B2"〉〈/td〉

〈/tr〉

〈/table〉

〈/form〉

〈p〉   〈/p〉

〈/body〉

〈/html〉

(4)InsertIntoDB.asp程序,用到了組件中Add方法

〈HTML〉

〈HEAD〉

〈TITLE〉〈/TITLE〉

〈/HEAD〉

〈BODY〉

〈%DIM Insert_CD

set Insert_CD =Server.CreateObject("CD.CD_Handle")

Insert_CD.Add request.form("ID"),request.form ("Name"),request.form("Author"),request.form("Price"),request.form("Information")

%〉

〈p〉您已成功的加入一條書目〈/p〉

〈form name="A" Method="POST" Action="ListCdInformation.asp"〉

〈input type="SUBMIT" Value="返回" name="B1"〉

〈/form〉

〈/body〉

〈/html〉

六、總結(jié)

  上面我簡要的介紹了組件的定義以及使用VB來編寫ASP中組件的方法,其實(shí)上面所舉的例子只是很粗淺的例子,相信大家寫出的程序一定會(huì)比我的更好,我想如果有機(jī)會(huì)的話,我還會(huì)謝謝如何使用VC++和Java來編寫COM組件,因?yàn)槲矣X得,如果你沒有掌握COM組件,你也就沒有掌握ASP的精髓。

溫馨提示:喜歡本站的話,請收藏一下本站!

本類教程下載

系統(tǒng)下載排行

主站蜘蛛池模板: 高清视频在线播放ww | 日本免费网站 | 国产aⅴ一区二区三区 | 亚洲精品一区在线观看 | 久久国产成人午夜aⅴ影院 久久国产精品免费一区二区三区 | 国产精品视_精品国产免费 国产精品视频999 | 欧美四虎影院 | 欧美国产日韩一区二区三区 | 欧美日韩高清观看一区二区 | 国产专区视频在线观看 | 欧美在线亚洲 | 欧美不卡一区二区三区 | 国产亚洲欧美在线观看的 | 久久五月女厕所一区二区 | 日本高清免费观看 | 毛片高清一区二区三区 | 久久久久久国产精品免费免 | 色综合欧美 | 久久精品国产大片免费观看 | 欧美日韩在线精品成人综合网 | xvsr-365波多野结衣 | 在线看日韩 | 天天槽天天槽天天槽 | 9l国产精品久久久久麻豆 | 狠狠色丁香久久婷婷综 | 99久久影院| 午夜国产精品久久久久 | 国产v在线 | 国产99热久久这里有精品97 | 免费在线视频日本 | 国产精品九九免费视频 | 性殴美| 亚洲乱亚洲23p女 | 欧美日韩精彩视频 | 男女扒开双腿猛进入免费网站 | 欧美视频在线观看免费 | 中文字幕15页 | 午夜影视在线观看免费完整高清大全 | 欧美精品做人一级爱免费 | 欧美日韩视频二区三区 | 成年午夜视频免费观看视频 |