如何把数据库中的二进制图像读出来并存成对应各式的图片文件?

时间:2021-04-16 21:43:18
代码我大致知道点,,,我在本机上调试都没问题了,,到了,服务器就不行了,,
我知道是文件权限的问题,,我们的网站的源代码放在比如e:/aaa下,,在aaa文件夹里有firename的文件夹(这个文件夹我已经设了everyone可用)

这样的样子,在服务器上不行。

我想是不是要把aaa文件夹也设everyone可用的文件权限啊,,这样的话,是不是会不安全啊?

因为aaa文件夹下有我们公司很多客户的网站的源代码呢 



先在这里谢谢了,,
请热心的高手指点指点

11 个解决方案

#1


我自己顶一下

#2


你使用了FSO所以必须设置IIS里边这个站点的属性=〉虚拟目录=〉“写入”前面打勾
不然没有权限

#3


blow_jj(阿俊) (把aaa文件夹的属性设everyone可用,是不是很你一样啊

#4


读取二进制图片正确代码:给我加分吧
<%
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) '这里就是图像部分了。

set rs=server.CreateObject("adodb.recordset")
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
sql="SELECT * FROM imgtable"
rs.Open sql,strconn,1,3

rs.AddNew '因为表单二在表单一提交的过程中下提交了。
rs("img").appendchunk Image '所以这里是添加。
rs.Update
rs.Close


response.contenttype="image/gif" 
response.binarywrite imageup(formsize,formdata) '这里是显示图像。表示成功!

%>

#5


我不是这样的啊,,,
你看看我的问题

#6


我再说一下我的问题吧:
我现在的数据库里存的图片都是二进制的,,这样下去我担心数据库会变的很大,,
所以我现在想把这些二进制的图片全部转变成.jpg图片格式,存到文件里,,数据库里就存图片名

#7


自己在顶一下,

#8


学习

#9


大家帮忙顶啊

#10


好了,哈哈

#11


你现在上传图片文件的代码和数据库结构能不能共享一下,king2000ygy@163.com,先谢谢了。

#1


我自己顶一下

#2


你使用了FSO所以必须设置IIS里边这个站点的属性=〉虚拟目录=〉“写入”前面打勾
不然没有权限

#3


blow_jj(阿俊) (把aaa文件夹的属性设everyone可用,是不是很你一样啊

#4


读取二进制图片正确代码:给我加分吧
<%
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) '这里就是图像部分了。

set rs=server.CreateObject("adodb.recordset")
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
sql="SELECT * FROM imgtable"
rs.Open sql,strconn,1,3

rs.AddNew '因为表单二在表单一提交的过程中下提交了。
rs("img").appendchunk Image '所以这里是添加。
rs.Update
rs.Close


response.contenttype="image/gif" 
response.binarywrite imageup(formsize,formdata) '这里是显示图像。表示成功!

%>

#5


我不是这样的啊,,,
你看看我的问题

#6


我再说一下我的问题吧:
我现在的数据库里存的图片都是二进制的,,这样下去我担心数据库会变的很大,,
所以我现在想把这些二进制的图片全部转变成.jpg图片格式,存到文件里,,数据库里就存图片名

#7


自己在顶一下,

#8


学习

#9


大家帮忙顶啊

#10


好了,哈哈

#11


你现在上传图片文件的代码和数据库结构能不能共享一下,king2000ygy@163.com,先谢谢了。