数据库连接不上~该怎么解决

数据库连接不上~
我建了数据库的用户，servername 为BIT，用户名为fly在PB中设置profile后，怎么连接不上数据库，用的是ORACLE数据库

------解决方案--------------------
// Profile watmis
SQLCA.DBMS = "O90 Oracle9i (9.0.1)"
SQLCA.LogPass = <***>
SQLCA.ServerName = "tonny"
SQLCA.LogId = "wat"
SQLCA.AutoCommit = False
SQLCA.DBParm = "PBCatalogOwner='wat'"

------解决方案--------------------

connect using sqlca;

if sqlca.sqlcode <> 0 Then
messagebox("connect error",sqlca.sqlerrtext)
end


------解决方案--------------------

探讨

引用:
connect using sqlca;

if sqlca.sqlcode <> 0 Then
messagebox("connect error",sqlca.sqlerrtext)
end

我现在是初学加自学，想请教上面的代码是什么意思？

------解决方案--------------------
connect using sqlca; //连接数据库
if sqlca.sqlcode <> 0 Then //sqlca.sqlcode = 0 代表连接成功
messagebox("connect error",sqlca.sqlerrtext) //显示错误信息
end

------解决方案--------------------
你PB程序和oracle数据库是在一台电脑上吗，不是的话要配置net服务名的