文件列表:

200713193018\文件远程存取服务系统V1.05\resource\112.bmp (246, 2003-12-04)
200713193018\文件远程存取服务系统V1.05\resource\ie4.bmp (246, 2003-12-04)
200713193018\文件远程存取服务系统V1.05\resource\Thumbs.db (4096, 2007-01-31)
200713193018\文件远程存取服务系统V1.05\resource (0, 2007-02-05)
200713193018\文件远程存取服务系统V1.05\XceedZip.dll (284032, 2003-12-04)
200713193018\文件远程存取服务系统V1.05\pbunzip.exe (75264, 2003-12-04)
200713193018\文件远程存取服务系统V1.05\softup.exe (456704, 2003-12-04)
200713193018\文件远程存取服务系统V1.05\效果.gif (19889, 2007-01-31)
200713193018\文件远程存取服务系统V1.05 (0, 2007-02-05)
200713193018\文件远程存取服务系统V1.05\resource\b5.ico (3262, 2003-12-04)
200713193018\文件远程存取服务系统V1.05\zip.ico (3262, 2003-12-04)
200713193018\文件远程存取服务系统V1.05\pbunzip.pbl (87552, 2007-01-31)
200713193018\文件远程存取服务系统V1.05\softup.pbl (775680, 2007-01-31)
200713193018\文件远程存取服务系统V1.05\softup.pbr (34, 2003-12-04)
200713193018\文件远程存取服务系统V1.05\softup.pbt (162, 2007-01-31)
200713193018\文件远程存取服务系统V1.05\softup.pbw (158, 2007-01-31)
200713193018\文件远程存取服务系统V1.05\table.sql (411, 2003-12-04)
200713193018 (0, 2007-02-05)

本程序用于文件远程存取 本程序只有在编译以后才可以正常调试和使用，否则某些功能会异常或错误。 一.功能介绍 1.将文件以二进制方式存放于数据表中。 2.本程序没有权限控制，所有文件存放在唯一的一张表里。 3.不存在真实的目录概念。 4.本程序无法提供类似FTP的复杂功能。 5.本程序只是一个维护自动升级文件的一个工具而已。 6.基于以上几点，本程序仍然可以模仿一个简单的FTP文件存取功能。 7.制作自动升级程序简单，在原有主程序中或者单独写一个应用，嵌入一小段函数调用即可完成。 二.用于自动升级时的几个要点 1.存储类型：分为“压缩、不压缩、主程序、手工压缩”，分别介绍如下： a.压缩，程序在上传时自动压缩为zip文件，以便节约空间，并起到加密作用。 b.不压缩，按文件原格式存放，一些文件不能压缩存放(比如，压缩控件本身，一些下载时间先与压缩控件下载前的文件)。 c.主程序，也是压缩存放，主要用于升级文件本身，一些需要关闭程序才能重写的文件（如应用程序启动文件和一些dll文件），一些需要最后才被写入的文件（如版本控制文件）。 d.手工压缩，根据需要手工把部分文件压缩成一个文件，或把子目录文件压缩成带path一个文件，注意的是手工压缩时也要使用程序中定义的密码(nvo_zip中的is_pwd变量)来压缩。 2.版本号：格式为“2003-08-01 00:00:00”，升级程序依据此来下载文件。 3.相对路径：就是相对主应用程序的目录，要让升级程序下载文件后存放于相应的子目录中。 4.数据表中要建有"system"目录，存放pbunzip.exe(不压缩)和XceedZip.dll(不压缩)文件。 三.自动升级函数（of_liveupdate）参数说明： as_verold string 当前版本号 as_softid string 文件在服务器的存放目录，用“,”相隔多个目录 as_filename string 用于下载单个文件（空串为所有文件，可使用“％”） as_softexe string 软件启动程序exe文件名,也就是调用本函数的EXE文件名 as_trans transaction 连接文件数据库的事务 as_str string 系统保留（如果编写的是“在线安装”程序，本参数为“SETUP”） as_msg string 'yes':跳出“存在新版本，是否升级的确认框” as_show string 'show':显示下载进程窗口 函数返回： integer 1： 正常 -1,-2,-3: 出错 -100： 用户按了“取消”按钮 四.用于自动升级的代码范例如下(需要nvo_zip控件和w_upgrade窗口)： //以下是调用自动升级的步骤 //版本号 string ls_ver='2003-05-22 00:00:00' //远程目录 string ls_softid='ats_other,ats_pbd,ats_pbdll' //软件启动程序exe文件名(就是本程序的exe文件名) string ls_softexe='ats.exe' nvo_zip lnvo_zip //下面一段是用版本控制文件来控制软件的升级 //如果不使用版本控制文件，而采用版本号内嵌在主程序中的方法，那么注释下面一段 if FileExists ( 'ats_vercontrol.dll' ) then blob s string sd,ls_ver1 lnvo_zip.uf_fileread('ats_vercontrol.dll' ,s) sd=string(s) ls_ver1=lnvo_zip.of_str_xor(mid(sd,125,19),lnvo_zip.is_pwd) sd=string(datetime(date(left(ls_ver1,10)),time(right(ls_ver1,8)))) if sd='1900-1-1 00:00:00' or ls_ver1='' or len(ls_ver1)<>19 then else ls_ver=ls_ver1 end if end if //版本控制文件结束 //下面执行升级函数 //参数 //ls_ver:当前版本 //ls_softid:文件在服务器的存放目录，用“,”相隔多个目录 //空串：用于下载单个文件（空串为所有文件，可使用“％”） //ls_softexe:软件启动程序exe文件名,也就是本程序的EXE文件名 //sqlca:连接文件数据库的事务 //空串:系统保留 //'yes':是否跳出“存在新版本，是否升级的确认框” //'show':显示下载进程窗口 lnvo_zip.of_liveupdate(ls_ver,ls_softid,'',ls_softexe,sqlca,'','yes','show') //=============调用自动升级的步骤完成 //执行主应用程序 //如果上面的代码是内嵌在主应用程序中的，那么下面的代码就是open主窗口 run('ats_exe.exe')

近期下载者：

相关文件：

评论：[我要评论] [举报此文件]

收藏者：