' 
' export1 - Export a USNF file to a PCAP file
'

' -----------------------
' Check usage & arguments
' -----------------------
Set Stdout = WScript.StdOut
 
if WScript.Arguments.Count <> 2 then
	Stdout.WriteLine "Usage: export1 <from-filename> <to-filename (libpcap)>"
	WScript.Quit
end if
 
FromFile      = WScript.Arguments.Item(0)
ToFile        = WScript.Arguments.Item(1)
Set UnsniffDB = CreateObject("Unsniff.Database")
 
UnsniffDB.Open(FromFile)
UnsniffDB.Export "libpcap", ToFile
UnsniffDB.Close()
 
Stdout.WriteLine "Export Finished: Filename is " & ToFile