# 终于找到同道了!

Posted by kkcheung on July 28, 1999 at 16:57:01:

In Reply to: sybase And Vb posted by Smith on July 28, 1999 at 16:13:48:

: 请问各位高手一有关sybase的问题，小弟公司有一台nt server ，有sybase的资料
: 库， 小弟有权限去增加及修改，小弟只会vb，想请问大家各位，而我该如何以我的电脑( win 95)
: 来 连上这台server(小弟已安装 sybase ODBC Client 端)，
: 再请问如果连上nt 这台server，有以vb为程式范例为主，可教小弟如何去增删资料库的书
: 吗？可否提供小弟参考！或是那位高手可提供一下
: 经验告訢小弟如何连上server及增删资料库。
: 谢谢！!
: 如果方便的话，可否给个范例！

我公司与你的公司情形很像,都是NT上架设SYBASE,客户端用WIN95加VB写的系统.
我接上SYBASE的方法是在VB开发程式中的主程式FORM_LOAD中,加上下列一段:
Set FMSWS = DBEngine.Workspaces(0)
Set FMSDB = FMSWS.OpenDatabase("", False, False, "ODBC;UID=fms;DSN=FMSDATA;PWD='fmsfms';DATABASE=FMSDB")
这个明白吗?主要的是UID及PWD,即你登陆SYBASE上数据库的LOGIN及PASSWORD.
DNS与DATABASE我唔知点话你知,你唔明的去个数据库在SYBASE ODBC里的设定,会有这两个资料.
之后便可以在其他FORM中,用SQL做你想要的事,例如打开一个RECORDSET..
Set tempset = FMSDB.OpenRecordset("select * from customer", dbOpenSnapshot, dbSQLPassThrough)

最后要建一个模组,加上下面的陈述:
Global FMSWS As Workspace, FMSDB As Database, tempset As Recordset

有什么问题,欢迎你来 e-mail或到讨论区.

Follow Ups:

- 等不及!!试了一下，但有问题!!! smith 11:58:27 7/29/99 (0)
- Re: 终于找到同道了! smith 11:06:05 7/29/99 (0)