vb中vb 调用sub过程过程的vb 调用sub过程顺序

vb中如何获得调用过程名
[问题点数:30分,结帖人slowgrace]
vb中如何获得调用过程名
[问题点数:30分,结帖人slowgrace]
不显示删除回复
显示所有回复
显示星级回复
显示得分回复
只显示楼主
2009年4月 VB大版内专家分月排行榜第三2007年10月 VB大版内专家分月排行榜第三
2009年4月 VB大版内专家分月排行榜第三2007年10月 VB大版内专家分月排行榜第三
2010年2月 VB大版内专家分月排行榜第二2009年5月 VB大版内专家分月排行榜第二2009年4月 VB大版内专家分月排行榜第二2009年2月 VB大版内专家分月排行榜第二2009年1月 VB大版内专家分月排行榜第二
2010年1月 VB大版内专家分月排行榜第三2009年6月 VB大版内专家分月排行榜第三2008年12月 VB大版内专家分月排行榜第三2008年10月 VB大版内专家分月排行榜第三
2007年9月 VB大版内专家分月排行榜第二
2008年3月 VB大版内专家分月排行榜第三2007年8月 VB大版内专家分月排行榜第三
2006年6月 VB大版内专家分月排行榜第一
2006年5月 VB大版内专家分月排行榜第三2005年9月 VB大版内专家分月排行榜第三
2006年6月 VB大版内专家分月排行榜第一
2006年5月 VB大版内专家分月排行榜第三2005年9月 VB大版内专家分月排行榜第三
2006年6月 VB大版内专家分月排行榜第一
2006年5月 VB大版内专家分月排行榜第三2005年9月 VB大版内专家分月排行榜第三
本帖子已过去太久远了,不再提供回复功能。VB中通用过程是怎么调用的?_百度知道vb6.0调用存储过程
&&&&&&&&&&&&Dim&strS&As&String&&#39定义一变量&&&&&&&&&&&&Dim&adoconn&As&New&ADODB.Connection&&#39Connection&对象代表了打开与数据源的连接。&&&&&&&&&&&&Dim&adocomm&As&New&mand&&#39Command&对象定义了将对数据源执行的指定命令。&&&&&&&&&&&&&&&&&&&&&&&&Dim&ReturnValue&As&Integer&&#39调用存储过程的返回值&&&&&&&&&&&&adoconn.ConnectionString&=&Adodc1.ConnectionString&&#39Adodc1为窗体中的ADO控件,并已成功连接数据库&&&&&&&&&&&&&&&&&&&&&&&&adoconn.Open&&&&&&&&&&&&Set&adocomm.ActiveConnection&=&adoconn&&#39指示指定的&Command对象当前所属的&Connection对象。&&&&&&&&&&&&mandText&=&&xxk_rk&&&#39设置Command对象源。&&&&&&&&&&&&mandType&=&adCmdStoredProc&&#39通知提供者CommandText属性有什么,它可能包括Command对象的源类型。设置这个属性优化了该命令的执行。&&&&&&&&&&&&adocomm.Parameters(1)&=&Text1.Text&&&&&&&&&&&&adocomm.Parameters(2)&=&Text2.Text&&&#39OutputParameters可以为任意的字符串或数字&&&&&&&&&&&&adocomm.Parameters(3)&=&Text3.Text&&&&&&&&&&&&adocomm.Parameters(4)&=&Text4.Text&&#39OutputParameters可以为任意的字符串或数字&&&&&&&&&&&&adocomm.Parameters(5)&=&Text1.Text&&&&&&&&&&&&adocomm.Parameters(6)&=&Asc(Text5.Text)&&&#39OutputParameters可以为任意的字符串或数字&&&&&&&&&&&&adocomm.Parameters(7)&=&Format(Trim(DTPicker1.Value),&&yyyy-mm-dd&)&&#39//字符如何转日期???&&&&&&&&&&&&adocomm.Parameters(8)&=&Asc(Text8.Text)&&&#39OutputParameters可以为任意的字符串或数字&&&&&&&&&&&&adocomm.Parameters(9)&=&Asc(Text7.Text)&&&&&&&&&&&&adocomm.Execute&&&&&&&&&&&&&&&&&&&&&&&&&Adodc1.Refresh&&&&&&&&&&&&&#39ReturnValue&=&adocomm.Parameters(0)&&#39存储过程的返回值,返回0则成功执行。&&&&&&&&&&&&&#39strS&=&adocomm.Parameters(2)&&#39把存储过程的输出参数的值赋给变量strS
&&最后修改于
请各位遵纪守法并注意语言文明VB.NET如何得到调用当前过程的方法名称和类名称
VB.NET如何得到调用当前过程的方法名称和类名称:
&&&&&& 本文讲述VB.NET(VB 2008, VB 2005) 如何得到调用当前过程的方法名称(Calling method)和类(Calling Class) 的名称。
主要用到 System.Diagnostics.StackTrace 和 System.Diagnostics.StackFrame,以及 StackFrame的方法:GetFileName,GetFileLineNumber,GetMethod.Name, GetMethod.ReflectedType.Name。
如下面示例代码所示,我们有两个类:Class1 和 Class2 ,Class1 的有一个方法(method)叫 LoadXmlFile调用 Class2 的 WriteToFile 方法。
Imports System.Xml
Public Class Class1
Public Sub LoadXmlFile()
Dim filePath As String = &C:\a.xml&
Dim xdoc As New Xml.XmlDocument
xdoc.Load(filePath)
Catch ex As Exception
Dim log As New Class2
log.WriteToFile(&Error. Load XML File failed&)
Imports System.Diagnostics
Public Class Class2
Public Sub WriteToFile(ByVal Log As String)
Dim clsName As String = &&
Dim mtdName As String = &&
Dim lnNo As String = &&
Dim codeFilePath As String = &&
Dim st As New StackTrace(True)
If st.FrameCount & 1 Then
Dim sf As StackFrame = st.GetFrame(1)
mtdName = sf.GetMethod.Name
Debug.WriteLine(mtdName)
clsName = sf.GetMethod.ReflectedType.Name
Debug.WriteLine(clsName)
lnNo = sf.GetFileLineNumber.ToString
Debug.WriteLine(lnNo)
codeFilePath = sf.GetFileName
Debug.WriteLine(codeFilePath)
在 Class2里面,我们写了一些代码得到调用它的 Class1的名称,所在文件路径,调用方法的名称,以及调用文件里执行调用的行数。
1. 要 Imports System.Diagnostics。
2. 要用到 StackTrace (System.Diagnostics.StackTrace) 和 StackFrame (System.Diagnostics.StackFrame)。
3. 要用到 StackTrace.GetFrame(1)。
4. StackFrame.GetMethod.Name 得到调用当前过程的方法 (calling method name)。
5. StackFrame.GetMethod.ReflectedType.Name 得到调用当前过程的类的名称 (calling class name)。
6. StackFrame.GetFileLineNumber.ToString 得到调用当前过程的语句在文件里的行数。
7. StackFrame.GetFileName 得到调用当前过程的文件路径。
阅读本文后您有什么感想? 已有
人给出评价!
12-06-0111-09-0611-09-0411-07-0811-05-2411-03-0711-02-2711-01-21
注:您的评论需要经过审核才会显示出来
没有查询到任何记录。
Copyright &
PC6下载().All Rights Reserved
备案编号:湘ICP备号

我要回帖

更多关于 vb调用sql存储过程 的文章

 

随机推荐