以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教ip地址  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139673)

--  作者:hbhb
--  发布时间:2019/8/19 9:03:00
--  请教ip地址
大师:请教一个问题?
假如甲、乙、丙、丁四人,都通过一路由器无线上网,甲的电脑中有一文件,希望乙、丙、丁,都能连接编辑。甲如何获得自身ip,并告知其他人通过此ip地址访问?

--  作者:有点蓝
--  发布时间:2019/8/19 9:29:00
--  
参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=133049&skin=0,通过openQQ通知其它人

其实还不如建一个固定共享文件夹,大家同时访问

--  作者:hbhb
--  发布时间:2019/8/19 10:10:00
--  
谢谢!那如果甲作为服务器呢,提供web数据源,可以吗?
请问:上面的代码获得的ip地址,异地能通过外网访问吗?

--  作者:有点蓝
--  发布时间:2019/8/19 10:41:00
--  
局域网ip,外网肯定无法访问。如果宽带有固定ip,可以在路由做端口映射,然后通过外网ip访问
--  作者:hbhb
--  发布时间:2019/8/19 11:02:00
--  
像这种情况怎么办,我带一台笔记本电脑到一公司工作。用该公司的无线网络连接上网,我如何创建一个web数据源,ip地址,并告知异地的工作人员通过外网ip地址连接此数据源。这个ip地址怎么搞?
--  作者:有点蓝
--  发布时间:2019/8/19 11:30:00
--  

简单的打开这个网址(http://2019.ip138.com/ic.asp)可以查看自己的外网ip

 

Dim hc As New HttpClient("http://2019.ip138.com/ic.asp")

Dim ret As String = hc.GetData()

Dim mc = System.Text.RegularExpressions.Regex.Matches(ret, "[0-9]+\\.[0-9]+\\.[0-9]+\\.[0-9]+")

If mc.count > 0 Then

    msgbox( mc(0).value)

Else

    msgbox("没找到")

End If



--  作者:有点蓝
--  发布时间:2019/8/19 11:31:00
--  
但是如果别人家的公司没有做路由映射到您电脑,也是没有办法访问的
--  作者:浙江仔
--  发布时间:2019/8/19 11:34:00
--  
像这种,服务端肯定要单独设置了啊,哪有服务器打游击的
--  作者:hbhb
--  发布时间:2019/8/19 12:48:00
--  
以下这种情况可以解决吗?
比如我是一个项目的负责人,项目小组10人。我们到了一家公司审计,我的这台电脑作为服务端制作web数据源,让其他电脑作为客户端访问数据源并编辑,其他小组人员有的在一起办公(局域上网)连接我电脑的数据源,还有一部分人在异地,也要访问连接我的数据源工作。
这样我要提供ip地址供其他人(客户端)访问。分别如何提供?


--  作者:浙江仔
--  发布时间:2019/8/19 13:39:00
--  
在你一个地方的,可以用你的电脑或网络设备单独组网,相对来讲ip也是固定的
但是异地人员的话,跟你网络设备的配置有关系,如果可以做到动态ip,那么可以方便的连接你的数据(前提是你自带上网并且具有真实ip的网络)。
如果你的网络连入不同的地方,需要那个地方提供网络的配置(对外的端口,ip地址等),非常不方便。

建议购买一个云主机,把数据服务端放到云上,那么走到哪里,别人都可以连入