Jump to content

Find PST Locations

Recommended Posts

Hi guys, not sure if anyone is on this .. but I cant see the tab for some reason.. can anyone help? I imported the 2 XML and the SQL.  Thanks.

Share this post

Link to post
Share on other sites

Newer LT - hosted. 


Any other way way to view the data? We use LT for internal Pc management. 



Share this post

Link to post
Share on other sites

In the past we ran a script on every workstation that would put a txt file in temp and that file was then transferred to LT server.  It had every pst on the system location.

Can you remote into your LT hosted so you could get those files?

Share this post

Link to post
Share on other sites

Its been so long I may have just reverse engineered this POST to work with LT 11 and up.

This is what we did and the files are then transferred up to LT server, but they are also on each machine.


Set ws = CreateObject("WScript.Shell")
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set colFiles = objWMIService.ExecQuery _
    ("Select * from CIM_DataFile Where Extension = 'pst'")

If colFiles.Count = 0 Then
End If

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.CreateTextFile(ws.ExpandEnvironmentStrings("%windir%") & "\temp\pst.csv")

For Each objFile in colFiles
    objTextFile.Write(objFile.Drive & objFile.Path & ",")
    objTextFile.Write(objFile.FileName & "." & objFile.Extension & ",")
    objTextFile.Write(objFile.LastModified & ",")
    objTextFile.Write "Size: " & Round(objFile.FileSize/1024^2) & "MB" & vbCrLf


if objfso.fileexists(ws.ExpandEnvironmentStrings("%windir%") & "\temp\pst.csv") then
  set f = objfso.OpenTextFile(ws.ExpandEnvironmentStrings("%windir%") & "\temp\pst.csv", 1)
  do while not f.atendofstream
    temp =  f.ReadLine()
    dim t
    t = split(temp,",")
    OutPut = OutPut & "(%clientid%,'" & t(0) & "','" &  t(1) & "','" &  t(2) & "','" & t(3) & "',@computerid@),"
  objfso.deletefile ws.ExpandEnvironmentStrings("%windir%") & "\temp\pst.csv",true
  wscript.echo left(OutPut,len(output)-1)
end if


attached is a screen of our LT script that we ran on each workstation



You need to create the pst.vbs in C:\LTShare\Transfer\Scripts on your LT server if you can get into it.


Share this post

Link to post
Share on other sites

I've set this up as @emscokenny suggested and getting a failure. "failed in the Then section at step 15. The reason: SQL Execute failed processing query".

Any ideas? Were you able to get this going @dfc?

Share this post

Link to post
Share on other sites

The last time we did this I didn't use the PST plugin we just retrieved all the text files that were uploaded.

I dont think the attached script needs to be updating anything sql any more.  Its more about getting the file uploaded to the LT server.

Share this post

Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Create New...