hur.cn - 华软网

 热门搜索

我是新手,在线请教pb和sqlserver连接的问题

  作者:未知    来源:网络    更新时间:2017/9/29
我现在正在做毕业设计,用到pb和sqlserver.
因为以前从没有接触pb和sqlserver,所以现在有一个对我来说是很大的问题:就是如何实现将pb和sqlserver连接起来.
或是在什么地方可以找到相关的问题.
先在这里谢谢各位热心朋友的帮忙!

------华软网友回答------
SQLCA.DBMS = "MSS Microsoft SQL Server"
SQLCA.Database = "x_server"  //数据库名称
SQLCA.LogPass = "yf11"   //数据库密码
SQLCA.ServerName = "192.168.6.9"  //数据库地址
SQLCA.LogId = "sa"   //数据用户
SQLCA.AutoCommit = False
SQLCA.DBParm = ""

Connect Using SQLCA;
if SQLCA.sqlcode<>0 then 
messagebox('提示','数据库连接错误。',stopsign!)
halt;
else
Open(w_server_logo)
end if
------华软网友回复------
如果时在设计的时候连接数据库的话只要在database面版里找到MSS Microsoft SQL Server专用接口NEW一个Profile,在里面配置连接参数就可以了
如果是用代码连接的话可以参考一下http://community.csdn.net/Expert/topic/3752/3752548.xml?temp=.9250299或其他的相关帖子,这里面有很多有关数据库连接的问题,你搜索一下“数据库连接”就会有很多帖子
------华软网友回复------
不好意思啊,netspies(有就是无,无就是有) ,你说的这段代码应该是在pb的什么地方写啊?
还有就是你在代码所说的数据库名称、数据库密码、数据用户是在什么地方设置呢?
希望我这样的问题,没有吓着你。
呵呵!
------华软网友回复------
老兄,快毕业了,连这最基本的问题都不会,怎么毕业呀,还是找本基础的书学学吧.
------华软网友回复------
一般在Application的Open里写
------华软网友回复------
需要学的还很多呀,抓紧时间吧,这样的水平也许工作难找
------华软网友回复------
找个例子
找本书
很容易解决的
自己动手丰衣足食!
------华软网友回复------
对的,找找相关的例子。没关系的,刚开始都这样,不要听他们打击你。多多努力!
------华软网友回复------
我也是一个PB的爱好者,也是初级选择吧,我来教你怎么作:
首先需要在SQLSERVER2000中建立好自己的数据库,然后建立一系列表,我想这些你都作到了。比如我建立的数据库是JWC,在SQLSERVER2000的树型菜单中选择安全性文件,在登陆中新建一个用户设置好密码,比如说user 123.这样基本上在后台数据库就算配置好了。现在开始在PB中连接我们刚才建立好的数据库JWC。
进入PB的Database Profiles-数据库配置文件窗口,选择MSS Microsoft SQL Server专用接口,选择右边的New按钮,进入数据库配置文件。按照这样填写啊:在Connection选项卡中填空:
Profile Name:JWC(就是数据库配置文件的名称,你可以随便起)
Server:(就是你MSSQLServer2000建立好的服务器名称,一般安装MSSQLServer的时候自动建立默认的以你计算机名为名称的服务器名,如果是xp,也可以用(local)代替)。我的就是(local)
Login ID:就是你刚才在数据库中建立的用户名啊:user
Password:123
Database:(数据库名)JWC
Language:一般默认不用写了。
Connection标签项就完成了,其他都用默认就可以了,现在到Preview选项卡中,在Database Connection Syntax:看到有一系列代码吧,那就是你前边设置参数的代码,点击Copy,把这些代码复制到系统剪贴板中,之后点击确定。
现在就到你在PB中建立的application对象的open事件中
把简帖板的代码粘贴一下,注意要改动一下Password:改变***,变为自己的123。
之后写上:
Connect Using SQLCA;
if SQLCA.sqlcode<>0 then 
messagebox('提示','数据库连接错误。',stopsign!)
halt;
else
Open(w_server_logo)
end if
这样就可以了哦!
     
华软声明:本内容来自网络,如有侵犯您版权请来信指出,本站立即删除。