精华内容
下载资源
问答
  • 本文给出VB.Net调用存储过程并得到返回值的代码。
  • VB6通过ADO连MySql数据库,调用带参数的存储过程
  • 主要内容是,自定义函数过程和子过程声明与调用的语法格式、参数含义及功能特性;三种参数传递方式(值传递、地址传递、数组传递)的应用;嵌套调用和递归调用的执行流程以及递归过程的特点
  • 主要介绍了VB.NET调用MySQL存储过程并获得返回值的方法,涉及基于VB.NET操作MySQL数据库的相关技巧,具有一定参考借鉴价值,需要的朋友可以参考下
  • VB6.0 调用存储过程的例子(方法一) rm1窗体,Copy以下的代码到窗体中,该段代码将测试存储过程ADOTestRPE的返回值、输入参数及输出参数,测试的过程中,可能需要修改链接字符串。
  • VB 调用 sql server 存储过程。文档
  • VB 6.0 数组参数调用实例:  Dim A1(), B1(), C1() '声明数组  Private Sub Form_Load()  Dim i As Integer '给数组赋初值  Show  A1 = Array(2, 4, 6, 8, 10) '用Array函数赋值  B1 = Array(1, 3, 5, 7, 9, ...
  • vb 调用存储过程

    千次阅读 2018-05-18 15:00:22
    通过Command对象的Parameters集合向所调用的存储过程传递参数,其中对象Parameters(0)为执行存储过程的返回值,返回值为0则执行存储过程成功; ’第三种方法 adocomm.Parameters(1) = "1"  adocomm.Parameters(2)...

    '第一种方法
    Dim conn As String
    Dim cn As New adodb.Connection
    Dim cm As New adodb.Command
    conn = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Stu"
    cn.ConnectionString = conn
    cn.Open
    cm.ActiveConnection = cn
    cm.CommandText = "vag" '存储过程名
    cm.CommandType = adCmdStoredProc
    cm.Parameters.Item("@Num").Value = "020301"  '输入参数的值
    cm.Execute
    MsgBox cm.Parameters.Item("@val").Value '存储过程式的返回值

    '第二种方法
    Set rs = cm.CreateParameter("Num", adChar, adParamInput, 6, "020301")
    cm.Parameters.Append rs
    Set rs = cm.CreateParameter("val", adChar, adParamOutput, 6)
    cm.Parameters.Append rs


    Dim ado as ADODC 
    ado.ConnectionString = "Provider=SQLOLEDB.1;Password=" & User_Pwd & ";Persist Security Info=True;User ID=" & User_Name & ";Initial Catalog=" & Data_Name & ";Data Source=" & server_name

    其中User-Pwd是用户密码;User_Name是用户名;Data_Name是数据库名;server_name是服务器名。

    连接数据库成功后就可以调用存储过程执行操作。


    通过Command对象的Parameters集合向所调用的存储过程传递参数,其中对象Parameters(0)为执行存储过程的返回值,返回值为0则执行存储过程成功;


    ’第三种方法
    adocomm.Parameters(1) = "1" 
    adocomm.Parameters(2) = "OutputParameters" 'OutputParameters可以为任意的字符串或数字 
    adocomm.Execute 
    ReturnValue = adocomm.Parameters(0) '存储过程的返回值,返回0则成功执行。 
    strS = adocomm.Parameters(2) '把存储过程的输出参数的值赋给变量strS 

    展开全文
  • 使用VB调用Oracle程序包内的存储过程返回结果集 使用VB调用Oracle程序包内的存储过程返回结果集
  • vb调用oracle存储过程

    2009-02-26 20:53:15
    vb调用oracle存储过程,及有一个存储过程实例
  • VB调用执行存储过程[参考].pdf
  • vb调用存储过程基本教程vb调用存储过程基本教程vb调用存储过程基本教程vb调用存储过程基本教程
  • 使用VB调用oracle数据库存储过程的研究.pdf
  • VB使用ScriptControl控件调用事件过程,以一个人力资源管理系统的界面为例进行演示,如何在VB环境下使用ScriptControl控件调用事件过程。将VB资源管理器中的字符串添加到菜单中,添加树状菜单等。 运行环境:...
  • VB 调用oracle 带返回值的存储过程 DEMO
  • VB调用SQL数据库中存储过程的方法.pdf
  • VB过程求组合数.rar

    2019-07-10 11:26:47
    VB过程求组合数,输入m和n,按等号键可得组合数,来看如下的简单代码:  Private Sub f(m As Integer, p As Long) '自定义通用过程,用于求阶乘  Dim i As Integer '声明局部变量  p = 1 '赋初值  For i = 1 ...
  • VB调用Word进行拼写检查的源码实例,并依靠自身统计单词和字符数量多少,显示统计结果,激活Word将Word变为可见,在拼写检查过程时,需要借助Word中的语法检查模块来进行,所以请确保你的电脑中安装有Word软件,最好...
  • 调用sp_addumpdevice过程时,发生这SP有返回值,度娘了一圈,很少有提出存储过程返回值如何在ADO Command中如何引用。 瞎写的代码,总是提示:@cntrltype未声明为OUTPUT,但形参还需要输出,等等。 但打开sp_...

    最近在给老程序(VB6+SQL2005+水晶报表)添加备份、恢复数据库功能。真心是手动备份数据库太劳累抓狂,且显得不专业,呵呵。调用sp_addumpdevice过程时,发生这SP有返回值,度娘了一圈,很少有提出存储过程返回值如何在ADO Command中如何引用。

    瞎写的代码,总是提示:@cntrltype未声明为OUTPUT,但形参还需要输出,等等。

    但打开sp_addumpdevice存储过程定义,发现@cntrltype及@devstatus可为空,不需要传值。头疼了10分钟。

    无意间瞎写,则不报错了。偷笑

    正确代码如下:

    P_cmd.CommandType = adCmdStoredProc
       P_cmd.CommandText = "sp_addumpdevice"
       
       With P_cmd
          
          .Parameters.Append .CreateParameter("@res", adInteger, adParamReturnValue, , i)
          
          .Parameters.Append .CreateParameter("@devtype", adChar, adParamInput, 20, "disk")
          .Parameters.Append .CreateParameter("@logical", adChar, adParamInput, 40, "mybakdev1")
          .Parameters.Append .CreateParameter("@physical", adChar, adParamInput, 260, Trim(txtData_Backup(0).Text))
          
          .Execute
          '<释放参数>
          .Parameters.Delete ("@devtype")
          .Parameters.Delete ("@logical")
          .Parameters.Delete ("@physical")
          
          .Parameters.Delete ("@res")
       End With


    展开全文
  • 使用VB 与oracle 进行连接是软件开发人员经常使用的组合,充分利用oracle 中的存储过程来处理应用 程序频繁使用的逻辑,不仅可以提高效率和安全性,而且也可以最大限度地利用资源,减少编程人员的重复劳 动。对存储过程...
  • vb三个窗口操作相互调用,适合初学者。
  • VB6.0 使用递归过程实现阶乘运算  Function F(n As Integer) As Single  If n > 1 And n  F = n * F(n - 1)  Else  F = 1  End If  End Function  Private Sub Command1_Click()  Text2.Text = F(Val(Text...
  • 4 4在plf文件夹中新件文本文档里面输入如图 4所示代码 利用vc6.0编写DLL文件为了方便其他函数调用可以米取以下方式 方法过程 一采用 Win32 Dynamic-Link Library 建立 过程本次采用建立一个计算整数的平方和立方的 ...
  • 存储过程是存储在服务器上的一组预编译的Transact-SQL语句,是一种封装重复任务操作的...本文以SQL Server2000存储过程为例,探讨了存储过程的优点,并以Visual Basic6.0程序设计语言给出了调用存储过程的关键代码。
  • 包括参数传递,接收存储过程返回值,存储过程遇错误继续执行及停止执行
  • 跟我一样,很多初学者确实很难编写出如题的DLL,即使编写出来也经常在调用过程中出现各种问题。我根据摸索写出了一个DLL,编译和调用代码获得通过。  以下举例简单说明,具体还有很多问题我也待继续研究。  1.用...
  • VB调用winrar.dll进行rar文件的解压缩

    热门讨论 2009-03-17 18:59:48
    在使用VB进行开发的过程中,如果需要对RAR文件进行解压,可以使用本源码试试,比外部调用winrar更加稳定。
  • 此源代码仅为利用API来获取打开文件完整路径 以及 保存时的完整路径 不会实际打开文件或保存文件 如果需要实际操作则需要另外代码实现 这里就不实例了. 主要免控件而利用API实现打开保存对话框
  • VB调用matlab编写的M文件进行运算

    千次阅读 2018-12-15 15:58:39
    Matlab产生的M文件不能直接在VB调用,可利用mcc将M文件直接编译成.exe文件,然后在VB中声明下面三个API函数,最后使用Shell命令即可实现VB与Matlab的无缝集成。 1.用mcc生成独立的外部应用程序。可使用如下两种命令...

    Matlab产生的M文件不能直接在VB中调用,可利用mcc将M文件直接编译成.exe文件,然后在VB中声明下面三个API函数,最后使用Shell命令即可实现VB与Matlab的无缝集成。
    1.用mcc生成独立的外部应用程序。可使用如下两种命令:
    mcc -p file.m 或 mcc -m file.m
    在这里插入图片描述
    2.在VB中声明调用的三个API函数:
    ● Declare Function WaitForSingleObject Lib “kernel32”(ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long
    ● Declare Function CloseHandle Lib “kernel32”(ByVal hObject As Long) As Long
    ● Declare Function OpenProcess Lib “kernel32”(ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long,ByVal dwProcessId As Long) As Long
    注意:在VB中使用API函数时;
    在VB中声明API函数有两种方法:
    如果我们只在某个窗体中使用API函数,我们可以在窗体代码的General部分声明它:
      声明的语法是:
      Private Declare Function …
      Private Declare Sub…
      这里必须采用Private声明,因为这个API函数只能被一个窗体内的程序所调用。
    如果我们的程序有多个窗体构成,而且我们需要在多个窗体中使用同一个API函数,就需要在模块中
    声明了。
      先添加一个模块(如图示),
      在这里插入图片描述
      然后采用如下语法声明:
      Public Declare Function…
      Public Declare Sub…
      Public声明的含义是把API函数作为一个公共函数或过程,在一个工程中的任何位置(包括所有的窗体和模块)都能直接调用它。声明完毕我们就能在程序中使用此API函数了。
      即:
    Private Declare Function WaitForSingleObject Lib “kernel32” (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long
    Private Declare Function CloseHandle Lib “kernel32” (ByVal hObject As Long) As Long
    Private Declare Function OpenProcess Lib “kernel32” (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
    (如图:
     在这里插入图片描述
    3.操作代码
    Dim lTask As Long, lret As Long, lHandle As Long
    ’执行file.exe文件
    lTask = Shell(“VB20181215.exe”, vbNormalFocus) ""文件路径
    lHandle = OpenProcess(SYNCHRONIZE, False, lTask)
    ’等待进程执行完毕
    lret = WaitForSingleObject(lHandle, INFINITE)
    lret = CloseHandle(lHandle)
    ’ VB2018121.exe文件执行完毕后,继续执行应用程序

    展开全文

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 49,051
精华内容 19,620
关键字:

vb如何调用过程