MYSQL存储过程VB调用方法。
Private Sub Command1_Click()
Dim MyComm As New ADODB.Command '定义一个命令对象
Dim Rs_GetList As New ADODB.Recordset '定义一个记录集对象
Dim param As ADODB.Parameter '定义一个参数对象
With MyComm
.ActiveConnection = Cn '数据连接
.CommandText = "pp" '存储过程名称
.CommandType = adCmdStoredProc '表明这是一个存储过程
.Prepared = True '要求将SQL命令先行编译
Set param = .CreateParameter("@a", adInteger, adParamInput, 4, 3) '申明一个参数
.Parameters.Append param '把参数添加到参数列表里
Set Rs_GetList = .Execute '执行此存储过程,返回记录集
End With
While Not Rs_GetList.EOF '循环打印记录集的字段
Debug.Print Rs_GetList.Fields(0).Value
Rs_GetList.MoveNext
Wend
End Sub
相关文档:
1.创建表:
create table groupTable(dept varchar(6),phone varchar(20),amount int);
2.插入测试数据:
insert groupTable
select '营业部',8001,20 union all
select '营业部',8002,30 union all
se ......
Blog系统作为大家最常接触的互联网东东,在站长群体中几乎人手一博,从知名门户的博客频道,到网络营销专家博客,网民对博客的关注度在不断提高并深化。目前网上免费的blog系统太杂,在此整理PHP版的Blog介绍如下:
1、wordpress:http://www.wordpress.org 功能也很全面,应该是支持blog的首选。它有最强的模版功能,已经 ......
代码如下:
1 String command = " cmd /c C:/Program Files/MySQL/MySQL Server 5.0/bin>mysqldump -h localhost -u root -p aijia > E:/aijia.dmp " ;
2 try {
3 Process process& ......
1. 定义
/*
Plugin system variables.
*/
static long sysvar_one_value;
static char *sysvar_two_value;
static MYSQL_SYSVAR_LONG(simple_sysvar_one, sysvar_one_value,
PLUGIN_VAR_RQCMDARG,
"Simple fulltext parser example system variab ......