開啟檔案
global type gf_readfile from function_object
end type
forward prototypes
global function blob gf_readfile (string as_path, string as_file)
end prototypes
global function blob gf_readfile (string as_path, string as_file);integer li_filenum, loops, i//wxk20110214
long flen, bytes_read, new_pos
blob b, tot_b
//得到當前選擇的檔案的內容大小，sle_filename包含檔案所在路徑及檔名
flen = filelength(as_path)
//開啟檔案
li_filenum = fileopen(as_path,streammode!, read!, lockread!)
//由於fileread函式一次只能讀出32765大小的資料，所以先計算讀取次數
if flen > 32765 then
if mod(flen, 32765) = 0 then
loops = flen/32765
else
loops = (flen/32765) + 1
end if
else
loops = 1
end if
new_pos = 1
//分多次讀出檔案中的所有資料，放在tot_b變數中
for i = 1 to loops
bytes_read = fileread(li_filenum, b)
tot_b = tot_b + b
next
//關閉檔案
fileclose(li_filenum)
return tot_b
end function
global type gf_writefile from function_object
end type
forward prototypes
global function integer gf_writefile (string as_file_name, blob ab_to_write)
end prototypes
global function integer gf_writefile (string as_file_name, blob ab_to_write);integer li_filenum, loops, i
long flen, bytes_read//, new_pos
blob b
flen = len(ab_to_write)
li_filenum = fileopen(as_file_name,streammode!, write!,lockreadwrite!,replace! )
if li_filenum < 0 then
// if not this.del(as_file_name) then
// return -1
// else
li_filenum = fileopen(as_file_name,streammode!, write!,lockreadwrite!,replace! )
if li_filenum < 0 then
return -2
end if
// end if
end if
if flen > 32765 then
if mod(flen, 32765) = 0 then
loops = flen/32765
else
loops = (flen/32765) + 1
end if
else
loops = 1
end if
//new_pos = 1
for i = 1 to loops
filewrite(li_filenum,blobmid(ab_to_write,32765 * (i - 1) + 1,32765 ))
next
fileclose(li_filenum)
return 1
end function
檔案，檔案的開啟，拷貝，寫入
什麼是檔案 檔案是作業系統提供的虛擬的單位,有了檔案我們可以讀取資料,沒有檔案的話應該去硬碟上扣動機械手臂然後尋找資料.如何使用檔案 開啟檔案 讀寫資料 儲存關閉檔案 f open r c users nickc desktop test.txt encoding gbk 相當於你開啟的檔案 pri...
C 檔案操作 開啟檔案和寫入檔案
如果程式的執行結果僅僅顯示在螢幕上，當要再次檢視結果時，必須將程式重新執行一遍 而且，這個結果也不能被保留。如果希望程式的執行結果能夠永久保留下來，供隨時查閱或取用，則需要將其儲存在檔案中。外部檔案和內部檔案 外部檔案 指磁碟檔案，也是通常所謂的檔案。內部檔案 指在程式中執行的檔案，更正式的稱謂是 ...
C 檔案操作 開啟檔案和寫入檔案
如果程式的執行結果僅僅顯示在螢幕上，當要再次檢視結果時，必須將程式重新執行一遍 而且，這個結果也不能被保留。如果希望程式的執行結果能夠永久保留下來，供隨時查閱或取用，則需要將其儲存在檔案中。外部檔案和內部檔案 外部檔案 指磁碟檔案，也是通常所謂的檔案。內部檔案 指在程式中執行的檔案，更正式的稱謂是 ...