代码如下
// Profile student
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=s2;UID=sle_1.text;PWD=sle_2.text'"
CONNECT USING SQLCA;
if sqlca.sqlcode <>0 then
messagebox("消息","连接错误!"+ string(sqlca.sqlcode)+"~r~n"+sqlca.sqlerrtext)
return -1;
else
messagebox("消息","连接成功!")
end if
其中:UID=sle_1.text;PWD=sle_2.text 处,sle_1和sle_2是两个 singlelineedit控件。
但这样的话 “sle_1.text” 和 “sle_2.text” 被当作了用户名和密码,而不是他们的内容。
我想用的是他们的内容,,,求解决
------解决方案--------------------
首先这段代码需要写在窗口的CB控件中,同时在sle文本框中必须录入完了才能够点击链接。
SQLCA.DBParm = "ConnectString='DSN=s2;UID='"+sle_1.text+"'"+";PWD='"+sle_2.text+"'"这样。