VB模拟POST网页上传文件模块【无控件】

小歆12年前软件源码212090

介绍

已经集成mod模块,使用的时候直接调用FileUpload函数就可以了。程序是使用抓包软件将上传过程截取下来,通过post模拟上传头数据,再把文件转换为二进制上传到网站上的。

 

网页源码

网页源码是参考html教程上面的实例,没什么技术含量,直接贴出来了:

<form action="" enctype="multipart/form-data" method="post"

name="uploadfile">上传文件:<input type="file" name="upfile" /><br>

<input type="submit" value="上传" /></form>

 

VB源码

界面如图所示,文本框从上到下是text2到text5,返回数据文本框是text1,代码如下:

Private Sub Command1_Click()

Text1.Text = "正在上传..."

Command1.Enabled = False

Text1.Text = FileUpload(Text2.Text, Text3.Text, Text4.Text, Text5.Text)

Command1.Enabled = True

End Sub

vb文件上传实例01.jpg

接下来说明一下FileUpload函数,定义方式如下:

Public Function FileUpload(url As String, filePath As String, typeName As String, webName As String) As String

参数url:为网页地址;

参数filePath:要上传的本地文件路径+文件名;

参数typeName:文件类型,可以是application/upload 或 image/jpeg等;

参数webName:字段名,类似HTML表单Form中的input name。

vb文件上传实例-源码.jpg

 

源码下载(含vb + php源码)

文件上传实例.rar

相关文章

vb中Msgbox函数的用法

VB中的Msgbox函数,可实现弹出窗口 作用:在对话框中显示消息,等待用户单击按钮,并返回一个 Integer 告诉用户单击哪一个按钮。 语法: MsgBox...

MacBook升级/全新安装正版Win10的方法

MacBook升级/全新安装正版Win10的方法

一、升级Win10方法介绍 我的笔记本是MacBook Pro Retina 13之前通过BootCamp安装了Win7(不带SP1)系统(以下所有的系统均是64位的,...

Altium如何佈蛇形線.jpg

【教程】Altium如何布蛇形线

Altium如何佈蛇形線   下载地址:        本地下载:Altium如何佈蛇形線.pdf  &nb...

软件版本号的英文代码大全

alphal 内部测试版 beta 外部测试版 demo 演示版 Enhance 增强版或者加强版 属于正式版 Free 自由版 Full version 完全版 属于正式版 sharew...

测判三极管的口诀

三极管的管型及管脚的判别是电子技术初学者的一项基本功,为了帮助读者迅速掌握测判方法,笔者总结出四句口诀:“三颠倒,找基极;PN结,定管型;顺箭头,偏转大;测不准,动嘴巴。”下面让我们逐句进行解释...

传感器技术手册

传感器技术手册

传感器技术手册 封面 简介        《传感器技术手册》从实用角度出发,全面讲述各类传感器的工作原理和设计应用。《传感器技术手册...

评论列表

行客
2021-04-21 09:44:33

你好,能交流一下吗?很多图片上传有错误提示,

DDD
2022-04-17 23:06:12

博主 以上代码测试中文文件名的时候会报错

发表评论    

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。