最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
这个问题我刚刚前两天做过,呵呵(会不会加入精华区)
时间:2022-07-02 23:25:35 编辑:袖梨 来源:一聚教程网
例表test
id int IDENTITY (1, 1) NOT NULL ;
testtext ntext;
images image;
提交文件里的表单如下设置:
同时在提交表单的文件的head里加入如下代码:
upload.asp里的主要代码:
<%
FormSize = Request.TotalBytes '得到数据
FormData = Request.BinaryRead( FormSize )
function ImageUp(formsize,formdata) '这个函数的功能是截取其中的图像部分。
bncrlf=chrb(13) & chrb(10) '做成函数后。以后你可以自己随意使用了。
divider=leftb(formdata,instrb(formdata,bncrlf)-1)
datastart=instrb(formdata,bncrlf&bncrlf)+4
dataend=instrb(datastart+1,formdata,divider)-datastart
imageup=midb(formdata,datastart,dataend)
end function
Image=ImageUp (FormSize,Formdata) '这里就是图像部分了。
if FormSize<>"" then
response.write "正在上传您的签名图片....
"
set rs=server.CreateObject("adodb.recordset")
sql="SELECT * FROM test where id is null"
rs.Open sql,conn,1,3
rs.AddNew '因为表单二在表单一提交的过程中下提交了。
rs("images").appendchunk Image '所以这里是添加。
id int IDENTITY (1, 1) NOT NULL ;
testtext ntext;
images image;
提交文件里的表单如下设置:
同时在提交表单的文件的head里加入如下代码:
upload.asp里的主要代码:
<%
FormSize = Request.TotalBytes '得到数据
FormData = Request.BinaryRead( FormSize )
function ImageUp(formsize,formdata) '这个函数的功能是截取其中的图像部分。
bncrlf=chrb(13) & chrb(10) '做成函数后。以后你可以自己随意使用了。
divider=leftb(formdata,instrb(formdata,bncrlf)-1)
datastart=instrb(formdata,bncrlf&bncrlf)+4
dataend=instrb(datastart+1,formdata,divider)-datastart
imageup=midb(formdata,datastart,dataend)
end function
Image=ImageUp (FormSize,Formdata) '这里就是图像部分了。
if FormSize<>"" then
response.write "正在上传您的签名图片....
"
set rs=server.CreateObject("adodb.recordset")
sql="SELECT * FROM test where id is null"
rs.Open sql,conn,1,3
rs.AddNew '因为表单二在表单一提交的过程中下提交了。
rs("images").appendchunk Image '所以这里是添加。
相关文章
- jk漫画最新版本下载安装入口-jk漫画官方正版下载安装详细教程 01-29
- outlook邮箱登录-微软官方outlook登录入口 01-29
- 豆包官网网页版入口-豆包AI在线网页版入口 01-29
- 君有疾否原著小说下载-君有疾否原著未删减小说txt免费下载地址 01-29
- 王者荣耀云游戏极速入口-王者荣耀云端畅玩开黑免下载直达 01-29
- 即梦AI电脑版登录入口-即梦AI网页版官方入口 01-29