DSAPI HTTP监听服务端与客户端
本文中,演示了使用DSAPI.网络相关.HTTP监听,快速建立服务端和客户端。
HTTP监听服务端的作用,是监听指定计算机端口,以实现与IIS相同的解析服务,提供客户端的网页请求,当然,这不仅仅是应用在网页方面。
DSAPI.网络.HTTP监听支持事件,在声明时,可使用WithEvents来使用其事件支持。
建立一个HTTP监听服务端
' 声明一个服务端
Private WithEvents 服务端 As New DSAPI.网络相关.HTTP监听
With 服务端
.绑定端口 = 2000 '要监听的端口
.参数前导符 = "DSAPI" '当使用参数前导符时,要追加的字串
.允许外网连接 = True '是否允许外网连接,如果为False,来自外网的http请求一律被拦截和丢弃
.使用参数前导符 = True '是否使用参数前导符
.启动监听() '开始监听
End With
参数前导符,是用来防止恶意请求,该前导符是追加在域名之后的,如客户端请求的域名是http://127.0.0.1:2000/DSAPI,则视为合法请求,否则服务端将拦截并丢弃。如果不使用参数前导符,则http://127.0.0.1:2000/ 被视为合法请求,并且无论后面追加的是什么内容,均接受,但不处理。
允许外网连接,开启此项后,只接收同网段IP客户端的http请求,其余请求被拦截或丢弃。
支持的事件
Private Sub 服务端_监听已启动() Handles 服务端.监听已启动 End Sub Private Sub 服务端_监听已停止() Handles 服务端.监听已停止 End Sub Private Sub 服务端_收到被阻止的客户端请求(客户端 As DSAPI.网络相关.HTTP监听.监听客户端) Handles 服务端.收到被阻止的客户端请求 End Sub Private Sub 服务端_收到客户端请求(客户端 As DSAPI.网络相关.HTTP监听.监听客户端) Handles 服务端.收到客户端请求 End Sub Private Sub 服务端_遇到错误(错误 As Exception) Handles 服务端.遇到错误 End Sub
监听已启动:当服务端启动监听并且监听成功时触发。
监听已停止:当服务端停止监听并且监听停止时触发。
收到被阻止的客户端请求:当一些不合法的http请求,如关闭允许外网连接情况下收到外网的请求,或开启前导符验证时收到没有正确前导符URL的请求时触发。
服务端_收到客户端请求:客户端http请求合法,并发来数据时触发。
服务端_遇到错误:服务端在启动监听、运行、停止监听过程中遇到一些意外时触发。
在收到客户端请求事件中,参数为封装了客户端请求信息的一个类,该类里包含所有与该客户端有关的信息。
以下演示当收到合法的客户端http请求时进行响应:
Private Sub 服务端_收到客户端请求(客户端 As DSAPI.网络相关.HTTP监听.监听客户端) Handles 服务端.收到客户端请求
Dim Rd As New IO.StreamReader(客户端.输入流)
Dim S As String = Rd.ReadToEnd
Select Case S
Case "hello"
服务端.写入信息到指定客户端输出流(客户端, "Hello,my friend")
Case "get"
服务端.写入信息到指定客户端输出流(客户端, IO.File.ReadAllBytes("c:\1.rar"))
Case Else
服务端.写入信息到指定客户端输出流(客户端, "No command here")
End Select
End Sub
上述代码中,"hello","get"都是从客户端的输入流输入的,这些内容均不会直接在url中显示出现,确保安全性。
以下演示建立一个Http请求客户端(可直接使用浏览器作为客户端)
Private Function 发送数据(网址 As String, 端口 As String, 前导参数 As String, 发送内容 As String) As String
'---------建立请求并发送内容
Dim R As Net.HttpWebRequest = Net.HttpWebRequest.Create(网址 & ":" & 端口 & "/" & 前导参数)
Dim Bts() As Byte = System.Text.Encoding.Default.GetBytes(发送内容) '内容编码成数组
R.Method = "POST" 'POST方式,可忽略
R.ContentLength = Bts.Length '发送内容长度
R.ContentType = "text/xml" '发送内容为文本
R.GetRequestStream.Write(Bts, 0, Bts.Length) '向输入流输出内容
'----------获取返回内容
Dim Rd As New IO.StreamReader(R.GetResponse.GetResponseStream)
Dim S As String = Rd.ReadToEnd '读取流内容
Rd.Close()
Return S
End Function
调用获取服务返回数据
方式1:
MsgBox(发送数据("http://127.0.0.1", 2000, "DSAPI", "hello"))
方式2:
直接使用浏览器访问http://127.0.0.1:2000 /DSAPI,但注意,浏览器无法手动输入提交内容,所以上述服务端中可判断请求内容是否为空。该方法可以实现返回一个网页数据,以直接在客户端浏览器中显示。
DSAPI HTTP监听服务端与客户端的更多相关文章
- DSAPI HTTP监听服务端与客户端_指令版
前面介绍了DSAPI多功能组件编程应用-HTTP监听服务端与客户端的内容,这里介绍一个适用于更高效更快速的基于HTTP监听的服务端.客户端. 在本篇,你将见到前所未有的超简化超傻瓜式的HTTP监听服务 ...
- DSAPI多功能组件编程应用-HTTP监听服务端与客户端_指令版
前面介绍了DSAPI多功能组件编程应用-HTTP监听服务端与客户端的内容,这里介绍一个适用于更高效更快速的基于HTTP监听的服务端.客户端. 在本篇,你将见到前所未有的超简化超傻瓜式的HTTP监听服务 ...
- DSAPI多功能组件编程应用-HTTP监听服务端与客户端
本文中,演示了使用DSAPI.网络相关.HTTP监听,快速建立服务端和客户端. HTTP监听服务端的作用,是监听指定计算机端口,以实现与IIS相同的解析服务,提供客户端的网页请求,当然,这不仅仅是应用 ...
- select监听服务端
# can_read, can_write, _ = select.select(inputs, outputs, None, None)## 第一个参数是我们需要监听可读的套接字, 第二个参数是我们 ...
- C#Winform窗体实现服务端和客户端通信例子(TCP/IP)
Winform窗体实现服务端和客户端通信的例子,是参考这个地址 http://www.cnblogs.com/longwu/archive/2011/08/25/2153636.html 进行了一些异 ...
- python thrift 服务端与客户端使用
一.简介 thrift是一个软件框架,用来进行可扩展且跨语言的服务的开发.它结合了功能强大的软件堆栈和代码生成引擎,以构建在 C++, Java, Python, PHP, Ruby, Erlang, ...
- linux(centos 6.4)下安装php memcache服务端及其客户端(详细教程)
前言 在搭建个人博客时,由于没有使用任何框架,纯手工code前台和后台,导致遇到许多问题,其中一个问题就是mysql连接导致的页面相应速度异常低.在查询各种途径后,只能考虑使用memcache缓存.在 ...
- [C语言]一个很实用的服务端和客户端进行TCP通信的实例
本文给出一个很实用的服务端和客户端进行TCP通信的小例子.具体实现上非常简单,只是平时编写类似程序,具体步骤经常忘记,还要总是查,暂且将其记下来,方便以后参考. (1)客户端程序,编写一个文件clie ...
- Java TCP服务端向客户端发送图片
/** * 1.创建TCP服务端,TCP客户端 * 2.服务端等待客户端连接,客户端连接后,服务端向客户端写入图片 * 3.客户端收到后进行文件保存 * @author Administrator * ...
随机推荐
- Linux用命令启动程序(eclipse、IDEA等)
打开根目录用管理员权限打开HOME 找到下图截图中的框选出的文件 用文本编辑器打开后 在文件末尾添加所需要打开的应用文件所在的目录 这里以本人的IDEA和eclipse为例:
- [LeetCode] Shifting Letters 漂移字母
We have a string S of lowercase letters, and an integer array shifts. Call the shift of a letter, th ...
- 【MyBatis源码分析】环境准备
前言 之前一段时间写了[Spring源码分析]系列的文章,感觉对Spring的原理及使用各方面都掌握了不少,趁热打铁,开始下一个系列的文章[MyBatis源码分析],在[MyBatis源码分析]文章的 ...
- SQL Server 创建服务器和数据库级别审计
一.概述 在上一篇文章中已经介绍了审计的概念:本篇文章主要介绍如何创建审计,以及该收集哪些审核规范. 二.常用的审核对象 2.1.服务器审核对象 1.FAILED_LOGIN_GROUP( Audit ...
- 用Vue2仿京东省市区三级联动效果
三级联动,随着越来越多的审美,出现了很多种,好多公司都仿着淘宝的三级联动 ,好看时尚,so我们公司也一样……为了贴代码方便,我把写在data里面省市区的json独立了出来,下载贴进去即可用,链接如下 ...
- 【安富莱二代示波器教程】第17章 附件B---功能扩展和改进方向
完整教程下载地址:http://forum.armfly.com/forum.php?mod=viewthread&tid=45785 第17章 附件B---功能扩展和改进方向 ...
- [Swift]LeetCode643. 子数组最大平均数 I | Maximum Average Subarray I
Given an array consisting of n integers, find the contiguous subarray of given length k that has the ...
- [Swift]LeetCode907. 子数组的最小值之和 | Sum of Subarray Minimums
Given an array of integers A, find the sum of min(B), where B ranges over every (contiguous) subarra ...
- kubernetes---kubectl 管理集群资源
由于我现在的集群是把虚拟机的master文件直接拷贝过来的,所以之前的node节点是不存在的,只有k8s-ubuntu-1是新加入的,所以我要把上面之前创建的资源删除 删除deployment--&g ...
- Jmeter-阶梯场景设置
接上一篇[Jmeter-常用线程组设置及场景运行时间计算] Jmeter复杂场景设计,依赖插件jp@gc - Stepping Thread Group (deprecated)和jp@gc - Ul ...