filewrite

[lmby]

使用filewrite时，如果文件超长，怎么办？

[xingxing]

看看fileread的example，一次写入32765个byte

[lmby]

直接用filewrite( ll_file, lb_pandian )作循环么？
可怎么知道第二次要从哪里开始写呢？

[wu_07]

li_len = len(lb_pict) //得到变量长度
if FileExists (currentdir+"/pic/.jpg") then FileDelete (currentdir+"/pic/.jpg")
li_f = FileOpen(currentdir+"/pic/.jpg",StreamMode! , write!, LockReadWrite! , Append! ) //以只读流模式打开文件

IF li_len > 32765 THEN //确定循环次数 loops
IF Mod(li_len, 32765) = 0 THEN
loops = li_len/32765
ELSE
loops = (li_len/32765) + 1
END IF
ELSE
loops = 1
END IF


FOR i = 1 to loops //将文件读入变量
blob data_1
// Read a blob data type into datablob.
data_1 = BlobMid(lb_pict, 32765*(i - 1), 32765)
FileWrite (li_f , data_1 )
NEXT

FileClose(li_f)