Path: number1.nntp.dca.giganews.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newshub.sdsu.edu!newscon04.news.prodigy.net!prodigy.net!newsdst01.news.prodigy.net!prodigy.com!postmaster.news.prodigy.com!newssvr21.news.prodigy.net.POSTED!54622a77!not-for-mail
From: "Todd Vargo" 
Newsgroups: alt.msdos.batch,alt.msdos.batch.nt,fidonet.batpower
References: 
Subject: Re: ZipLister.bat
Lines: 39
MIME-Version: 1.0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit
Message-ID: 
NNTP-Posting-Host: 75.33.77.253
 25 Mar 2008 21:38:04 EDT)
NNTP-Posting-Date: Tue, 25 Mar 2008 21:38:04 EDT
Organization: SBC http://yahoo.sbc.com
Date: Wed, 26 Mar 2008 01:38:04 GMT
Bytes: 2565
Xref: number1.nntp.dca.giganews.com alt.msdos.batch:93682
 alt.msdos.batch.nt:42580 fidonet.batpower:592

FileGod wrote:
> I just made a simple file list generator for zip file, it gets the
> File_id.diz from the zips & adds it to the list, it is a pretty basic
> batch file & requires pkunzip, so far it does NOT work with long file
> names but it should even work with MS-DOS, I made it on a Win XP
> machine...
>  Beats me why but it adds all the files in the directory to the
> list & I am too tired to mess with it anymore right now.
>
> @echo off
> for %%x in (*.zip) do call :process %%x
> :process
> pkunzip -e %1 File_id.diz>nul
> dir /b %1>>Files.txt
> dir %1|find "bytes"|find /v"bytes free">>Files.txt
> type File_id.diz>>Files.txt
> echo --------------------------------------------->>Files.txt
> del File_id.diz

@echo off
for %%x in (*.zip) do call :process %%x
goto :eof
:process
pkunzip -e %1 File_id.diz>nul
echo %1>>Files.txt
echo %~z1 bytes>>Files.txt
if not exist File_id.diz goto no_diz
type File_id.diz>>Files.txt
del File_id.diz
echo.>>Files.txt
goto :end_sub
:no_diz
echo File_id.diz not available.>>Files.txt
:end_sub
echo --------------------------------------------->>Files.txt

-- 
Todd Vargo
(Post questions to group only. Remove "z" to email personal messages)