vb6调用sql server2000存储过程出错

wjfxyj 2011-12-04 02:33:05
我有一个SQL SERVER2000的存储过程如下:
CREATE PROCEDURE bdxz
@pzh varchar(10),
@zbh varchar(8)
AS
insert into ch_2 (pzbh,zbh) values(@pzh,@zbh)
GO

用vb6调用
myvograde.rsDK1 "declare @pzh varchar(10),@zbh varchar(8) set @pzh='" & Trim(Textpzh.Text) & "' set @zbh='" & Trim(Textzbh.Text) & "' exec bdxz @pzh,@zbh"
完全正常

但用如下方法就不正常
Dim m_pzh As String
Dim m_zbh As String
m_pzh = Trim(Textpzh.Text)
m_zbh = Trim(Textzbh.Text)
myvograde.rsDK1 "declare @pzh varchar(10),@zbh varchar(8) set @pzh=m_pzh set @zbh=m_zbh exec bdxz @pzh,@zbh"
出错信息如下:
实时错误 '-2147217900 (80040e14)':
列名'm_pzh’无效

请各位大侠指正
...全文
47 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
booksoon 2011-12-05
  • 打赏
  • 举报
回复
m_pzh和m_zbh应该是变量名吧~~~
chinaboyzyq 2011-12-05
  • 打赏
  • 举报
回复

Dim m_pzh As String
Dim m_zbh As String
m_pzh = Trim(Textpzh.Text)
m_zbh = Trim(Textzbh.Text)
myvograde.rsDK1 "declare @pzh varchar(10),@zbh varchar(8) set @pzh=" & m_pzh & " set @zbh=" & m_zbh & " exec bdxz @pzh,@zbh"
wjfxyj 2011-12-05
  • 打赏
  • 举报
回复
2楼给出的答案基本接近,但还是错误
正确的如下:

Dim m_pzh As String
Dim m_zbh As String
m_pzh = Trim(Textpzh.Text)
m_zbh = Trim(Textzbh.Text)
myvograde.rsDK1 "declare @pzh varchar(10),@zbh varchar(8) set @pzh='" & m_pzh & "' set @zbh='" & m_zbh & "' exec bdxz @pzh,@zbh"
给分结贴
worldy 2011-12-04
  • 打赏
  • 举报
回复
myvograde是什么对象?

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧