本站小編為你精心準備了探討vfp編程的使用心得參考范文,愿這些范文能點燃您思維的火花,激發您的寫作靈感。歡迎深入閱讀并收藏。
關鍵詞:計算機;編程;vfp6;實用;小技巧
摘要:本文列出了vfp四個編程小技巧,使編程工作變得輕松方便,給學習vfp編程人員一定的幫助。
一、實現只開一個vfp程序窗口
編寫完成一個vfp程序后,不允許在已經運行該程序情況下,又繼續再次運行,否則會出現報錯提示。
為防止操作員連續運行程序,可以用下段程序命令阻止其運行,保證只開一個程序窗口,下邊命令段放在vfp的jpg主程序中,就可以實現正常只開一個程序窗口:
localwindowbt
windowbt=’最終打開窗口的標題名’
declareintegerfindwindowinuser32.dllasfind_windowstring,string
iffind_window(0,windowbt)!=0
messagebox("本系統已經運行了!",48,’系統信息’)
quit
endif
程序說明:其中變量windowbt的賦值為最終你打開的vfp窗口標題名。
二、防止程序退出時不能退出的錯誤提示
一個程序系統編寫完成后,在退出vfp程序時出現下列提示,導致不能退出程序的問題。
我們可以事先保存一個jpg小文件,內容只有一個命令quit,起名為q.jpg。然后在主程序中加入這樣一條命令就可以巧妙地解決上述問題。命令為:onshutdowndoq.prg
三、讓程序在脫離vfp管理系統環境下運行
如果在windows系統下直接運行vfp的exe程序,出現了下面的錯誤提示:
而在vfp環境中運行卻不會出現,說明在程序運行的文件夾下缺少vfp的一些環境運行的系統文件,只要將vfp的系統文件拷貝過來就可以了。下面列出的是操作程序脫離vfp環境后可以支持其正常運行的系統文件名。
vfpodbc.dll
vfp6rchs.dll
vfp6renu.dll
vfp6r.dll
請在vfp安裝文件夾下找到以上4個文件后,再復制到你所編寫的操作程序文件夾下,之后你就可以在脫離vfp的環境下獨立運行操作程序了。
四、數據表加密方法
因為在vfp環境中很容易地將數據表打開查看,數據保密性變差,所以有必要對數據表進行加密處理。
下面一段是加密命令程序,這段程序可以放在程序退出前或者單獨對某個數據表進行加密:
nn=13
i=0
dowhili<nn
handle=fopen(’加密的數據表名稱.dbf’,2)
ifhandle=-1
=messagebox(’無法加密表文件’)
retu
endi
keybyte=fread(handle,1)
=fseek(handle,0)
=fwrite(handle,chr(asc(keybyte)+12))
=fclose(handle)
i=i+1
endd
數據加密后,必須進行解密處理后才能正常使用,下面這段程序可以針對上面加密情況下進行解密,可以放在jpg主程序中或者單獨對數據表進行解密:
nn=13
i=0
dowhili<nn
handle=fopen(’解密的數據表名.dbf’,2)
ifhandle=-1
=messagebox(’無法解密總表文件’)
retu
endi
keybyte=fread(handle,1)
=fseek(handle,0)
=fwrite(handle,chr(asc(keybyte)-12))
=fclose(handle)
i=i+1
endd
經過以上加密和解密的處理,數據表的安全性、保密性大大提高。