' ' import1 - Import a PCAP file to a new document ' ' ----------------------- ' Check usage & arguments ' ----------------------- Set Stdout = WScript.StdOut if WScript.Arguments.Count <> 2 then Stdout.WriteLine "Usage: import1 " 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