新手請教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
是什么意思?
我搞不明白
...全文
50 2 打赏 收藏 举报
写回复
2 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
lindanwu 2004-10-16
  • 打赏
  • 举报
回复
这些是在一个表单中把TEXT1到TEXT5中的内容作为连接字中的内容,不过先是赋值,远行中可更新值,用以连不同的数据.
十豆三 2004-10-15
  • 打赏
  • 举报
回复
把表单中的Text1文本框的值覆给变量vardviver
把表单中的Text2文本框的值覆给变量varserver
把表单中的Text3文本框的值覆给变量vardatabase
把表单中的Text4文本框的值覆给变量varuser
把表单中的Text4文本框的值覆给变量varpassword
发帖
VFP

2574

社区成员

VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
帖子事件
创建了帖子
2004-10-15 02:56
社区公告
暂无公告