打開vf工具，創建一個程序，然后復制黏貼以下代碼

*-- 建立連接 lcDSNLess="driver=SQL Server;server=localhost;uid=SA;pwd=你的密碼;DATABASE=你的數據庫" * 聲明變量 Public con * 測試是否成功連接 con = Sqlstringconnect(lcDSNLess) If con < 0Messagebox("連接失敗") ElseMessagebox("連接成功") Endifsys_czy_admin='admin'TEXT TO ctlsql select * from A_B_T_CZY where czy_xm=?sys_czy_admin ENDTEXTn1=SQLExec(con,ctlsql,"temp")If n1>0If Empty(temp.czy_xm)?"當前結果為空"ELSE?temp.czy_xmEndif ElseMessagebox("未找到") Endif

復制黏貼之后，記得把數據的參數改成你自己數據庫的，然后再把中間的sql語句也該成自己的數據庫，之后就可以連接進行測試了。

總結

以上是生活随笔為你收集整理的2021-10-29 visual Foxpro连接数据库sql_server并且执行sql语句的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。