大家好,今天小编关注到一个比较有意思的话题,就是关于adsl拨号王的问题,于是小编就整理了3个相关介绍adsl拨号王的解答,让我们一起看看吧。
文章目录:
- ADSL宽带拨号王(HelloNet) 3.0 怎么用
- ADSL宽带拨号王--HelloNETV3.0ADSL宽带拨号王(HelloNet)的闪亮特色_百...
- 需要设计个机器人程序,需要adsl自动循环拨号。有没有现成的拨号控件啊...
一、ADSL宽带拨号王(HelloNet) 3.0 怎么用
ADSL宽带拨号王(HelloNet) 3.0的使用非常简单。用户只需按照以下步骤操作即可:
首先,在连接方式处选择ADSL拨号,然后在连接设备处选择您连接ADSL的网卡名称。接下来,在用户名和密码处输入服务商提供给您的用户名和密码。完成这些步骤后,您就可以通过点击连接图标来建立网络连接了。
为了进一步优化使用体验,您还可以在菜单的工具-设置选项中进行更多功能的设置。在运行设置属性页里,您可以设置开机启动、自动拨号、断线自动连接等功能。例如,如果您勾选自动连接选项,那么每次双击连接图标时,软件都会自动进行拨号连接。如果您希望Windows启动后自动拨号上网,只需勾选开机自动启动选项即可。
此外,ADSL宽带拨号王(HelloNet) 3.0还具有其他实用的功能。它是一款国产的PPPoE拨号软件,用户界面和使用习惯更加适合中国的网络用户。拨号速度快,防断线能力强,还具有故障检测功能,极大地方便了运营商的维护和用户的使用。同时,它还具有计时功能,能查询用户的详细上网纪录,方便用户掌握自己的上网情况。
总的来说,ADSL宽带拨号王(HelloNet) 3.0是一款功能强大、使用方便的宽带拨号软件。无论您是普通家庭用户还是企业用户,都可以通过使用它来轻松管理自己的宽带连接,享受更加便捷、高效的上网体验。
二、ADSL宽带拨号王--HelloNETV3.0ADSL宽带拨号王(HelloNet)的闪亮特色_百...
ADSL宽带拨号王--HelloNETV3.0,一款专为中国网络用户打造的国产PPPoE拨号软件,以其独特的设计和性能,为中国宽带用户的上网体验带来了显著提升。
首先,HelloNETV3.0的用户界面和操作习惯完全符合中国用户的使用习惯,使得接入互联网更加顺畅,无论是新用户还是老用户都能快速上手。
其次,拨号速度是它的另一个亮点。它采用高效算法,确保用户在连接过程中享受快速、稳定的网络连接,极大地减少了等待时间。
更重要的是,HelloNETV3.0拥有强大的防断线能力,即使在网络波动时也能保持连接,确保用户的在线体验连续不断。此外,其故障检测功能对于运营商的维护和用户的使用来说,无疑是极大的便利,能及时发现问题并解决。
此外,它还具备计时功能,用户可以随时查询详细的上网记录,方便管理自己的上网时间,对于个人用户来说,这是一项实用的工具。
界面设计简洁友好,操作直观易懂,使得无论是技术娴熟的用户还是初次接触的用户都能轻松应对。而且,令人惊喜的是,这款拨号软件对个人用户是完全免费的,这无疑扩大了宽带网络的普及范围。
总的来说,HelloNETV3.0旨在为中国宽带用户提供稳定、易用的拨号服务,打破外国软件的垄断,推动国内宽带网络的健康发展,为中国网络用户的日常生活和工作提供了有力的支持。
三、需要设计个机器人程序,需要adsl自动循环拨号。有没有现成的拨号控件啊...
XP系统有一个命令
rasdial [ConnectionName] /disconnect
如: sell "rasdial 宽带 /disconnect ",vbhide
如果你要用API,我帮你贴在下面吧.
Option Explicit
Public hRasConn As Long '¶¨ÒåÒ»¸öÖ¸ÏòRASµ÷ÓõÄÈ«¾Ö¾ä±ú
Public Const APINULL = 0&
Public Const UNLEN = 256
Public Const DNLEN = 15
Public Const PWLEN = 256
Public Const RAS95_MaxPhoneNumber = 128
Public Const RAS95_MaxEntryName = 256
Public Const RAS95_MaxCallbackNumber = RAS95_MaxPhoneNumber
Public Type RASDIALPARAMS95
dwSize As Long
szEntryName(RAS95_MaxEntryName) As Byte
szPhoneNumber(RAS95_MaxPhoneNumber) As Byte
szCallbackNumber(RAS95_MaxCallbackNumber) As Byte
szUserName(UNLEN) As Byte
szPassword(PWLEN) As Byte
szDomain(DNLEN) As Byte
End Type
'**********************************
'* RASµ÷ÓôíÎó´úºÅ *
'**********************************
Public Const NOT_SUPPORTED = 120&
Public Const RASBASEERROR = 600&
Public Const SUCCESS = 0&
Public Const ERROR_PORT_ALREADY_OPEN = (RASBASEERROR + 2)
Public Const ERROR_UNKNOWN = (RASBASEERROR + 35)
Public Const ERROR_REQUEST_TIMEOUT = (RASBASEERROR + 38)
Public Const ERROR_PASSWD_EXPIRED = (RASBASEERROR + 48)
Public Const ERROR_NO_DIALIN_PERMISSION = (RASBASEERROR + 49)
Public Const ERROR_SERVER_NOT_RESPONDING = (RASBASEERROR + 50)
Public Const ERROR_UNRECOGNIZED_RESPONSE = (RASBASEERROR + 52)
Public Const ERROR_NO_RESPONSES = (RASBASEERROR + 60)
Public Const ERROR_DEVICE_NOT_READY = (RASBASEERROR + 66)
Public Const ERROR_LINE_BUSY = (RASBASEERROR + 76)
Public Const ERROR_NO_ANSWER = (RASBASEERROR + 78)
Public Const ERROR_NO_CARRIER = (RASBASEERROR + 79)
Public Const ERROR_NO_DIALTONE = (RASBASEERROR + 80)
Public Const ERROR_AUTHENTICATION_FAILURE = (RASBASEERROR + 91)
Public Const ERROR_PPP_TIMEOUT = (RASBASEERROR + 118)
'//////////////////////////////////////////////////////////////////////
'Public Const RAS95_MaxEntryName = 256
Public Const RAS95_MaxDeviceName = 128
Public Const RAS_MaxDeviceType = 16
Public Type RASCONN95
'set dwsize to 412
dwSize As Long
hRasConn As Long
szEntryName(RAS95_MaxEntryName) As Byte
szDeviceType(RAS_MaxDeviceType) As Byte
szDeviceName(RAS95_MaxDeviceName) As Byte
End Type
'/////////////////////////////////////////////////////////////////////////////////
'**********************************
'* RAS API ÉùÃ÷ *
'**********************************
Public Declare Function lstrcpy Lib "kernel32" Alias "lstrcpyA" (lpString1 As Any, ByVal lpString2 As String) As Long
Public Declare Function RasDial Lib "RasApi32.DLL" Alias "RasDialA" (lpRasDialExtensions As Any, ByVal lpszPhonebook As String, lprasdialparams As Any, ByVal dwNotifierType As Long, lpvNotifier As Long, lphRasConn As Long) As Long
Public Declare Function RasHangUp Lib "RasApi32.DLL" Alias "RasHangUpA" (ByVal hRasConn As Long) As Long
Public Declare Function RasEnumConnections Lib "RasApi32.DLL" Alias "RasEnumConnectionsA" (lprasconn As Any, lpcb As Long, lpcConnections As Long) As Long
Public Function AddConnection(strNewEntryName As String, strNewPhoneNumber As String, strNewCallbackNumber As String, strNewUsername As String, strNewPassword As String, strNewDomain As String) As Integer
Dim lngRetCode As Long
Dim lngRetLstrcpy As Long
Dim lngRetHangUp As Long
Dim lprasdialparams As RASDIALPARAMS95
If GetConnections() > 0 Then
AddConnection = lngRetCode: Exit Function '·ÀÖ¹¶à¸öÁ¬½Ó ±£³ÖÒ»¸öÁ¬½Ó
End If
lprasdialparams.dwSize = 1052 'ÔÚWINDOWS95/98ÖбØÐ뽫dwSizeÉèΪ1052
'ÀûÓÃlstrcpyº¯Êý½«×Ö·û´®¿½±´µ½BYTEÊý×é
lngRetLstrcpy = lstrcpy(lprasdialparams.szEntryName(0), strNewEntryName)
lngRetLstrcpy = lstrcpy(lprasdialparams.szPhoneNumber(0), strNewPhoneNumber)
lngRetLstrcpy = lstrcpy(lprasdialparams.szCallbackNumber(0), strNewCallbackNumber)
lngRetLstrcpy = lstrcpy(lprasdialparams.szUserName(0), strNewUsername)
lngRetLstrcpy = lstrcpy(lprasdialparams.szPassword(0), strNewPassword)
lngRetLstrcpy = lstrcpy(lprasdialparams.szDomain(0), strNewDomain)
'ÎÒÃÇʹÓÃͬ²½Í¨ÐÅ
Screen.MousePointer = vbHourglass
hRasConn = 0 '
lngRetCode = RasDial(ByVal APINULL, vbNullString, lprasdialparams, APINULL, ByVal APINULL, hRasConn)
Screen.MousePointer = vbDefault
'²âÊÔÓÐûÓдíÎó
If lngRetCode Then
lngRetHangUp = RasHangUp(hRasConn)
End If
AddConnection = lngRetCode
End Function
Public Function GetConnections() As Integer
Dim lngRetCode As Long
Dim lpcb As Long
Dim lpcConnections As Long
Dim intArraySize As Integer
ReDim lprasconn95(intArraySize) As RASCONN95
lprasconn95(0).dwSize = 412
lpcb = 256 * lprasconn95(0).dwSize
lngRetCode = RasEnumConnections(lprasconn95(0), lpcb, lpcConnections)
' If lngRetCode = 0 Then
' End If
GetConnections = lpcConnections
End Function
'/////////////////////////////////////////////////////
Public Function HangUpAll() As Boolean
Dim lngRetCode As Long
Dim lpcb As Long
Dim lpcConnections As Long
Dim intArraySize As Integer
Dim intLooper As Integer
ReDim lprasconn95(intArraySize) As RASCONN95
lprasconn95(0).dwSize = 412
lpcb = 256 * lprasconn95(0).dwSize
lngRetCode = RasEnumConnections(lprasconn95(0), lpcb, lpcConnections)
If lngRetCode = 0 Then
If lpcConnections > 0 Then
For intLooper = 0 To lpcConnections - 1
RasHangUp lprasconn95(intLooper).hRasConn
Next intLooper
Else
HangUpAll = False
Exit Function
End If
End If
HangUpAll = True
End Function
调用方法:
拨号:temp = AddConnection("连接名", "", "", username, Password, "") 'ADSL
temp=0 成功,否则失败
断线: HangUpAll
到此,以上就是小编对于adsl拨号王的问题就介绍到这了,希望介绍关于adsl拨号王的3点解答对大家有用。