查看基本网络信息并设置连接拒绝访问？

要查看基本网络信息并设置连接拒绝访问，可以按照以下步骤进行：

1.打开“控制面板”，选择“网络和共享中心”。

2.选择当前连接的网络，点击右侧的“属性”。

3.在“网络属性”窗口中，选择“安全”选项卡，勾选“显示字符”，可以查看网络密码。

4.在“安全”选项卡中，可以设置各种安全措施，例如设置网络加密类型、更改密码或禁止新设备连接等。

5.如果要拒绝某个设备访问网络，可以选择“黑名单”或“访客拒绝”，并在其中添加或删除所需设备。

这些 *** 作可以使网络更加安全可靠，保护私人数据不被恶意入侵和窃取。

‘查看基本网络信息并设置连接 未知 / ’的解决办法：

一、判定 DHCP Client 是否启动【需要去启动这个服务】；

方法：打开“开始”->"运行"，在"打开"后的文本框中，输入：services.msc,打开windows7的服务管理窗口，查看名称为DHCP Client的服务。

如右击启动时，发现提示：“dhcp client无法启动 错误5”，这是由于权限的原因。需要打开注册表：

右击一下DHCP Client中的“属性”，在“常规”中，发现，其服务名称为：DHCP，需要在注册表中，设置此服务的权限。 *** 作如下：

在“运行”中，输入：regedit，打开“注册表编辑器”，进入：

HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Dhcp\Parameters

右击Parameters，选择“权限”，发现在Parameter的权限设置中，“组或用户名”中，不包括“LOCAL SERVICE”与"NETWORK SERVICE"这2个组【需要添加这2个组。在此对话框中，

点击“添加”，在d出的对话框中，点击左下角的“高级”，再在d出的对话框中，点击“立即查找”，此时，搜索结果中，会搜索出多条记录，选择“LOCAL SERVICE”，点击“确定”，此对话框会

关闭，再点击“确定”，此对话框也会关闭，此时，在“组或用户名”中，会多出此组。点击“LOCAL SERVICE”，在“LOCAL SERVICE 的权限”中，“允许”下面，勾选“完全控制”与“读取”。点

击“确定”。此时，DHCP服务中，LOCAL SERVICE组，就可以控制此服务了。

以同样的方法，给DHCP服务，添加"NETWORK SERVICE"组的权限。

此时，电脑可以上网。

二、桌面屏幕右下角的“网络”图标上，一直是一个小黄点或一把叉，点击后，发现连接的无线网络后面，显示的是“有限的访问权限”；或 打开网络与共享中心时，发现“查看基本网络信息并设

置连接”中，显示的是“未知”。

解决办法：1、需要开启另外2个服务：Network Localtion Awareness 和 Remote Procedure Call服务。

2、如 Remote Procedure 服务是开着的，就需要开启 Network Localtion Awareness 服务。如手工开启时，也发现了和打开DHCP Client一样权限不够的问题。就使用设置DHCP Client。

同样的方法，在注册表中：

HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\NlaSvc\Parameters中（NlaSvc是Network Localtion Awareness的服务名称）

新增了“NETWORK SERVICE”组的权限，设置可以参数DHCP Client的设置步骤。此时，在“服务”中，打开“Network Localtion Awareness”服务，成功。

就这样，Windows7下的网络图标，从小黄点变成正常网络指示图标了。

三、启动 Network List Service

现象：网络连接的小图标上多了一个小红叉，但不影响上网，提示了服务 Network List Service 没有启动。

解决办法：

打开组件服务-》点开 计算机-》我的电脑-》DCOM配置，找到netprofm 点开netprofm的属性（右键-》属性） -》安全 -》“启动和激活权限” -》 自定义--》编辑，在启动权限里添加 LOCAL

SERVICE 用户，允许本地启动 和 本地激活，确定就OK了。 具体 *** 作步骤如下：

1.点 运行 ；输入 dcomcnfg 。

2.组件服务 → 计算机 → 我的电脑 → DCOM配置 → 找到 netprofm 。

3.右键点击 netprofm → 右键点击 属性 → 安全 → 在 启动和激活权限 中 点击 自定义 。

4.编辑 → 添加 → 输入对象 名称 来选择 → 输入“LOCAL SERVICE” → 确定 。

5.返回【注意选择 LOCAL SERVIC】勾选下面的 本地启动 和 本地激活 → 确定 。

6.回到组件服务 → 服务 → Network List Service → 右键启动。

此时 Network List Service服务就可以正常启动，网络连接图标上的‘一把叉’也会消失。

VB访问SQL Server数据库技术全揭密(1)

本文讨论了Visual Basic应用程序访问SQL Server数据库的几种常用的方法，分别说明了每种方法的内部机理并给出了每种方法的一个简单的实例，最后比较了每种方法性能和优缺点。

一、引言

SQL Server是微软推出的中小型网络数据库系统，是目前最常用的数据库系统之一。随着SQL Server网络数据库应用程序日益增多，这种Web数据库应用系统的正常运行一般依赖于已存在的用户数据库。创建维护数据库的工作可用SQL Server提供的SQL Enterprise Manager工具来进行，如能提供一种定制的数据库管理工具，通过管理应用程序来管理数据库及其设备，对用户来说无疑是最理想的。

Visual Basic作为一种面向对象的可视化编程工具，具有简单易学，灵活方便和易于扩充的特点。而且Microsoft为其提供了与SQL Server通信的API函数集及工具集，因此它越来越多地用作大型公司数据和客户机—服务器应用程序的前端，与后端的Microsoft SQL Server相结合，VB能够提供一个高性能的客户机—服务器方案。

二、VB访问SQL Server数据的常用方法

使用Visual Basic作为前端开发语言，与SQL Server接口有几种常用的方法，即：

①数据访问对象/Jet

②为ODBC API编程

③使用SQL Server的Visual Basic库(VBSQL)为DB库的API编程

④RDO 远程数据对象(RemoteData Objects)

⑤ADO 数据对象(Active Data Objects)

1、数据访问对象/Jet

VB支持Data Access Objects(DAOs)的子集。DAO的方法虽然不是性能最好的管理客户机—服务器之间的对话方式，但它的确有许多优点。DAO/Jet是为了实现从VB访问Access数据库而开发的程序接口对象。使用DAOs访问SQL Server的过程如下：应用程序准备好语句并送至Jet，Jet引擎(MASJT200.DLL)优化查询，载入驱动程序管理器并与之通讯，驱动程序管理器(ODBC.DLL)通过调用驱动器(SQLSRVR.DLL)的函数，实现连接到数据源，翻译并向SQL Server提交SQL语句且返回结果。下面是一个用DAOs访问SQL Server的VB实例。

注释：Form Declarations

Dim mydb As Database

Dim mydynaset As Dynaset オ

Private Sub Form_Load()

Set mydb = OpenDatabase("", False, False, "ODBCDSN=MyserverWSID=LCLDATABASE = sales")

Set mydynaset = mydb CreateDynaset("Select*from Customers") オ

End Sub ァ

上述例子是以非独占、非只读方式打开sales数据库，并检索Customers表中的所有字段。OpenDatabase函数的最后一个参数是ODBC连接字符串参数，它指明了Microsoft Access连接到SQL Server所需要知道的一些内容。其中“DSN”为数据源名，“WSID”为工作站名，“DATABASE”为所要访问的数据库名。

2、利用ODBC API编程

ODBC(Open Database Connectivity)的思想是访问异种数据库的一种可移植的方式。与数据资源对话的公用函数组装在一个称为驱动程序管理器(ODBC.DLL)的动态连接中。应用程序调用驱动程序管理器中的函数，而驱动程序管理器反过来通过驱动器(SQLSRVR.DLL)把它们送到服务器中。

下面的代码使用上面一些函数先登录到一个服务器数据库，并为随后的工作设置了语句句柄。

Global giHEnv As Long

Global giHDB As Long

Global giHStmt As Long

Dim myResult As integer

Dim myConnection As Srting

Dim myBuff As String*256

Dim myBufflen As Integer

If SQLAllocEnv(giHEnv)<>SQL_SUCCESS Then

MsgBox"Allocation couldn注释：t happen!"

End If

If SQLAllocConnect(giHEnv,giHDB)<>SQL_SUCCESS Then

MsgBox "SQL Server couldn注释：t connect!"

End If

myConnection="DSN=myServerUID=LCLPWD=APP=ODBCTestWSID=LCLDATABASE=sales"

myResult=SQLDriverConnect(giHDB,Test,form1.hWnd,myConnection.len(myConnection),myBuff,256,myBufflen,SQL_DRIVER_COMPLETE_REQUIED)

myResult=SQLAllocStmt(giHDS,giHStmt)

myResult=SQLFreeStmt(giHStmt,SQL_COLSE)

rsSQL="Select * from Customers Where City = "Hunan""

myResult = SQLExecDirect(giHStmt,rsSQL,Len(rsSQL))

3、使用VBSQL对DB库API编程

DB库是SQL Server的本地API，SQL Server的Visual Basic库(VBSQL)为Visual Basic程序员提供API。从一定意义上说，VBSQL是连接Visual Basic程序到SQL Server的性能最好最直接的方式。VBSQL包含以下三个文件：

VBSQL.VBX： 包含库函数，具有访问重要的消息和处理错误的能力

VBSQL.BI：包括所有的常量和变量说明

VBSQL.HLP：Windows帮助文件，使用VBSQL的指南

使用VBSQL时，必须将VBSQL.BI加入到Visual Basic工程文件中，并确保VB程序运行时有VBSQL.VBX文件。

一般的DB库API编程的过程是这样的：先通过调用SqlInit对DB库进行初始化，再调用SqlConnection打开一个连接，然后就可做一些工作。下面的代码是一个初始化DB库并登录到服务器的通用例程

---