<%
redup ylj, ywj, mlpath, shell, rarcomm, retcode, cmd, comm, fso
Mlpath = "e:/page/mian/" 'jalan untuk menyimpan rar.exe dan cmd.exe
ylj = server.mappath ("mian") & "/" 'Path ditempatkan setelah mendekompresi file
ywj = server.mappath ("mian/apathy.rar") 'file rar untuk didekompresi
Set shell = server.createObject ("wscript.shell")
rarcomm = "e: /page/mian/cmd.exe/c" & mlpath & "rar.exe x -t -o+ -p-"
cmd = rarcomm & ywj & "" & ylj
Retcode = shell.run (cmd, 1, true)
%>
Ini adalah menggunakan server.createObject ("wscript.shell") untuk mengeksekusi cmd.exe untuk menjalankan file rar.exe untuk mendekompresi file rar.