winrar e e:\rarfile.rar e:\ 'extract rar file
winrar a e:\mydir e:\ 'add rar file
system.disnogic.process 可以用來啟動乙個新的程序,而且在啟動新程序的時候可以代引數.
for exp:
order = "a " & newname & " " & filename
dim ps as system.diagnostics.process
ps = new system.diagnostics.process
ps.enableraisingevents = false
dim rarfile as fileinfo = new fileinfo(rarname)
if rarfile.exists then rarfile.delete()
log(rarst)
ps.start("rar.exe", order)
在winrar的目錄裡面,有個叫rar.exe的程式.你只需要啟動這個程式再帶上正確的引數就行了.
rar.exe的引數.
usage: rar --
<@listfiles...>
a add files to archive
c add archive comment
cf add files comment
cw write archive comment to file
d delete files from archive
e extract files to current directory
f freshen files in archive
i[par]=find string in archives
k lock archive
l[t,b] list archive [technical, bare]
m[f] move to archive [files only]
p print file to stdout
r repair archive
rc reconstruct missing volumes
rn rename archived files
rr[n] add data recovery record
rv[n] create recovery volumes
s[name|-] convert archive to or from sfx
t test archive files
u update files in archive
v[t,b] verbosely list archive [technical,bare]
x extract files with full path
在程式中呼叫Start Run
public declare function shrundialog lib shell32 alias 61 byval howner as long,byval unknown1 as long,byval unknown2 as long,byval sztitle as string,by...
c 呼叫winrar解壓
之前用登錄檔呼叫總是出錯,所以這裡直接使用winrar的絕對路徑 利用 winrar 進行解壓縮 檔案解壓路徑 絕對 將要解壓縮的 rar 檔案的存放目錄 絕對路徑 將要解壓縮的 rar 檔名 包括字尾 public void unrar string path,string rarpath,str...
在ASP程式中呼叫Web Service
微軟投入了大量資金來推銷其.的各種優點,其中.最大的優點之一就是微軟始創的xml web services。xml web services可以將你的程式和以前定製的dll和 d 組建分離 避免陷入dll陷阱 然後將這些功能設計成為xml web services,讓其他應用程式也可以訪問和呼叫這些...