这个存储过程看不懂,我是初学者,会的给个提示吧

夜弦 2011-08-23 10:50:21
Dim Return
Dim adoComm3
Set adoComm3 = CreateObject("ADODB.Command")
With adoComm3
.ActiveConnection = Conn
.CommandType = 4
.CommandText = "View_Usedhouse2"
.Parameters.Item("@strID").Value = id
.Execute
Return=.Parameters.Item("@Return").Value
if Return=true then
zbh=.Parameters.Item("@zbh").Value
问:Return=.Parameters.Item("@Return").Value
这句是什么意思,这个return是去取哪里的值
...全文
114 13 打赏 收藏 转发到动态 举报
写回复
用AI写文章
13 条回复
切换为时间正序
请发表友善的回复…
发表回复
baojianfei 2011-08-23
  • 打赏
  • 举报
回复
这个不是存储过程吧?感觉像是 VBA的代码
yibey 2011-08-23
  • 打赏
  • 举报
回复
显然是存储过程的返回值了
--小F-- 2011-08-23
  • 打赏
  • 举报
回复
VB的请水哥看看
AcHerat 2011-08-23
  • 打赏
  • 举报
回复
感觉貌似是存储过程的返回值!
luoyoumou 2011-08-23
  • 打赏
  • 举报
回复
不懂,帮顶!
yt2626 2011-08-23
  • 打赏
  • 举报
回复
不懂哦!帮顶……
liming1019 2011-08-23
  • 打赏
  • 举报
回复

Dim Return
Dim adoComm3
Set adoComm3 = CreateObject("ADODB.Command")
With adoComm3
.ActiveConnection = Conn
.CommandType = 4
.CommandText = "View_Usedhouse2"
.Parameters.Item("@strID").Value = id
.Execute
Return=.Parameters.Item("@Return").Value
if Return=true then
zbh=.Parameters.Item("@zbh").Value
End With
liming1019 2011-08-23
  • 打赏
  • 举报
回复
[Quote=引用楼主 loveyexian 的回复:]
HTML code
Dim Return
Dim adoComm3
Set adoComm3 = CreateObject("ADODB.Command")
With adoComm3
.ActiveConnection = Conn
.CommandType = 4
.CommandText = "View_Usedhouse2"
.Parameters.Item("@strID").Valu……
[/Quote]
代码里少个EndWith

Dim Return
Dim adoComm3
Set adoComm3 = CreateObject("ADODB.Command")
With adoComm3
.ActiveConnection = Conn
.CommandType = 4
.CommandText = "View_Usedhouse2"
.Parameters.Item("@strID").Value = id
.Execute
Return=.Parameters.Item("@Return").Value
if Return=true then
zbh=.Parameters.Item("@zbh").Value
EndWith

半妖尐槑 2011-08-23
  • 打赏
  • 举报
回复
确实不是存储过程,是调用了存储过程。。。
猜,这个return是去"View_Usedhouse2"这个存储过程中返回的值,嘿嘿^^
wangkun520 2011-08-23
  • 打赏
  • 举报
回复
每天结贴10个可用分
geniuswjt 2011-08-23
  • 打赏
  • 举报
回复
非主流代码!
VB一般也不会用这种写法!
鉴定完毕!
建议LZ如果是网上看的,把链接丢出来
你这样说一句,没法帮你。
要么去vb版块问问,VB略懂,但看不懂你这个!
叶子 2011-08-23
  • 打赏
  • 举报
回复
建议转到VB版去问一下...
nvhaixx 2011-08-23
  • 打赏
  • 举报
回复
Dim Return
Dim adoComm3
Set adoComm3 = CreateObject("ADODB.Command")

adoComm3.ActiveConnection = Conn
adoComm3.CommandType = 4
adoComm3.CommandText = "View_Usedhouse2"
adoComm3.Parameters.Item("@strID").Value = id
adoComm3.Execute
Return=adoComm3.Parameters.Item("@Return").Value
if Return=true then
zbh=adoComm3.Parameters.Item("@zbh").Value

22,295

社区成员

发帖
与我相关
我的任务
社区描述
MS-SQL Server 疑难问题
社区管理员
  • 疑难问题社区
  • 尘觉
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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