在VB中如何实现自动启动拨号网络
编号：QA000035
建立日期: 1998年9月1日 最后修改日期：2002年2月10日
所属类别：
王宁:
在VB中如何通过程序实现自动启动拨号网络，并对不同的号码及其它参数进行设定？
回答:
要想实现自动启动拨号网络，就要使用Remote Access Service (RAS) API，这个API最早是在Windows for Workgroup 3.11中出现的，现在它已经成为Win32 API的一个组成部分。该API将整个拨号网络称为Phonebook，而每一个连接称为PhonebookEntry。你可以使用RasCreatePhonebookEntry来创建新的连接，用RasDial来拨号，而RasEnumEntries可以获得当前系统已有的所有连接，使用其它的RAS函数还可以获取或设置连接的参数。 RasEditPhonebookEntry函数将激活标准的Windows 95/NT属性对话框来修改连接的属性。你可以从Win32 API的手册找到所有相关函数的详细介绍。对于VB来说直接调用RAS API有一些不便，因为该API的函数使用了一些自定义的类型(Type)，所以Microsoft专门设计了类模块封装了整个RAS API。你可以从本地下载：
vb32ras.zip，这是一个使用VB 4.0编写的例子。释放该文件后可以找到两个工程文件：RAS_AUTO和RASAPI。RAS_AUTO是对API的封装，你可以把它编译成DLL的OLE Automation服务器供自己的程序调用。RASAPI是调用RAS_AUTO服务器的例子，该程序是你需要认真研究和掌握的。如果你不喜欢这种封装形式，也可以直接使用Ras_glb.bas文件，这里包括了所有需要的API声明。需要注意的是，RAS API在Win9x和WinNT下的用法不同，这点在程序中有体现。
Delphi用户可以访问http://www.magsys.co.uk/delphi/获得免费的RAS控件。
此问题由李海回答。
| |
|
|
| |
|
|
