ASP.NET高级教程—基类设计

首页 >> 网络编程 >> ASP.NET >> ASP.NET实例 >> 新闻正文

ASP.NET高级教程—基类设计

文章作者：
责任编辑：rosan　录入时间：2007-6-15 9:14:24 来源：
频道声明：本频道的文章除部分特别声明禁止转载的专稿外，可以自由转载.但请务必注明出出处和原始作者文章版权归本频道与文章作者所有.对于被频道转载文章的个人和网站,我们表示深深的谢意.

百特科技[http://www.PCbyte.cn]专业的空间、主机提供商，域名注册绝对优惠！

先说明一下我使用的命名空间的想法，我是把前后台共同的类的命名就空间命名成了 CjjerBase ，只是前台的 CJJERGUESTBOOK，后台的是 BookAdminSpace ，基本达到表意，使用不同的命名空间还是考虑到.net加载信息的优化性，不再赘言。

设计与数据库交互的基类： conn类

代码拷贝框
option explicit 'option strict Imports System Imports System.Data Imports System.Data.OleDb Imports System.web 'Imports System.Xml namespace CJJERGUESTBOOK Public Class conn Private connstr as String Private conn as oledbconnection Public Sub new() connstr = System.Configuration.ConfigurationSettings.Appsettings("acconnectionstring").tostring.Trim 'connstr= configurationSettings.appsettings("acconnectionstring") connstr = " Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & connstr conn = new oledbconnection(connstr) End Sub '获取数据源 'writeonly Public property constr() as String Set connstr = value End Set Get return connstr End Get End property '显示打开connection对象 Public Sub open() try conn.open() catch objerror as Exception 'HttpContext.Current.Response.Write("<font color =red>Conn类异常:</font>" & objerror.Message & ":" & objerror.source) Exit sub End try End Sub '显示关闭connection链接 Public Sub close() conn.close() End Sub '返回一个datareader对象，输入的是sql语句 Public Function GetDataReader (strsql as String ) as oledbdatareader Dim objdatareader as oledbdatareader Dim objcommand as new oledbcommand(strsql,conn) try open() objdatareader = objcommand.executereader() catch close() Exit Function finally End try return objdatareader ' objcommand.executereader(CommandBehavior.CloseConnection) ' close() End Function '返回 OledbCommand 对象 public function OledbCommand(str as string) as OledbCommand Dim objcmd as new OleDbCommand(str,conn) open() return objcmd End function '返回 OledbCommand->ExecuteNonquery Public Function ExecuteNonquery(objcmd as OledbCommand) as Integer Dim xint as integer try open() xint = objcmd.ExecuteNonquery() catch objerror as Exception HttpContext.Current.Response.Write("<font color =red>Conn类异常:</font>" & objerror.Message & ":" & objerror.source) close() finally close() End try Return xint End Function '返回 OledbCommand->ExecuteNonquery Public Function ExecuteNonquery(str as string) as Integer Dim xint as integer = 2 try Dim objcmd as new OleDbCommand(str,conn) open() xint = objcmd.ExecuteNonquery() catch objerror as Exception HttpContext.Current.Response.Write("<font color =red>Conn类异常:</font>" & objerror.Message & ":" & objerror.source & "<hr/>" & str) exit Function close() finally close() End try Return xint End Function '返回一个聚集的值 Public Function ExecuteScalar(str as string) as Integer Dim xint as integer = 2 try Dim objcmd as new OleDbCommand(str,conn) open() xint = ctype(objcmd.ExecuteScalar(),integer) catch close() finally close() End try Return xint End Function '返回dataset对象 Public Function GetDataSet(str as String ,optional refstr as string = "data" ) as DataSet Dim objDataSet as new DataSet() try open() Dim objdataadapter as new oledbdataadapter(str,conn) objdataadapter.fill(objDataSet,refstr) catch HttpContext.Current.Response.Write("SQL 语句出错") finally close() End try return objDataSet End Function '这个函数用于检测第一条数据中的第一个值 ' Function GetFirstInRow( sql as string) as string Dim objdatareader as OleDbDataReader Dim objcommand as new oledbcommand(sql,conn) try open() objdatareader = objcommand.executereader() catch objerror as Exception HttpContext.Current.Response.Write("<font color =red>Conn类异常:</font>" & objerror.Message & ":" & objerror.source) close() HttpCont<p>此新闻共有<font color=red><b>3</font></b>页上一页 <a href=91511.html>1</a> <a href=91511-2.html>2</a> <a href=91511-3.html>3</a> 下一页</TD></TR></TBODY></TABLE> <TABLE height=15 cellSpacing=0 cellPadding=0 width="100%" border=0> <TBODY> <TR> <TD class=titleNewsRemark height=15> <script type="text/javascript"></script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script> </TD> </TR> </TBODY> </TABLE> </DIV> <TABLE class=pageSpaceNewsSeparator cellSpacing=0 cellPadding=1 width="100%" border=0> <TBODY> <TR> <TD width="71%" height=24><a href=/sendmail.asp?filename=91511 target=_blank class=a01>推荐好友</a> <SPAN class=pageIcon>| <a href=/member/add_favorite.asp?filename=91511 target=_blank class=a01>频道收藏</a> | <A class=a01 onclick=javascript:doPrint() href="">打印文档</A> | <a href=/senderror.asp?filename=91511 target=_blank class=a01>报告错误</a> </SPAN></TD> <TD align=right width="29%">　<A href="javascript:window.close()"><IMG height=15 src="http://www.channel7.cn/image/close.gif" width=48 border=0></A><A href="http://www.channel7.cn/admin/Templet_textbox.asp?action=Modify&ID=3#top"><IMG height=15 src="http://www.channel7.cn/image/top.gif" width=38 border=0></A></TD></TR></TBODY></TABLE> <TABLE height=117 cellSpacing=2 cellPadding=0 width="100%" border=0> <TBODY> <TR> <TD class=titleNewsRemark id=fontzoom vAlign=top width="56%" height=40> <TABLE cellSpacing=0 cellPadding=5 width="100%" border=0> <TBODY> <TR> <TD class=titleListNews><STRONG>相关连接</STRONG></TD></TR> <TR> <TD>·<a href= http://www.channel7.cn/2007/6-15/91818.html target=_blank>[.net]windows控件实现水印</a><br>·<a href= http://www.channel7.cn/2007/6-15/91640.html target=_blank>ASP.NET高级教程—显示留言，分页</a><br>·<a href= http://www.channel7.cn/2007/6-15/91555.html target=_blank>ASP.NET高级教程—用户控件设计</a><br>·<a href= http://www.channel7.cn/2007/6-15/91511.html target=_blank>ASP.NET高级教程—基类设计</a><br>·<a href= http://www.channel7.cn/2007/6-15/9140.html target=_blank>ASP.NET高级教程—程序之规划篇</a><br>·<a href= http://www.channel7.cn/2007/6-15/91312.html target=_blank>ASP.NET高级教程—实战篇</a><br>·<a href= http://www.channel7.cn/2006/9-12/16562.html target=_blank>ASP.NET2.0里的配置接口API</a><br>·<a href= http://www.channel7.cn/2006/9-10/212433.html target=_blank>根据身份证判断性别和生日</a><br></TD></TR></TBODY></TABLE></TD> <TD class=titleNewsRemark id=fontzoom vAlign=top width="44%"> <TABLE cellSpacing=0 cellPadding=5 width="100%" border=0> <TBODY> <TR> <TD class=titleListNews><STRONG>同一专题</STRONG></TD></TR> <TR> <TD>·无相关专题</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE> <TABLE class=titleNewsRemark cellSpacing=0 cellPadding=1 width="100%" border=0> <TBODY> <TR> <TD class=pageSpaceNewsSeparator width="56%" height=26><SPAN class=style1><FONT color=#ff6347>■<STRONG>发表评论</STRONG></FONT></SPAN></TD> <TD align=left width="44%" rowSpan=2><SPAN class=titleNewsRemark><FONT color=#f26c4f>版权声明：</FONT>除部分特别声明不要转载，或者授权我站独家播发的文章外，大家可以自由转载我站点的原创文章，但原作者和来自我站的链接必须保留（非我站原创的，按照原来自一节，自行链接）。文章版权归我站和作者共有<BR><FONT color=#f26c4f>转载</FONT></SPAN><SPAN style="BACKGROUND-COLOR: #f9f9f9" #invalid_attr_id="16px"><FONT color=#f26c4f>要求</FONT></SPAN><SPAN class=titleNewsRemark><FONT color=#f26c4f>：</FONT>转载之图片、文件，链接请不要盗链到本站，且不准打上各自站点的水印，亦不能抹去我站点水印。</SPAN></TD></TR> <TR> <TD height=118><SPAN class=style2><form method=post action=http://www.channel7.cn/add_review.asp><input type=hidden Name=FileName value=91511>共有评论<font color=red><script src=http://www.channel7.cn/reviewcount.asp?filename=91511></script></font>篇 <a href=91511.asp>查看评论</a><br>姓名：<input type=text name=Name><input type=submit name=Submit value=发表评论><br><textarea name=Content cols=30 rows=4 title=不支持HTML，支持UBB代码>