近在眼前 端口
程序功能:实现简单的端口映射功能。
程序过程:使用服务器和客户组件启动端口服务。
程序支持:需要 网络通讯支持库 的支持
其它说明:虽然很简单,但是可以实现最基本的功能,也可以当代理服务器用。
.版本 2.支持库 sock
.程序集 窗口程序集1
.程序集变量 端口1
.程序集变量 端口2
.程序集变量 ip1, 文本型, , "0"
.程序集变量 ip2, 文本型
.程序集变量 客户信息, 文本型
.子程序 __启动窗口_创建完毕
.局部变量 i
' 虽然很简单,但是可以实现最基本的功能,也可以当代理服务器用哦
ip1 = 取本机IP ()
.如果 (取数组成员数 (ip1) = 2)
ip框1.内容 = ip1 [2]
.否则
ip框1.内容 = ip1 [1]
.如果结束
ip框2.内容 = ip框1.内容
.子程序 _按钮1_被单击
.如果真 (按钮1.标题 = “启动映射”)
服务器1.端口 = 到数值 (端口框1.内容)
标记 = “映射”
按钮1.标题 = “停止映射”
返回 ()
.如果真结束
按钮1.标题 = “启动映射”
服务器1.端口 = 0
.子程序 _服务器1_客户进入
客户信息 = 服务器1.取回客户 ()
客户1.连接 (ip框2.内容, 到数值 (端口框2.内容))
.子程序 _服务器1_数据到达
客户1.发送数据 (服务器1.取回数据 ())
.子程序 _客户1_数据到达
服务器1.发送数据 (客户信息, 客户1.取回数据 (), )
.子程序 _客户1_连接断开
服务器1.断开客户 (客户信息)
.子程序 _按钮3_被单击
结束 ()
.子程序 _按钮2_被单击
信息框 (“这个是最简单的端口映射程序” + #换行符 + #换行符 + 取空白文本 (12) + “近在眼前出品” + #换行符 + 取空白文本 (14) + “2005.0.12”, #信息图标, “关于程序:”)
对,就是要用端口映射。第一个参数的话要填你电脑的外网ip(查外网ip:在百度搜索输入 ip ,按回车就可也看到了)。
第二个参数是填你映射的那个端口,还有服务端的端口应该和你映射的端口一致才可以!
两种办法:1、在作为网关的电脑上装一个端口映射软件(可直接在网上免费下载,比如端口映射器(tcp mapping) v2.02)。
给用来做web服务器的那台电脑设置一个内网固定IP ,比如192.168.0.188。
然后在作为网关的那台电脑上打开端口映射软件,将外来指向固定IP 80端口的数据直接映 射到192.168.0.188上就可以了。
2、如果有路由器,在路由器里面开启DMZ,IP地址就填内网要提供服务的主机IP。
欢迎分享,转载请注明来源:夏雨云
评论列表(0条)