考试网 >> IT认证 >> Linux >> Linux指导 >> Telnet到Scounix执行并取得结果

发布时间：2006-06-28 10:22     点击：

       Telnet1.Connect(HostIP, 23)       

     ENDIF      

    thisform.AddLog(Tsys_kind,"已连接" + vbCrLf)

    Data = ""

    Telnet1.Search (@Data, "login:")

     * thisform.AddLog( Tsys_kind,Data)

    Telnet1.Send(User_name + vbCrLf)

    Data = ""

    Telnet1.Search(@Data, "Password:")

    *  thisform.AddLog(Tsys_kind,Data)

    Telnet1.Send (User_pwd + vbCrLf)

    Data = ""

    Telnet1.Search(@Data, ">")

   *   thisform.AddLog(Tsys_kind,Data)

    Telnet1.Send ("su" + vbCrLf)

    Telnet1.Search (@Data, "Password:")

    *  thisform.AddLog(Tsys_kind,data)

    Telnet1.Send(root_pwd + vbCrLf)

    Telnet1.Search(@Data, "#")

    * thisform.AddLog(Tsys_kind,Data)

    Telnet1.Send(shell_cmd + vbCrLf)

    Telnet1.Search(@Data, "#")

   * thisform.AddLog(Tsys_kind,data)

    

　　***************取出的数据

发表评论： 匿名发表 用户名: 查看评论

您将承担一切因您的行为、言论而直接或间接导致的民事或刑事法律责任 留言板管理人员有权保留或删除其管辖留言中的任意内容 本站提醒：不要进行人身攻击。谢谢配合。