一、vb.NET的程序
1、发送数据
Imports System.Net
Imports System.Text
Public Sub POST_DATA()
'’数据发送请求
Try
Dim WebClientObj As New System.Net.WebClient()
Dim url1 As String = "http://127.0.0.1:5000/cemsdata"
Try
'请求URL和数据
Dim byRemoteInfo As String = WebClientObj.UploadString(url1, "1111")
'这是获取返回信息
Dim str5 As String = byRemoteInfo
Catch
End Try
Catch ex As Exception
End Try
End Sub
通过webclinet发送数据,WebClientObj.UploadString(url1, "1111")
这行代码发送了一个 POST 请求到指定的 URL(url1
)并传递了一个参数("1111")。然后,byRemoteInfo
变量被赋值为服务器返回的值。
1111可以替换成需要发送的数据。
2、vb.net 接口POST方式传参数提交返回值
Imports System.Net
Imports System.Text
Public Sub POST_DATA()
'’参数请求
Try
Dim WebClientObj As New System.Net.WebClient()
Dim PostVars As New System.Collections.Specialized.NameValueCollection()
Dim url1 As String = "http://127.0.0.1:5000/cemsdata"
PostVars.Add("actio", "get")
PostVars.Add("mn", "HC632")
PostVars.Add("datate", "minu")
Try
'请求URL和参数
Dim byRemoteInfo As Byte() = WebClientObj.UploadValues(url1, "POST", PostVars)
'获取返回信息
Dim sRemoteInfo As String = System.Text.Encoding.[Default].GetString(byRemoteInfo)
'这是获取返回信息
Dim str5 As String = sRemoteInfo
Catch
End Try
Catch ex As Exception
End Try
End Sub
通过请求URL和参数发送post,获取返回信息。
其中byRemoteInfo为发送、返回值, Dim sRemoteInfo As String = System.Text.Encoding.[Default].GetString(byRemoteInfo)是把byRemoteInfo转换为string值。sRemoteInfo
就是 byRemoteInfo
的字符串表示形式。
二、python的的程序
from flask import Flask, render_template, request, redirect, url_for,jsonify
app = Flask(__name__)
@app.route('/cemsdata', methods=['POST'])
def process_data():
# 请求方式为post时,可以使用 request.get_json()接收到JSON数据
data = request.data
# 如果得到的data是字符串格式,则需要用json.loads来变换成python格式,看个人需求
# data = json.loads(data)
print(data) # 获取 POST 请求中的 JSON 数据
return data
if __name__ == '__main__':
app.run()
data为vb.NET发送过来的数据。与.NET第一条相对应。