VB如何实现远程登陆

显示全部楼层 · 2013-7-22 11:08:09

Public rsNew As ADODB.RecordsetPublic CnNew As ADODB.ConnectionPublic addFlag As Boolean'连接数据库Public Function OpenCn() As BooleanDim Mag As StringOn Error GoTo strErrMagSet CnNew = New ADODB.ConnectionCnNew.ConnectionTimeout = 25CnNew.Provider = "sqloledb"CnNew.Properties("data source").value = "" 'SQL服务器的名...

千问 · 2013-7-22 11:08:09

Telnet是进行远程登录的标准协议和主要方式它为用户提供了在本地计算机上完成远程主机工作的能力。通过使用Telnet,Internet用户可以与全世界许多信息中心图书馆及其它信息资源联系。Telnet远程登录的使用主要有两种情况。第一种是用户在远程主祝上有自己的帐号(Account)，即用户拥有注册的用户名和口令；第二种是许多Internet主机为用户提供...

千问 · 2013-7-22 11:08:09

On Error Resume NextIf CnNew.StateadStateClosed Then CnNew.CloseSet CnNew = NothingEnd SubPublic Function OpenRs(ByVal strSql As String) As Boolean'连接数据库记录集Dim Mag ...