vf操作文件、加密数据库表等技巧
----------------------------知识改变生活 精品word文档 值得下载 值得拥有
----------------------------------------------
VF的几个技巧
一、如何取得某个文件的大小、修改日期及属性
语法:
ADIR(ArrayName [, cFileSkeleton [, cAttribute [, cCreatorType]]])
使用:
X=Adir(Myml,'C:\TEMP\*.DBF') 返回:
X=符合cFileSkeleton条件的文件或目录个数
Myml=一个有五列内容的数组。
这五列的含义是:
1 文件名 字符型
2 文件大小 数值型
3 文件日期 日期型
4 文件时间 字符型
5 文件属性 字符型
文件属性的含义:
A 档案文件 一 可读写
H 隐藏文件
R 只读文件
S 系统文件
D 目录或文件夹
二、利用Adir()可以检查某个目录是否存在:
X=Adir(Myml,'C:\ABCDE','D') IF X=0
wait wind '该目录不存在…'
ENDI
当然用下面的更简单:
if ! File('C:\ABCDE\nul')
wait wind '该目录不存在…'
endi
三、在VF中直接调出中文输入法
=IMESTATUS(1) 打开或关闭 IME (输入法编辑器)窗口或返回当前的 IME 状态 四、在VF中如何加密数据库文件
加密思路:数据库文件结构分为三部分:文件头部分、字段描述和记录部分。文件头部分的
第一个字节是chr(3),这样,就可以修改文件的第一个字节,使正常打开的方式不能浏览文件。
----------------------------知识改变生活 精品word文档 值得下载 值得拥有
----------------------------------------------
----------------------------知识改变生活 精品word文档 值得下载 值得拥有
----------------------------------------------
=FWRITE(hle,iif(fbyte==chr(3),chr(0),chr(26)))
&&假如第一个字节是chr(3)则用chr(0),否则用chr(26)写入。使用时要用到操作低级文件的几个函数。
五、有关操作文本文件的一些问
题
快递公司问题件快递公司问题件货款处理关于圆的周长面积重点题型关于解方程组的题及答案关于南海问题
1 库文件复制为标准
格式
pdf格式笔记格式下载页码格式下载公文格式下载简报格式下载
的数据文件
copy to bz.txt sdf next ... for ... while ... fields ...
2文本数据文件复制到在DBF文件
append form...sdf... 用法和copy to 一样
3几个打开TXT文件的函数
dd=fcreat('路径+文件名',n) dd为打开文件的句柄,n为0时(默认),可读写文件,为1时只读,为2时隐藏
dd=fopen(路径+文件名',n) n为0时只读(默认),为1时只写,为2时可读和写 =feof(dd) 判断是否在文件头
=fflush(dd) 更新并保存文件 将在缓冲区内打开的文件数据写入磁盘。并释放内存 =filetostr('路径+文件名') 将文件内容返回为一串字符
=fputs(dd,内容,写入符数) 写入字符,并在字符串的后面自动写入回车符及换行符chr(10)
=fwrite(dd,内容,写入符数) 写入字符,该函数适用于非文本文件和二进制文件。 fread(dd,读取的字节数)
fget(dd,读取的字节数) 默认最多可返回254个字节,但是,该函数遇回车符chr(13)时,将停止读取
=fseek(dd,字节数1,移到到位置n) 字节数为正时向文件尾移动,n为0表示文件头(默认),为1表示文件指针当前位置,为2表示文件尾。=seek(dd,0,0)表示移动到文件头。=seek(dd,0,2)可返回文件的总字节数。=fseek(dd,0,1)返回文件指针的当前位置。
=fseek(dd,10,1)将文件指针从当前位置向后移动10个字节。
----------------------------知识改变生活 精品word文档 值得下载 值得拥有
----------------------------------------------
----------------------------知识改变生活 精品word文档 值得下载 值得拥有
----------------------------------------------
ferror() 取得低级文件执行的错误码错误号 错误原因 如果低级文件函数执行成功,则
FERROR( ) 函数返回 0; VFP数据表加密解密程序
六、vf表单
设计
领导形象设计圆作业设计ao工艺污水处理厂设计附属工程施工组织设计清扫机器人结构设计
太大不能全部显示的技巧
1、菜单“工具”-》“选项”-》“表单”中的最大设计区改成你的电脑分辨率即可。
2、然后保存为默认值
----------------------------知识改变生活 精品word文档 值得下载 值得拥有
----------------------------------------------