wensibo的专栏

转载：http://wenku.baidu.com/view/0bc45c52ad02de80d4d84095.html 1、首先，选择其中一台笔记本电脑作为主机，该主机需要正常的与网线连接，即可以正常的上网。 打开主机的 “网络连接”，选择“无线网络连接”，右键打开属性对话框，在“常规”选项卡下，双击“TCP/IP 协议”，配置 IP 地址和子网掩码分别为：192.168.0.1 和 255

Public Function GetConnStr() As String     Dim ConnString As String     ConnString = "Provider = SQLOLEDB.1;Database=IHURALibrary;server=.;uid=Lindy;pwd=sa!12345;"     GetConnStr = ConnString End