« | August 2025 | » | 日 | 一 | 二 | 三 | 四 | 五 | 六 | | | | | | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | | | | | | | |
| 公告 |
暂无公告... |
Blog信息 |
blog名称:VFP及Sql Server拙笔 日志总数:46 评论数量:107 留言数量:0 访问次数:431798 建立时间:2005年5月12日 |

| |
[VFP与SQL]如何执行一个 SQL Server 服务器上的储存过程 文章收藏, 网上资源, 读书笔记, 心得体会, 软件技术
老瓷 发表于 2005/11/28 8:52:17 |
PUBLIC errvalPUBLIC errmsgPUBLIC handleerrval=0errmsg=' 'sourcename= 'test'user= 'sa'passwd=''
******** 连接* 为连接打开错误显示=SQLSetProp(0,"DispWarning",.t.)handle=SQLConnect(sourcename,user,passwd)IF handle > 0WAIT WINDOW '连接成功' NOWAITENDIF
******** 设置一些默认值=SQLSetProp(handle,'Asynchronous',.f.)=SQLSetProp(handle,'BatchMode',.t.)=SQLSetProp(handle,'ConnectTimeOut',0)=SQLSetProp(handle,'Transactions',1)
err=SQLExec(handle,'use pubs')DO errhand WITH err,'USE PUBS'
********** 该程序演示如何实现 SQL 的 SQLExec() 函数sqlcomm= "execute showsales '7066'"err=SQLExec(handle,sqlcomm)DO errhand WITH err,"SQLExec(handle,"+sqlcomm+")"IF err > 0BROWSEENDIF
********** 断开err=SQLDisconnect(handle)DO errhand WITH err,"SQLDisconnect()"CLOSE ALL
********** 错误处理程序PROCEDURE errhandPARAMETERS err,commandIF err > 0 WAIT WINDOW ALLTRIM(UPPER(command))+"完全成功" NOWAITELSE WAIT WINDOW UPPER(command)+"没有完全成功"ENDIFRETURN 注意程序返回两个 stor_id 为 7066 的记录. |
|
回复:如何执行一个 SQL Server 服务器上的储存过程 文章收藏, 网上资源, 读书笔记, 心得体会, 软件技术
老瓷发表评论于2006/5/23 19:40:58 |
以下引用Abill(游客)在2006-5-5 16:21:47的评论:
请问'7066'是什么意思? 如果需要带参数如何办? 谢谢!
该示例是查找 stor_id 为 7066 的记录,其中 7066 就是参数呀! |
|
回复:如何执行一个 SQL Server 服务器上的储存过程 文章收藏, 网上资源, 读书笔记, 心得体会, 软件技术
Abill(游客)发表评论于2006/5/5 16:21:47 |
请问'7066'是什么意思? 如果需要带参数如何办? 谢谢! |
|
» 1 »
|