PB9.0 创建应用和ASA Database交互

前言：

  因为软工作业需要编写一个简单的登录程序，并且需要和数据库进行交互，因此本人写了本博客特此记录！

---

交互步骤：

  创建数据库  --- >  在应用程序中保存连接字符串 --->  显示是否连接成功

---

创建数据库：

   本人选择的是创建PB9.0自带的数据库 ASA Database ，具体的创建步骤请看 PB9.0 创建ASA DataBase 这篇博客

---

在应用程序中保存连接字符串：

  首先 打开数据库 ， 右键单击需要的数据库，选择Properties，在 弹出的对话框中选择 priview

            

然后 点击 copy 即可保存数据库连接字符串，然后我们保存到我们程序中即可，然后我们可以点击 Test Connection 去测试是否连接成功！

---

程序中的连接数据库的代码：

// Profile Wjfdbsource
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "Connectstring='DSN=wjfdbsource;UID=sa;PWD=wjf123'"



CONNECT USING SQLCA;

IF SQLCA.SQLCODE <> 0 THEN
	MESSAGEBOX("提示信息","连接数据库失败")
	return
else
	///Messagebox("提示信息","连接数据库成功")

open(Wjflogin)
end if

以上就是PB9.0创建的应用程序连接数据库的步骤，希望对大家有所帮助！