CSDN首页 空间 新闻 论坛 Blog 下载 读书 网摘 搜索 .NET Java 视频 接项目 求职 在线学习 买书 程序员 通知
IBM Rational 系统开发最佳实践工具包 WebSphere MQ 最佳实践 TOP 15
CSDN社区
搜索 收藏 打印 关闭
CSDN社区 >  .NET技术 >  VB.NET

vb初学者

楼主cymandhxl(迷失中)2006-03-14 15:46:31 在 .NET技术 / VB.NET 提问

Public   Shared   Function   DeleteUserReportAuthorization(ByVal   index   As   Integer,   Optional   ByVal   trans   As   SqlTransaction   =   Nothing)   As   Integer  
                  Dim   retVal   As   Integer  
                  Dim   conPortal   As   SqlConnection  
                  Dim   sqlCmd   As   SqlCommand  
   
                  Dim   outerTrans   As   Boolean  
   
                  If   trans   Is   Nothing   Then  
                          outerTrans   =   False  
   
                          conPortal   =   New   SqlConnection(HerpData.ConnectionString(HerpSubSystems.HerpCM))  
                          sqlCmd   =   New   SqlCommand("UserReportAuthorizationsDeleteUserReportAuthorization",   conPortal)  
                  Else  
                          outerTrans   =   True  
   
                          conPortal   =   trans.Connection  
                          sqlCmd   =   New   SqlCommand("UserReportAuthorizationsDeleteUserReportAuthorization",   conPortal,   trans)  
                  End   If  
   
                  sqlCmd.CommandType   =   CommandType.StoredProcedure  
   
                  sqlCmd.Parameters.Add("@RETURN_VALUE",   SqlDbType.Int).Direction   =   ParameterDirection.ReturnValue  
   
                  sqlCmd.Parameters.Add("@ura_id",   index)  
   
                  If   conPortal.State   =   ConnectionState.Closed   Then  
                          conPortal.Open()  
                  End   If  
   
                  Try  
                          sqlCmd.ExecuteNonQuery()  
                  Catch   ex   As   Exception  
                          If   outerTrans   =   False   Then   conPortal.Close()  
                          Return   -1  
                  End   Try  
   
                  retVal   =   Fix(sqlCmd.Parameters("@RETURN_VALUE").Value)  
                  If   outerTrans   =   False   Then   conPortal.Close()  
                  Return   retVal  
          End   Function  
   
   
    Optional   ByVal   trans   As   SqlTransaction   =   Nothing)   As   Integer  
  这句是什么意思,为什么要加上事物来做为参数 问题点数:20、回复次数:4Top

1 楼yz1199(逃离孤独)回复于 2006-03-14 16:26:38 得分 5

这个表示可选参数,也就是在调用这个函数时,trans这个参数可以不传Top

2 楼ALong_Yue()回复于 2006-03-14 16:30:29 得分 5

同意楼上的回答。  
  在调用DeleteUserReportAuthorization的时候,如果不给trans传值,会使用默认值NOTHING。Top

3 楼zhouxiaotan(夜雨悠扬)回复于 2006-03-14 17:45:31 得分 5

Optional   是可选参数  
  这个东西的意思应该是如果外边有数据库连接并且打开事务的时候,为了在函数里面也可以访问数据库而作的Top

4 楼copico(北北)回复于 2006-03-15 11:22:39 得分 5

Optional   关键字指示在调用过程时可以省略过程参数。Top

相关问题

  • VB!
  • vb
  • vb!
  • vb
  • sql vb
  • VB & COM1
  • VB Bug
  • Delphi and VB
  • API for VB
  • VB+SQL

关键词

  • conportal
  • outertrans
  • sqlcmd
  • 参数
  • trans
  • 调用
  • retval
  • nothing
  • sqlcommand
  • byval

得分解答快速导航

  • 帖主:cymandhxl
  • yz1199
  • ALong_Yue
  • zhouxiaotan
  • copico

相关链接

  • CSDN .NET频道
  • .NET类图书
  • C#类图书
  • .NET类源码下载

广告也精彩

反馈

请通过下述方式给我们反馈
反馈
提问
网站简介|广告服务|VIP资费标准|银行汇款帐号|网站地图|帮助|联系方式|诚聘英才|English|问题报告
北京创新乐知广告有限公司 版权所有, 京 ICP 证 070598 号
世纪乐知(北京)网络技术有限公司 提供技术支持
Copyright © 2000-2008, CSDN.NET, All Rights Reserved
GongshangLogo