六月婷婷综合激情-六月婷婷综合-六月婷婷在线观看-六月婷婷在线-亚洲黄色在线网站-亚洲黄色在线观看网站

明輝手游網(wǎng)中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

ASP通用數(shù)據(jù)庫顯示編輯程序

[摘要]引言:]我是雖然半路出家經(jīng)作了幾年的程序,但不知自己是否算是一個程序員。我最近幫朋友作一個網(wǎng)站,為了空間的便宜,選用了ASP+ACCESS的服務器。由于本人對ASP知道很少,所以實在做得有點累,特別是后臺數(shù)據(jù)庫的管理,有一大堆的表需要我日常維護。我發(fā)現(xiàn),對于后臺數(shù)據(jù)管理,基本上對數(shù)據(jù)庫進行增刪改查...

引言:]我是雖然半路出家經(jīng)作了幾年的程序,但不知自己是否算是一個程序員。我最近幫朋友作一個網(wǎng)站,為了空間的便宜,選用了ASP+ACCESS的服務器。由于本人對ASP知道很少,所以實在做得有點累,特別是后臺數(shù)據(jù)庫的管理,有一大堆的表需要我日常維護。我發(fā)現(xiàn),對于后臺數(shù)據(jù)管理,基本上對數(shù)據(jù)庫進行增刪改查的的操作,我一個表一個表的寫同樣的操作,真的無法忍受。上網(wǎng)查了查,還真有通用的數(shù)據(jù)顯示程序,可惜沒有數(shù)據(jù)編輯功能。于是有了自己寫一個通用的功能的想法。下面是我參考網(wǎng)友*后的實現(xiàn)。
[設計目標:]
1、數(shù)據(jù)庫顯示,編輯,增加,修改,且可以由用戶定義選用。
2、顯示的字段列可以用戶定義(顯示名稱可自定義)
3、頁面的顯示格式以由用戶定義,這包括每頁記錄數(shù),頁腳,列寬,表格的樣式(配置了格式控制CSS文件)
4、組件的界面,支持多語言(chinese,eng,...),可惜還未有時間實現(xiàn),現(xiàn)為中文。
5、支持多表聯(lián)合查詢
[缺限:]
調(diào)用參數(shù)復雜,需要文檔支持,多表聯(lián)合查詢別名有限制。

[使用示例:]
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="./style_cn.css" type=text/css rel=stylesheet>

<title>通用數(shù)據(jù)庫顯示程序</title>

</head>
<body bgcolor="#66cccc">
<%
'多個字段用數(shù)組表示
'DSN連接寫法
'sConn = "DSN=<數(shù)據(jù)庫名>;UID=<DSN賬號>;PWD=<密碼>"
'使用物理路徑連接Access數(shù)據(jù)庫寫法
'sConn = "DBQ=" & Server.MapPath("<Access數(shù)據(jù)庫文件的當前文件相對路徑>") & ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
'連接SQLServer寫法
'sConn = "Provider=SQLOLEDB;Persist Security Info=False;UID=<用戶名>;PWD=<密碼>;Initial Catalog=<SQLServer數(shù)據(jù)庫名>;Data Source=<數(shù)據(jù)服務器IP>"

Dim sConn, sTableName, sHidden, sDisplay, sQuery, sOrder, iTop, iPageSize,sEditCols,sKey,sRelation,sColWidth
sConn = "DBQ=" & Server.MapPath("sample.MDB") & ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

'sTableName = "客戶"
'sDisplay = "聯(lián)系人姓名 聯(lián)系人 <a href=""view.asp?CustomerID=$客戶ID$"">$聯(lián)系人姓名$</a>, 公司名稱 公司, 聯(lián)系人頭銜 稱謂, 地址, 城市"
'sHidden = "客戶ID"
'sQuery = "聯(lián)系人姓名 聯(lián)系人, 公司名稱 公司, 聯(lián)系人頭銜 稱謂 , 城市"
'sOrder = "客戶ID"
'iTop = 300
'iPageSize = 2
'sEditCols="0,1,1,1,1"'0-not edit ,1-edit
'sKey="客戶(客戶ID);"
'sRelation=""


sTableName = "Customer,myOrder"
sDisplay = "myOrder.custid 客戶ID <a href=""view.asp?CustomerID=myOrder.custid$"">$CustName$</a>, lineid 行號,product 產(chǎn)品,qty 數(shù)量,Amt 金額,dt 日期,linenotes 備注"
sHidden = "CustName"
sQuery = "myOrder.CustID 客戶ID, product 產(chǎn)品, dt 定單日期"
sOrder = "myOrder.lineID"
iTop = 300
iPageSize = 2
sEditCols="0,1,1,1,1,1,1"'0-not edit ,1-edit
sKey="myOrder(myOrder.custid,lineid);"
sRelation=" myOrder.custid=customer.custid "
sColWidth="20,40,60,60,60,60,60"

'DisplayTable sConn, sTableName, sHidden, sDisplay, sQuery, sOrder, iTop, iPageSize
dim objTable
Set objTable= New clsDispalyTable

'response.Write sConn & "<br>"
objTable.SetTablePara sConn, sTableName, sHidden, sDisplay, sQuery, sOrder,sRelation,sKey
objTable.SetEditPara sEditCols,"",sColWidth,True,True,True
objTable.SetPagePara 300,3
Response.write "<table border=0 align=center cellspacing=0 cellpadding=0><tr><td bgcolor=#6699cc>"
objTable.DisplayTable
Response.write "</td></tr><table>"

'pConn, pTableNames, pHidden, pDisplay, pQuery,pOrder,pRelation,pKeys)


%>

演示:http:www.qinych.com/caibing/test/test.asp


文章:<a >通用數(shù)據(jù)庫顯示程序文章</a><br>
示例asp程序:<a >http://www.xurui.com/mypaper/通用數(shù)據(jù)庫顯示程序/common.asp</a><br>
示例數(shù)據(jù)庫地址:<a >http://www.xurui.com/mypaper/通用數(shù)據(jù)庫顯示程序/sample.mdb</a>
</body>
</html>
[小結(jié):]雖然已經(jīng)完成了了大部分功能,但還有很多不完美的地言,肯請朋友提出意見。




主站蜘蛛池模板: 日韩视频在线观看 | 色射色| 日本最新中文字幕 | 亚洲高清毛片 | 天天干天天拍天天射 | 亚洲国产精品久久 | 永久免费mv网站入口 | 亚洲精品播放 | 天堂色区 | 欧美自拍视频在线 | 特黄十八岁大片 | 在线播放性xxx欧美 在线播放色 | 午夜手机福利 | 午夜性刺激在线观看视频 | 深爱婷婷网 | 一级毛片免费视频 | 天天操天天插天天射 | 亚洲成a v人片在线观看 | 四虎国产精品免费五月天 | 欧美丝袜一区二区三区 | 日韩欧美视频二区 | 五月婷婷深爱 | 日韩免费a级在线观看 | 日韩色区 | 青青国产成人久久91网站站 | 亚洲美女爱爱 | 欧美做真爱欧美观看免费 | 香蕉视频久久 | 日韩一区二区三区免费视频 | 青青草精品在线 | 视频二区国产 | 五月综合激情 | 青草免费免费观看视频在线 | 日本成人在线看 | 在线天堂最新版资源 | 婷婷综合缴情亚洲狠狠图片 | 亚洲无砖砖区免费 | 伊人久久天堂 | 欧美婷婷色 | 青青青在线视频免费观看 | 一级女性全黄久久生活片 |