新手請教VF問題

lucian_cl 2004-10-15 02:56:09
連接代碼如下﹕
procedure Activate
wait winodow at 12,20 nowait "正在連接數据庫。。。。"
vardviver = thisform.text1.value
varserver = thisform.text2.value
vardatabase = thisform.text3.value
varuser = thisform.text4.value
varpassword = thisform.text5.value
store sqlstringconnect("provider=MSDASQL;DRIVER={"+alltrim(VarDriver)+};
SRVR="+alltrim(varserver)+;DB="+alltrim(vardatabase)+";UID="+alltrim(varuser)+";
PWD="+alltrim(varpassword)+") to connhandle
if connhandle<0
=messagebox(space(4)+"連接數据源失敗﹐原因如下﹕"+chr(10)﹔
+"1."SYBASE信息"參數不對;"+chr(10);
+"2.SYBASE服務("+alltrim(upper(varserver)) +")未啟動。",16,"錯誤提示:")
wait clear
close all
return
else
wait clear
......
sqldisconnect(connhandle)
endif
......
procedure release
=sqldisconnect(connhandle)
close all
endproc

在這段代碼中
vardviver = thisform.text1.value
varserver = thisform.text2.value
vardatabase = thisform.text3.value
varuser = thisform.text4.value
varpassword = thisform.text5.value
是什么意思?
我搞不明白
...全文
57 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
lindanwu 2004-10-16
  • 打赏
  • 举报
回复
这些是在一个表单中把TEXT1到TEXT5中的内容作为连接字中的内容,不过先是赋值,远行中可更新值,用以连不同的数据.
十豆三 2004-10-15
  • 打赏
  • 举报
回复
把表单中的Text1文本框的值覆给变量vardviver
把表单中的Text2文本框的值覆给变量varserver
把表单中的Text3文本框的值覆给变量vardatabase
把表单中的Text4文本框的值覆给变量varuser
把表单中的Text4文本框的值覆给变量varpassword

2,717

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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