' ' import1 - Import a PCAP file to a new document '

' ———————–

export1.vbs

' Check usage & arguments
' -----------------------
Set Stdout = WScript.StdOut
 
if WScript.Arguments.Count <> 2 then
	Stdout.WriteLine "Usage: import1 <from-filename> <to-filename>"
	WScript.Quit
end if
 
FromFile      = WScript.Arguments.Item(0)
NewDBName     = WScript.Arguments.Item(1)
Set UnsniffDB = CreateObject("Unsniff.Database")
 
UnsniffDB.New(NewDBName)
UnsniffDB.Import "libpcap", FromFile
UnsniffDB.Save()
 
Stdout.WriteLine "Filename is " & NewDBName