目前管理信息系統已從傳統的客戶機/服務器(C/S)模式轉向了浏覽器/服務器(B/S)模式,特別是微軟公司推出它的新產品ASP語言之後,這種轉變更加迅猛。管理信息系統的核心是對數據庫進行包括添加、修改和查詢等等操作,ASP提供的ADO數據庫接口控件,使得程序員再也勿需編寫復雜的CGI程序了,而只要用幾句簡單的語句即可實現以上操作。1、系統環境
PII 350,Ram 64M,WINNT Server 4.0,
Service Pack4, IIS 4.0, SQL Server7.0。
2、系統功能
通過使用IE浏覽器,在網上實現對《辦公文件》數據表記錄的添加和查詢。
3、功能實現
(1)數據表的設置
①啟動SQL Server7.0的Enterprise Manager,
在Databases 目錄下增加一個新子目錄"test";
②在"test"下增加一個new table,名為"辦公文件",字段設置:文件名,char,100,允許空;文件內容,char,4000,允許空。
③在SQL Server中增加一個用戶,名為hxl, 密碼為123,登錄模式為SQL 登錄,將其默認登錄數據庫設為"test";
④在"test"數據庫下增加一個新用戶,名為hxl,其角色設為"Dbowner"。
(2)ODBC 鏈接
①在控制面板中,打開ODBC數據源,選擇系統DSN項,單擊"添加";
②選擇"SQL Server"數據源,命名為"test";
③選擇登錄模式為SQL Server驗證,登錄標志為"hxl",密碼為"123";
④將默認數據庫高為"test",再測試數據庫鏈接,接通即可。
(3)程序文件
為了實現系統功能,在這裡編輯了3個程序文件,分別為"index.html"、"add.asp"和"query.asp",具體內容如下:
①index.html:系統首頁,包括兩個選項,一是追加記錄,二是查詢,用戶可單擊兩者之一,即可進入相應的操作過程。以下是源程序:
< html > < head > < meta http-equiv="Content-Language" content="zh-cn" > < meta http-equiv="Content-Type" content="text/html; charset=gb2312" > < meta name="GENERATOR" content="Microsoft FrontPage 4.0" > < meta name="ProgId" content="FrontPage .Editor.Document" > < title >示例程序< /title > < /head > < body > < p align="center" > < font size="5" color="#008000" > 歡迎使用用ASP語言對SQL SERVER數據庫操作示例< /font >< /P > < p align="center" > < /P > < p align="center" >< a href="add.asp" > 追加記錄< /a >< /p > < p align="center" >< a href="query.asp" > 查 詢< /a >< /p > < /body > < /html >
②add.asp:實現對《辦公文件》數據表記錄的添加。頁面中含有一個單行文本框(Txtbiaoti)和一個滾動文本框(Txtneirong),分別用來輸入文件標題和文件內容。此外,頁面中還應有兩個按鈕,"確定(Cmdok)"和"重寫(Cmdcancel)",單擊"確定"完成記錄追加,單擊"重寫"重新輸入內容。以下是源程序:
< html > < head > < meta http-equiv="Content-Type" content="text/html; charset=gb2312" > < meta name="GENERATOR" content= "Microsoft FrontPage 4.0" > < meta name="ProgId" content= "FrontPage.Editor.Document" > < title >追加一條新記錄< /title > < /head > < body > < % if request.form("cmdok")="確定" then % > < % set dbconnection=server.createobject ("adodb.connection") dbconnection.open"test","hxl","123" sqlquery="insert "辦公文件" (文件名,文件內容) values ('request.form("Txtbiaoti")',' request.form("Txtneirong")') set recadd=dbconnection.execute(sqlquery) % > < % else % > < p align="center" >追加記錄< /p > < form method="POST" action="" > < p >文件名:< input type="text" name="Txtbiaoti" size="20" >< /p > < p >文件內容:< /p > < p > < textarea rows="3" name="Txtneirong" cols="60" >< /textarea > < /p > < p align="center" >< input type="submit" value="確定" name="Cmdok" > < input type="reset" value="重寫" name="Cmdcancel" > < /p >< /form > < % end if% > < /body > < /html >
③query.asp:實現對《辦公文件》數據表記錄的查詢。程序僅實現對《辦公文件》中"文件名"的查詢,查詢結果用一個表單(Table)列出。以下是源程序:
< html > < head > < meta http-equiv="Content-Type" content="text/html;charset=gb2312" > < meta name="GENERATOR" content="Microsoft FrontPage 4.0" > < meta name="ProgId" content= "FrontPage.Editor.Document" > < title >檢索文件< /title > < /head > < body bgcolor="#ffffdd" > < % set dbconnection=server.createobject ("adodb.connection") dbconnection.open "test","hxl","123" sqlquery="SELECT 文件名 FROM 辦公文件 " set resultlist=dbconnection.execute(sqlquery) % > < center > < font color="red" >< %=request("selectsource")% > < /font >< font color="#008000" size="5" >< b > 有以下文件可供閱覽< /b >< /font > < hr size="5" > < table border="1" > < tr > < td width="200" align="center" > < b > 文件名 < /b > < /td > < /tr > < % do while not resultlist.eof % > < tr > < td valign=center width="200" >< %=resultlist ("文件名")% >< /a >< /td > < /tr > < % resultlist.movenext loop resultlist.close % > < /center > < /TABLE > < /body > < /html >
總結
用IE打開index.html或將文件發布到站點,進行相應的操作,即可實現對SQL Server數據庫系統中《辦公文件》數據表記錄的追加和查詢,至此系統目標已經達到。
以上就是用ASP語言實現對SQL SERVER 數據庫的操作,希望獲得更多這方面內容的童鞋可以閱讀相關文章。