请教关于PB保存图片的问题

发布网友发布时间：2022-10-08 04:27

共2个回答

热心网友时间：2023-11-03 13:47

你要copy一个文件到本地？一段基本的代码，你参考下吧
int intcount,inttemp,intfileno
blob temp_blob,blob_cs,blob_1
long lngfilelength

lngfilelength = filelength("c:\1.pdf")
intcount = ceiling(lngfilelength/32765)
intfileno = fileopen("c:\1.pdf",StreamMode!,Read!,Shared!)
for inttemp = 1 to intcount
fileread(intfileno,temp_blob)
blob_cs = blob_cs + temp_blob
next

fileclose(intfileno)

inttemp = len(blob_cs)
intcount = ceiling(len(blob_cs)/32765)
intfileno = fileopen("c:\test.pdf",StreamMode!,Write!,LockWrite!,Replace!)
for inttemp = 1 to intcount
temp_blob = blobmid(blob_cs,32765 * (inttemp - 1 ) + 1,32765)
filewrite(intfileno,temp_blob)
next
fileclose(intfileno)

用blob类型的数据进行调换就行乐。

热心网友时间：2023-11-03 13:47

没太看明白，要把图片存在服务器上吗？用OLE里的FTP上传到指定文件夹，或者把文件搞成二进制blob型的存到数据库里！