摘要：列出局域网内所有SQL服务器的另外一个办法楼上介绍的是用服务器端sql server提供的SP的方法来返回一个数据集。另外，介绍一个用sql server客户端dmo对象获得sql服务器列表的方法，你需要在VB程序应用#Microsoft SQLDMO Object Library，通常这个文件的路径在\Program Files\Microsoft SQL Server\80\Tools\Binn\SQLDMO.dll： Dim oApp As New SQLDMO.Application Dim oNameList As NameList Dim i As Integer On Erro. 阅读全文

摘要：作为信息社会的一分子，不让孩子接触电脑是不明智的；让孩子无限制的“玩”电脑也是错误的。这都是极端的作法。笔者认为，比较合理的办法是允许孩子在限定的时间段里游戏（受控制的），但孩子随时可以打开电脑学习技术文化知识（不受控制的）。下面来看看我是如何实现这一设想的： 刚开始的时候，我把系统改成可管理性较强的Windows 2000（文件系统必须采用NTFS格式），建立两个同属User组的受限制帐户Game（用于游戏）和Study（学习帐户）并为他们设置相应文件、文件夹的安全权限，然后利用系统管理工具中“本地安全策略”（开启“当登录时间用完时自动注销用户”）结合net user命令来限制特定游戏帐号. 阅读全文

摘要：对于局域网用户中的编程爱好者来说，如果能自己编一个局域网通信程序，那么这一切将是多么美妙！可是，如果要从头开始完全由自己来编写一段用于通信的程序，必须对相关的网络协议及其他的一些较底层的技术有较深入的了解，这可不是一件容易的事。而现在有了Winsock控件，一切就不同了，它已经替你封装了所有烦琐的技术细节，并提供了访问TCP和UDP网络服务的方便途径。你只需通过设置控件的属性并调用其方法就可轻易连接到一台远程计算机中，并且还可以双向交换数据，而这一切都不需你了解TCP的细节或调用低级的Winsock APIs。 Winsock控件可以供Microsoft Acess、Visual Basi.. 阅读全文

摘要：因为手机短消息的发送是以PDU串的形式发送出去的，中文字符以Unicode码来表示，所以在发送中文短消息之前必须首先将中文字符转换为Unicode码，下面的函数将实现这个功能。这个函数主要应用到VB自带的一个格式转换函数：ChrW（）将中文转换为Unicode码。 Public Function chg(rmsg As String) As String Dim tep As String Dim temp As String Dim i As Integer Dim b As Integer tep = rmsg i = Len(tep) b = i / 4 ... 阅读全文

摘要：在Windows编程中，向文本框控件、列表控件、按钮控件等是我们最常接触的控件了。但是在VB中这些控件有时无法实现我们的需要。在这时，我们只要简单的利用Windows API函数就可以扩充这些控件的功能了。 顾名思义，SendMessage函数就是向窗口（这里的窗口指的是向按钮、列表框、编辑框等具有hWnd属性的控件）发送消息的函数，该函数的定义如下:Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ (ByVal hwnd As Long, _ ByVal wMsg As L 阅读全文