第13講應(yīng)用系統(tǒng)開(kāi)發(fā)-資料下載頁(yè)
2025-08-23 09:20本頁(yè)面
【導(dǎo)讀】如何開(kāi)發(fā)一個(gè)MIS系統(tǒng)？在Delphi集成開(kāi)發(fā)環(huán)境中通過(guò)菜單命令。控件ADOConnection1放在表單上。如圖16-1-1所示，在屬性窗口中單擊。ConnectionString旁的“”按鈕。出現(xiàn)圖16-1-2所示對(duì)話(huà)框。入服務(wù)器名稱(chēng)”中輸入“”。選中“使用指定的用戶(hù)名稱(chēng)和密碼”。在用戶(hù)名稱(chēng)中輸入“sa”，密碼中輸入相應(yīng)的密。選中“允許保存密碼”。在“在服務(wù)器上選擇數(shù)據(jù)庫(kù)”下拉列表中選。擇數(shù)據(jù)庫(kù)“Xk”。單擊“測(cè)試連接”，測(cè)試成功后單擊。單擊“確定”按鈕，再單擊“OK”按鈕。的“Connection”屬性為“AdoConnection1”，設(shè)置DataSource1的DataSet屬性為ADOTable1。在組件頁(yè)上選擇控。雙擊Button1按鈕，在OnClick事件中添。在工具欄上單擊“”運(yùn)行按鈕，運(yùn)行后?！P(guān)閉所有文件。單擊“”，工程名為“PXk”?！啊?，對(duì)象名為“ASPObjectXk”。ApplicationName編輯框中輸入“Xk”，在組件服務(wù)對(duì)話(huà)框中依次展開(kāi)“組件服。應(yīng)用程序”、“Xk”、“組件”。
【正文】 ? （ 4）在 Delphi集成開(kāi)發(fā)環(huán)境中通過(guò)菜單命令【 File】 → 【 New】 → 【 Other】 ，選擇 ActiveX頁(yè)，選中 Active Server Object，如圖 1622所示。 ? （ 5）單擊“ OK”按鈕，出現(xiàn)如圖 1623所示對(duì)話(huà)框，設(shè)置如下屬性： CoClass Name： ASPObjectXk Threading Model:Netural Instancing:Multiple Instance Active Server Type:Object Context 基于SQL Server的動(dòng)態(tài)WEB開(kāi)發(fā)實(shí)例 ? （ 1）在 Delphi集成開(kāi)發(fā)環(huán)境中通過(guò)菜單命令【 File】 → 【 Close All】 關(guān)閉所有文件。 ? （ 2）在 Delphi集成開(kāi)發(fā)環(huán)境中通過(guò)菜單命令【 File】 → 【 New】 → 【 Other】 ，選擇 ActiveX頁(yè)，選中 ActiveX Library，如圖 1621所示，單擊 【 OK】 建立一個(gè) ActiveX DLL。 ? （ 3）單擊“”（ Save All），工程名為“ PXk”。 ? （ 4）在 Delphi集成開(kāi)發(fā)環(huán)境中通過(guò)菜單命令【 File】 → 【 New】 → 【 Other】 ，選擇 ActiveX頁(yè)，選中 Active Server Object，如圖 1622所示。 ? （ 5）單擊“ OK”按鈕，出現(xiàn)如圖 1623所示對(duì)話(huà)框，設(shè)置如下屬性： CoClass Name： ASPObjectXk Threading Model:Netural Instancing:Multiple Instance Active Server Type:Object Context 總結(jié) ?本章講述了如何在 Delphi中使用表、視圖、存儲(chǔ)過(guò)程，以及如何創(chuàng)建 ASP對(duì)象，然后在A(yíng)SP腳本中調(diào)用 ASP對(duì)象的方法創(chuàng)建動(dòng)態(tài)網(wǎng)頁(yè)。應(yīng)在理解示例的基礎(chǔ)上在實(shí)際中靈活運(yùn)用。
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1