• 断开或自动连接ADSL


    一、断开ADSL命令

    rasphone -h ADSL

    二、自动连接ADSL命令

    rasdial ADSL 用户名 密码

    三、其他方法

    假设你的电脑的PPPOE拨号连接的名字是“宽带连接”,用户名是“abc”,密码是 “123”。

    开始拨号命令:Rasdial 宽带连接 abc
    123

    断开拨号命令:Rasdial 宽带连接
    /disconnect


    可直接使用.NET调用DOS命令。取出返回值就知道有没有拨号成功。



    以下是使用代码。


    Module LanConnMod


    ''' <summary>

    ''' 网络连接。

    ''' </summary>

    ''' <param name="LanName">名称。</param>

    ''' <param name="User">用户名。</param>

    ''' <param name="Pass">密码。</param>

    ''' <returns></returns>

    ''' <remarks></remarks>

    Public Function LanConnect(ByVal LanName As String, ByVal User As String, ByVal Pass As String) As Boolean

    '开始连接

    Dim Info As New ProcessStartInfo("Rasdial")

    Info.Arguments
    = String.Format("{0} {1} {2}", LanName, User, Pass)

    Info.CreateNoWindow
    = True

    Info.RedirectStandardOutput
    = True

    Info.UseShellExecute
    = False

    Dim RefText As String = Process.Start(Info).StandardOutput.ReadToEnd()

    If RefText.Contains("命令已完成") Then

    Return True

    Else

    Return False

    End If

    End Function


    ''' <summary>

    ''' 断开连接。

    ''' </summary>

    ''' <param name="LanName">名称。</param>

    ''' <returns></returns>

    ''' <remarks></remarks>

    Public Function LanConnectClose(ByVal LanName As String) As Boolean

    '开始连接

    Dim Info As New ProcessStartInfo("Rasdial")

    Info.Arguments
    = String.Format("{0} {1}", LanName, "/disconnect")

    Info.CreateNoWindow
    = True

    Info.RedirectStandardOutput
    = True

    Info.UseShellExecute
    = False

    Dim RefText As String = Process.Start(Info).StandardOutput.ReadToEnd()

    If RefText.Contains("命令已完成") Then

    Return True

    Else

    Return False

    End If

    End Function

    End Module
     

  • 相关阅读:
    <<C++ Primer>> 第三章 字符串, 向量和数组 术语表
    <<C++ Primer>> 第二章 变量和基本类型 术语表
    <<C++ Primer>> 第一章 开始 术语表
    PAT A1077 Kuchiguse (20)
    PAT A1035 Password (20)
    PAT A1005 Spell It Right (20)
    <<C++ Primer>> 术语表 (总) (待补充)
    PAT A1001 A+B Format (20 分)
    PAT B1048 数字加密 (20)
    Protocol
  • 原文地址:https://www.cnblogs.com/shuiguang/p/2043381.html
Copyright © 2020-2023  润新知