TGFC Lifestyle - Powered by Discuz! Board

标题: [其他] 跪求远程登录路由器操作电脑的教程吧！谢谢了！ [打印本页]

作者: wxfysl 时间: 2009-5-8 15:46 标题: 跪求远程登录路由器操作电脑的教程吧！谢谢了！

自己家和父母家很近，不想浪费他们2M的带宽。想远程操作下载。

我现在的设备应该比较齐全，有一个DD-WRT的 LINKSYS路由器，一个支持花生壳的TPLINK路由器（老款）。关注过一段时间了，试过花生壳的软件，无果。翻过以前的帖子，也没有成功。麻烦懂行的人给个教程吧？给个链接也可以。小弟跪谢了！

作者: sceic 时间: 2009-5-8 15:57

step1：下载IP更动邮件工具，只要IP变化，就会向指定邮箱发信新IP
下载地址http://www.92hot.cn/soft/html/24054.html

step2：安装远程控制软件Radmin 3.2服务器端RS到那边机器上，设置用户名和密码。

step3：收信查看IP，打开Radmin 3.2客户端RA登录远程屏幕。

完，有良心的给个jisao，谢谢。

作者: wxfysl 时间: 2009-5-8 15:59

jisao怎么给？谢谢了！

作者: sceic 时间: 2009-5-8 16:03

刚刚下了那个软件，貌似没法用，给你补一个excle vbs的程序吧，你看看能不能用。

自动发送本机ip地址到邮箱
提示：不是所有的邮箱都支持这种发送方式

Public old_ip As String
Sub ipsend(old_ip As String)
Dim MyIp As String
邮箱地址 = "XXX@xxx.com"    '改为自己的邮箱
邮箱密码 = "******"                   '改为邮箱的密码
发送邮箱的smtp = "123.456.789.123"    '改为邮箱的发送服务器地址 ip 或域名均可

Sheet1.Cells.ClearContents
'从网络获取ip地址是个笨办法
With Sheet1.QueryTables.Add(Connection:= _
      "URL;http://www.ikaka.com/ip/index.asp", Destination:=Sheet1.Range("A1"))
      .Name = "index"
      .FieldNames = True
      .RowNumbers = False
      .FillAdjacentFormulas = False
      .PreserveFormatting = True
      .RefreshOnFileOpen = False
      .BackgroundQuery = True
      .RefreshStyle = xlInsertDeleteCells
      .SavePassword = False
      .SaveData = True
      .AdjustColumnWidth = True
      .RefreshPeriod = 0
      .WebSelectionType = xlEntirePage
      .WebFormatting = xlWebFormattingNone
      .WebPreFormattedTextToColumns = True
      .WebConsecutiveDelimitersAsOne = True
      .WebSingleBlockTextImport = False
      .WebDisableDateRecognition = False
      .WebDisableRedirections = False
      .Refresh BackgroundQuery:=False
End With
'提取网页内容到字符串
For I = 1 To 30
   MyIp = MyIp  & Sheet1.Range("A" & I)
Next I
   MyIp = Mid(MyIp, InStr(1, MyIp, "["), Len(MyIp) - InStr(1, MyIp, "["))
   MyIp = Mid(MyIp, 1, InStr(1, MyIp, "]"))

If MyIp <> old_ip Then '检查ip地址是否改变

Set objEmail = CreateObject("CDO.Message")
With objEmail
      .From = 邮箱地址
      .To = 邮箱地址
      .Subject = MyIp & Format(Now(), "MM-DD hhmm")
   '.TextBody =
   ' .AddAttachment wName
      .HTMLBody = "<html><body>" & MyIp & "</body></html>"
      .Configuration.Fields.Item _
      ("http://schemas.microsoft.com/cdo/configuration/sendusername") = 邮箱地址
      .Configuration.Fields.Item _
      ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = 邮箱密码

      .Configuration.Fields.Item _
      ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
      .Configuration.Fields.Item _
         ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
      .Configuration.Fields.Item _
      ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = 发送邮箱的smtp
      .Configuration.Fields.Item _
      ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
      .Configuration.Fields.Update
      .HTMLBodyPart.Charset = "gb2312"
      .Send
  '    .Close
End With
Set objEmail = Nothing
old_ip = MyIp
End If
Old_time = Now + TimeSerial(0, 0, 60) '这里设置的60秒发一次
Application.OnTime Old_time, "'ipsend old_ip'"
End Sub
Sub Auto_Open()
'在工作表打开的时候先调用一次Macro，后续调用由OnTime完成。
Application.OnTime Now + TimeValue("00:00:02"), "'ipsend old_ip'"
End Sub

作者: hyh 时间: 2009-5-8 16:11

晕楼上的太复杂了。。。。
直接装个3322.org的动态dns就成。跑在电脑上。
远程只要映射3389端口出来就成。不过不安全。如果是windows 2003系统的话可以做个vpn。然后添加一个证书服务，然后vpn用l2tp，加密用客户端证书。路由器映射udp1701。
然后再用远程桌面连。这样对个人网络基本上算比较安全了。
再高级一点如果路由器支持vpn拨号可以在两个路由器上做site 2 site的vpn，电脑少就别折腾了没意义。

作者: sceic 时间: 2009-5-8 16:23

我那个IP发邮箱软件成功运行了，貌似还可以的。。嘿嘿适合菜鸟

作者: Kuzuryuusen 时间: 2009-5-8 16:33

既然离得近，常回家看看（下载机）多好

作者: hyh 时间: 2009-5-8 17:00

对了lz这个要求有个问题。如果不用qos的话。你用迅雷下东西的时候远程连接会慢的要命。

作者: 绯雨流 时间: 2009-5-8 17:14

就是发个木马程序过去

作者: 三娃 时间: 2009-5-8 20:43

pt站是可以看ip的不用装软件
http://ip:8080/gui 登录ut

作者: wei2525361 时间: 2009-5-8 21:17

申请花生壳账号，然后在网页登陆账号申请免费域名，在路由输入账号密码登陆花生壳账号完成动态解析。
用UT下载，打开远程管理，输入账号密码设置要监听端口同时在路由器做好端口映射。
然后利用IE输入 http://账号:密码@域名:端口/gui/ 即可进入管理界面。
或者用在计算机装远程工具直接控制整个计算机。

找了个教程
http://hi.baidu.com/wildgun/blog ... 5716a82fddd444.html

[ 本帖最后由 wei2525361 于 2009-5-8 21:23 编辑 ]

作者: Guardian 时间: 2009-5-9 14:18

先MARK~这样可以操作我公司下载~

作者: wxfysl 时间: 2009-5-13 10:26

继续求有没有简单一点的方法呢？

作者: weiges 时间: 2009-5-13 10:29

在下晚上用REALVNC控制公司的电脑继续工作

作者: 马甲君 时间: 2009-5-13 10:29

我用teamviewer

欢迎光临 TGFC Lifestyle (http://bbs.tgfcer.com/)