printer driver and prndrvr.vbs

TheMSsForum.com: The Microsoft Software Forum

The MSS Forum ‹ VBscripts
- Archive
  - Biz
  - MCSE
  - CRM
  - Drivers
  - Framework
  - ADO
  - ASP
  - Compact
  - Forms
  - Dotnet
  - C#
  - VB
  - FontpageGen
  - Excel
  - WorkSheet
  - Exchange
  - Setup
  - Fox
  - Fontpage
  - ASP
  - IIS
  - Entourage
  - Money
  - Messanger
  - PocketPC
  - Powerpoint
  - Project
  - Publisher
  - Excel
  - VB
  - Security
  - Portal
  - Services
  - SQLServerDev
  - SVCS
  - SQLServer
  - VB
  - VC
  - MFC
  - ExcelGen

- Previous
  - 1
    - Full name of remote logged on user I have this that gives me the domain\username of the remote logged on user: strComputer = InputBox("Enter the PC-name you want to know who's logged on at", "Who is logged on?") if strComputer = "" then WScript.Echo "Don't you want to know?" end if Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root \cimv2") Set colItems = objWMIService.ExecQuery("Select * From Win32_ComputerSystem") For Each objItem in colItems Name = objItem.UserName wscript.echo name Next But i want to output the fullname of the user. I have tried everything i can think of but only get my own fullname. I have this that gives me the fullname of the localy logged on user, but can not get it to work with the other script. Set WshNetwork = WScript.CreateObject("WScript.Network") objUserName = WshNetwork.UserName Set objUser = GetObject("WinNT://" & Name) wscript.echo objUser.FullName Any help to get me in the right direction would be much appreciated. Tag: printer driver and prndrvr.vbs Tag: 207104
  - 2
    - Assigning variable output of %comspec% Hello, Is there a way to allow a variable to hold the output of the comspec statement (the statement running commands on command prompt)? The command I am running produces result of only a single word on screen, so can I: VAR = objShell.run 'The comspec statement Is this possible? I get an error when I do this but I really want the variable to hold the value, is there any other way? Tag: printer driver and prndrvr.vbs Tag: 207100
  - 3
    - write to eventlog or filesystem on remote machine in system context hi, i have a rather complex problem. we have to run a script that updates a software via Microsoft SMS and I want to log the success/failure of the script on a remote machine. i tried to write it into the remot machines event log as well as filesystem but the main problem is: everything that SMS executes on the client runs in system context. even when i give permissions for "Everyone" on the remote machine that is ment to collect the logs, the system on the client is not allowed to connect to the share on the remote machine. logfile = "c:\scripts\log\bla.log" Set objFSO = CreateObject("Scripting.FileSystemObject") Set objTextFile = objFSO.OpenTextFile (logfile, ForAppending, True) Sub WriteTime objTextFile.WriteLine("[" & Day(Now) & "." & Month(Now) & "." & Year(Now) & " " & Hour(Now) & ":" & Minute(Now) & ":" & Second(Now) & "]") End Sub using a UNC name as logfile works well, if the script runs with a real user. can i tell vbs to establish the connection with a specific useraccount? this way i could create a stripped down user on the remote machine which the vbs on the client then uses to connect to the share with a real username. Tag: printer driver and prndrvr.vbs Tag: 207098
  - 4
    - How to find a DFS root in a domain Hi all, Does any one know how to find the DFS root in a Domain using VBscript. Please let me know Thanks in advance... Tag: printer driver and prndrvr.vbs Tag: 207097
  - 5
    - Using VBScript to refresh group policy, restart, and log in. I am writing a script that needs to apply the domain's group policy, restart, and automatically log the administrator back in without needing any user interaction. The problem is that I cannot get rid of the legal message. This is the popup that appears after you press CTL- ALT-DEL on a Win2k or WinXP machine which has a message set in the group policy. In my case, the message is set in a domain GPO. My first solution was to delete the legalnoticetext and legalnoticecaption registry values in HKLM. This is a very common example on the internet. However, (like many of these examples) this doesn't work because the group policy will just be applied again when the computer is restarting. My second solution was to make use of the NoMachinePolicy DWORD value located in: HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\GPExtensions \{827D319E-6EAC-11D2-A4EA-00C04F79F83A} When NoMachinePolicy is set to 1, it prevents the security policy from being applied. I had the script set the value to 1 just before rebooting, and then change the value back after logging in. This solution also has problems, and I can't use it. In Windows XP, it appears to reverse the changes made by the gpupdate /force command. I am executing gpupdate /force, setting the auto logon registry entries, setting NoMachinePolicy to 1, clearing the legal message text and caption, and then restarting. But here's the problem: when the group policy is applied, the administrator account is renamed to something else. However, after I restart the account's name goes back to administrator. My auto login fails because I have the wrong account name for DefaultUserName. And I have verified that after the gpupdate command is run, the account name does change just before the gpupdate finishes. I have no idea why this is happening. The second reason I don't like using this is because I cannot leave NoMachinePolicy set to 1 the whole time the script is working. The script installs several packages after restarting which need to be able to apply group policy. And if I do not have it set the whole time, the computer will not be able to automatically boot up and login if one of the package installations forces a restart. So I'm looking for a working solution that will let me bypass the legal message for an automated logon. This is the only problem stopping me from being able to use this script, and I would really appreciate some help here. Tag: printer driver and prndrvr.vbs Tag: 207096
  - 6
    - Shutdown computer using VBScript Hi. I am trying to shutdown a group of computers that are on the domain using a VBScript. When the user launches the VBScript it will ask for the time in seconds before the computer shutdowns. It is being done based on the way the command prompt does i.e. shutdown -m \ \computerName -s -t 00. I know the script will work if I make the computer shutdown ignoring the user input but need to know how to do it so the user can select how long it will be before it shutdown. Thanks very much for anyone who can help me in this matter. Tag: printer driver and prndrvr.vbs Tag: 207084
  - 7
    - registry keys to treeview control Hi, I have been struggling with the following I am using vbscript in an application that will display registry keys (and their values) as part of a treeview control. I know the 'parent key', under which there can be a varying number of subkeys, and their subkeys, and so on. I know how to enumerate subkeys under a single key, using WMI and EnumKey What I am srtuggling with is, that I need some mechanism to process each of the found subkeys to find about their subkeys, and so on. Some kind of recursive algorhythm. I have seen and tried examples of recursive algorhythms, for instance for files and folders. But somehow, I cannot get my brain to figure out how to translate those to my needs. I was hoping someone could help me out, either with some sample code or a website perhaps? I have so far searched pscode.com and some others, but havent quite found what I am looking for. kind regards, arno Tag: printer driver and prndrvr.vbs Tag: 207083
  - 8
    - Read from one Text file and Write to another. I have to make an edit to a file and what I was planning to do is open the file to read, then compare each line read to see if it equals my search value, which is a substring of what is probably there. If it does not, simply write it to another file. If it does = my search, simply replace the value with my edit and write to the other file. I would do this until the original file is at end. I would then like to move my new file over the original, which should now include my edit. Or Open File for Read Open Other File for Right 'read through first file While file not at end If line contains my search substring replace line to include new substring write it to other file else write line to other file End if End While Close new file Close original file Move new file to original Done! Any guidance from a vbscript wiz would be greatly appreciated! Thanks!!! Tag: printer driver and prndrvr.vbs Tag: 207075
  - 9
    - How to insert the Thousands Separator (comma) in Excel? Hello all. I've got a VBScript that takes a CSV file, makes some formatting changes, and saves it to an XLS file. What I'd like to add to this script is the command to insert the Thousands Separator in column B for the entire column. Column B contains numbers in every cell except for the top cell which has a word. In searching I did find the Constant "Const xlThousandsSeparator = 4" but I can't quite figure out how to write the line to implement it. Any suggestions would be greatly appreciated. Thanks! My script: Const xlDescending = 2 Const xlNormal = 1 Const xlCenter = -4108 Set objFSO = CreateObject("Scripting.FileSystemObject") Dim CurDir CurDir = objFSO.GetFolder(".").Path Set Folder = objFSO.GetFolder(CurDir) Set Folder = nothing Set objExcel = CreateObject("Excel.Application") objExcel.Visible = True Set objWorkbook = objExcel.Workbooks.Open(CurDir & "\Results.csv") Set objWorksheet = objWorkbook.Worksheets(1) '~~ Sort by Column B, Descending Set objRange = objWorksheet.UsedRange Set objRange2 = objExcel.Range("B1") objRange.Sort objRange2,2 '~~ Insert blank row at Row 1 sRow = "1" objExcel.Worksheets(1).Rows(sRow).Insert xlDown '~~ Insert Header text objExcel.Worksheets(1).Cells(1,1).Value = "Server" objExcel.Worksheets(1).Cells(1,2).Value = "Error Amount" '~~ Bold the Header row Set objRange3 = objExcel.Range("A1:B1") objRange3.Font.Bold = True '~~ Auto Fit and Center both Columns objExcel.Cells.EntireColumn.AutoFit objExcel.Cells.EntireColumn.HorizontalAlignment = xlCenter '~~ Insert blank row at Row 2 sRow = "2" objExcel.Worksheets(1).Rows(sRow).Insert xlDown objWorkbook.SaveAs CurDir & "\Results.xls",1 objWorkbook.Close objExcel.Quit Set objFSO = nothing Set objExcel = nothing Set objWorkbook = nothing Set objWorksheet = nothing Set objRange = nothing Set objRange2 = nothing Set objRange3 = nothing Tag: printer driver and prndrvr.vbs Tag: 207066
  - 10
    - Problems with Connection Strings Hello Everyone, I am a newbie to web development. I am using FrontPage 2002/SP3 on XP and IIS 6.0 on Win2K3 server. My Dev website is stored locally and I am publishing to the IIS server. I am attempting to connect to and query an Access database stored both locally and on the IIS server. This is the code (and connection string that I am using, (which I believe should be using the Microsoft Jet driver, pardon if I am not 100% correct in this statement.)... <% dim oConn dim strConn dim strSQL dim rs Set oConn = CreateObject("ADODB.Connection") Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\rks.RPS.002\My Documents\My Webs\richweb\GSDtest\OtherFiles\jettest.mdb oConn.open strConn %> On my local XP box, the first time I hit the hyperlink to call this page (jet.asp), IIS shows me all the code on the page. If I refresh the page, it renders and displays correctly, except the query that I run does not appear to execute, or at the very least, the results of the query are not returned/displayed. When I run this page on the IIS server, I get the following error message: Microsoft VBScript compilation error '800a0401' Expected end of statement /GSDtest/Jet.asp, line 8 Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\rks.RPS.002\My Documents\My Webs\richweb\GSDtest\OtherFiles\jettest.mdb ----------------------------^ The ^ character is pointing to the "." (period) after OLEDB and before the number 4. Can anyone tell me why I am having this problem and how to resolve it? TIA, Rich Tag: printer driver and prndrvr.vbs Tag: 207065
  - 11
    - Login script for printing preferences I need to over-ride Printing Preferences at the point of login to change a default label size on a Zebra TLP-2844 Thermal Printer. Is this information stored in the registry and is it possible to do this please? Thank you, Mark Tag: printer driver and prndrvr.vbs Tag: 207064
  - 12
    - Check if AD attribute exists Hi, is there a way to check if an attribute of a user object in Active Directory is "Not Set", i.e. currently has no values set? Checking for Null or an empty string doesn't seem to be possible, but I don't really want to rely on checking for an error. many thanks, Craig Tag: printer driver and prndrvr.vbs Tag: 207061
  - 13
    - Assign serial Number to Thumb Drive (USB) Is there a way to process a VB Script to put a serial number in for a USB Thumb Drive? Thanks in advance. Tag: printer driver and prndrvr.vbs Tag: 207059
  - 14
    - Install MSI Hi! I have the following code to install an app: Set objInstaller = CreateObject("WindowsInstaller.Installer") objInstaller.UILevel = 3 + 32 objInstaller.InstallProduct "app.msi" In some machines the user do not have install privileges. Is there any form to install the app in these machines? Thanks. Tag: printer driver and prndrvr.vbs Tag: 207056
  - 15
    - Urgent!!! VB Developers for UAE VAM SYSTEMS is a Business Consulting, IT Technology Solutions and Services company with operations in UAE, Qatar, USA, Singapore, Australia and India. We are currently looking for a team (4 to 8 developers) VB Developers for our UAE operations with the following Skill Set and Terms & Conditions Skill Set required: Skills: 1. Strong Development experience VB, VB Scripting, SQL and Delphi. 2. Experience on banking will be an added advantage. Domain: Banking. Experience Required: 3-5yrs Terms and conditions: Joining time frame : 2 weeks (Maximum 4 weeks) The selected candidates shall join VAMSYSTEMS-UAE and deputed to one of the leading banks in UAE. Should you be interested in this opportunity, please send your latest resume in MS Word format at the earliest at nishanthini.suda@vamsystems.com or If there is any queries you can chat me on nishanthini_28@hotmail.com, nishanthini_81@yahoo.co.in,vinirma@gmail.com, Skype ID is nishanthini2 or call us +91 471-3015245 or 2311320. Tag: printer driver and prndrvr.vbs Tag: 207053
  - 16
    - Urgent!!! VB Developers for UAE VAM SYSTEMS is a Business Consulting, IT Technology Solutions and Services company with operations in UAE, Qatar, USA, Singapore, Australia and India. We are currently looking for a team (4 to 8 developers) VB Developers for our UAE operations with the following Skill Set and Terms & Conditions Skill Set required: Skills: 1. Strong Development experience VB, VB Scripting, SQL and Delphi. 2. Experience on banking will be an added advantage. Domain: Banking. Experience Required: 3-5yrs Terms and conditions: Joining time frame : 2 weeks (Maximum 4 weeks) The selected candidates shall join VAMSYSTEMS-UAE and deputed to one of the leading banks in UAE. Should you be interested in this opportunity, please send your latest resume in MS Word format at the earliest at nishanthini.suda@vamsystems.com or If there is any queries you can chat me on nishanthini_28@hotmail.com, nishanthini_81@yahoo.co.in,vinirma@gmail.com, Skype ID is nishanthini2 or call us +91 471-3015245 or 2311320. Tag: printer driver and prndrvr.vbs Tag: 207052
  - 17
    - IsDate() I am working with an HTA, having the user enter a numeric value for the MONTH / DAY / YEAR. I then concatenate them into the format shown and then do an IsDate(). If the user enters something like 14 / 2 / 2007, IsDate returns True; it is reading the date as DAY / MONTH / YEAR. Any idea how I can get around this without using DropDowns? Thanks. Bart Tag: printer driver and prndrvr.vbs Tag: 207051
  - 18
    - Bug in Win32_LogonSession? Hello everyebody, It seems that Win32_LogonSession class has an undocumented bug or feature related to the RunAs service. Here is a simple script: ******************************************************************************************* Set objWmiSvc = GetObject("winmgmts://") Set colUsers = objWmiSvc.execQuery("Select * from Win32_LoggedOnUser") For Each objUser In colUsers set objUser = objWmiSvc.Get(objUser.antecedent) set objSess = objWmiSvc.Get(objUser.dependent) WScript.Echo objUser.name & " - " & objSess.logontype Next ******************************************************************************************* I run it under a regular user account and it displays: MyUser - 2 where MyUser - the user currently logged on 2 - means that is an interactive session. Then, from the same session spawn a command prompt windows using Run As with another username and rerun the script from the initial user context (not the new run as window). Now it displays: MyUser - 0 where MyUser - the user currently logged on 0 - means this is SYSTEM session !!! Is this a bug in WMI? Has anyone seen this before? Tag: printer driver and prndrvr.vbs Tag: 207050
  - 19
    - Using the DiskQuota object returns many names unresolved in Windows 2000 - any way to get all? I am attempting to gather the disk quota information on a number of volumes on a Windows 2000 server. I am using the script from TechNet at http://www.microsoft.com/technet/scriptcenter/scripts/storage/quotas/default.mspx?mfr=true. The entries are returned but many of them return a blank LogonName and an AccountStatus value of 5 (Account information is unresolved). I note that if I display the quota entries from the volume properties many of the entries display [Retrieving Name] for some period of time. I am guessing that the use of the shell object from the script does not get refreshed. Is there any way to get the information refreshed in Windows 2000? Thanks! Tag: printer driver and prndrvr.vbs Tag: 207048
  - 20
    - Locale and CDate issue When I am using setlocale to a western locale like en-gb or en-us, the CDate function is sensitive to the field sequence defined in the locale. So if I CDate a string like 25/12/2007 using en-gb the date is Christmas, if I do the same in a en-us locale, 12/25/2007 is Christmas. If I setlocale to ar-sa (Arabia Saudi Arabia) and use the formatdattime function, I get the Gregorian date converted to a Hijri date automatically. However, if I use CDate while in the ar-sa locale setting, the datevalue that is created seems like the middle ages (1428/12/16). How can I get a correct datetime value from a Hijri date using the locale features in vbscript? tia Tag: printer driver and prndrvr.vbs Tag: 207045
  - 21
    - ADO stored proc I am new to vbscript and need to learn it but more importantly I need to know how to access a SQL Server stored procedure using vbscript and ADO. I've looked at vbscript books and sql server books on Amazon and don't know what to get that would discuss vbscript for a stored procedure. Could you please direct me to a website or recommend a book or books that explain it. thanks - nick Tag: printer driver and prndrvr.vbs Tag: 207038
  - 22
    - Get filetype of files without extension Hi, When you have activated the explorer option "hide known file extensions" and you mail an attachment, on the receiving computer, the extension has been lost. With MS Word documents, this is no problem, the file will automatically be opened with MS Word. With pdf documents, this isn't the same... you get a dialog to choose the right program (but when you open this, you can see PDF1.2). Is it possible to programmatically get the file-type or extension from those files? Thanks in advance, Netfreaky Tag: printer driver and prndrvr.vbs Tag: 207027
  - 23
    - error accessing property of an object I'm tyring to access an object created by using a method from a third party API. The documentation tells me what object should be return, and the properties of that object, but when I try and access one of those properties I've shown an error message saying that the Object doesn't support this property or method. Here's the code I'm using (edited to protect the third party NDA) [script] 1: <% 2: dim siteApi, userApi 3: dim userObj 4: dim session, user_date_created 5: 6: set siteApi = createobject("MSSoap.SoapClient30") 7: siteApi.mssoapinit("http://thirdparty.domain/site/api?wsdl") 8: 9: set userApi = createobject("MSSoap.SoapClient30") 10: userApi.mssoapinit("http://thirdparty.domain/user/api?wsdl") 11: 12: session = siteApi.login("username","p@ssw0rd") 13: 14: set userObj = userApi.getUser(session,"webadmins") 15: 16: user_date_created = userObj.date_created 17: %> [/script] In the above code, the session variable is populated with the correct info (a HEX string), suggesting that my siteApi object is being created and used correctly. However, I get the following error when I run it without line 16 commented out: [error] Microsoft VBScript runtime error '800a01b6' Object doesn't support this property or method: 'date_created' /soapTest/index.asp, line 16 [/error] The documentation for the user API does show that 'date_created' is a property of the UserStruct object, returned by the 'getUser' method, so I'm readlly confused why this won't work. Is there anything fundamentally wrong with my script? If not, is there any ASP I can use to see what properties are available with the userObj? Thanks for any help you can offer Kevin Tag: printer driver and prndrvr.vbs Tag: 207019
  - 24
    - Connecting and reading SQL databases Hello, So far I have the following: Set VAR = CreateObject("ADODB.Connection") VAR.Open("DSN=temp") Suppose my SQL database is: A B C D corolla 2 BLAH BLAH camry 4 BLAH BLAH accord 5 BLAH BLAH miata 2 BLAH BLAH WHERE A,B,C,D are column names. Now, Dealing with only columns A and B, I want to assign a variable in my VBScript program the value of column B of the row containing accord, how do I go about? NOTE: database owner is cadb and name of database is cars. I would really appreciate any help. Thanks a lot. Tag: printer driver and prndrvr.vbs Tag: 207012
  - 25
    - Alternative to NetConnectionID? The WMI Tasks: Networking page at http://msdn2.microsoft.com/en-us/library/aa394595.aspx shows an example using NetConnectionID, and notes that this isn't available on Windows 2000, for which you should use the "example below". But the example below still uses NetConnectionID. For me any attempt to use this throws an Invalid Query exception. I'm calling from C# rather than VBScript. Is that second example on the web page wrong? What I need to do is to find the "typical" network adapter - you know, the Ethernet port you almost always find on the back of the computer. On Windows 2000. I know there are different configurations, and maybe there is no answer which *always* works, but right now on Windows 2000 I'm stuck with scanning for Manufacturer=Intel (which for now is true of all the computers we ship in our product as far as I know), and I'd like to find something better than that. (On XP I can just look for NetConnectionID='Local Area Connection'). P.S. What's up with WMI telling me a Bluetooth connection is AdapterType=Ethernet? That's the reason I can't just scan for that. Tag: printer driver and prndrvr.vbs Tag: 207006
- Next
  - 1
    - VBSCRIPT and DSMOD I am running this DSQUERY and DSMOD command to change all the passwords on my lab network: dsquery user -limit 10000 | dsmod user -pwd Password1 However, it fails when it encounters a user with the hidden attribute, such as ROOT$. I am NOT a vbscript'er, so I'm not sure how to write this...any help would be greatly appreciated. Thanks, Phil Tag: printer driver and prndrvr.vbs Tag: 207003
  - 2
    - (Wscript.Network) issue removing network drive Hey All, I have a question about (wscript.network). I am trying to remove some network drives on xp pro workstations using the script below. Well, it's just not working. I don't get any errors but when I open "My Computer" it still shows the connection to the network drive. I can use the shell to run "net use" to delete these drives but I was trying to get this other way to work. Any ideas what would prevent .network from removing the drives? Thanks in advance. ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Dim objNetwork Set objNetwork = CreateObject("WScript.Network") 'Remove Existing Network Drives objNetwork.RemoveNetworkDrive "G:", True objNetwork.RemoveNetworkDrive "H:", True objNetwork.RemoveNetworkDrive "I:", True objNetwork.RemoveNetworkDrive "M:", True objNetwork.RemoveNetworkDrive "S:", True objNetwork.RemoveNetworkDrive "T:", True objNetwork.RemoveNetworkDrive "Y:", True objNetwork.RemoveNetworkDrive "V:", True ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Shrp Tag: printer driver and prndrvr.vbs Tag: 206995
  - 3
    - lastlogonTimeStamp Script... Works but... Ok well here is my script. It works sort of... What I would like for it to do it get the lastlogontimestamp for every user in the domain. It works if I add - On Error Resume Next - putting this in either skips the record that does not have a lastlogontimestamp or uses outputs the same timestamp from the previous user account. If I leave it out I get the following error - (33, 4) Active Directory: The directory property cannot be found in the cache. - Line (33, 4) is - set objLogon = objUser.Get("lastLogonTimeStamp") I tried to add in this but I think I'm doing it wrong. Instead of skipping or outputting the wrong timestamp I would like for it to say - 404 TimeStamp Not Found - .... something along those lines :P If Hex(Err.Number)="&H8000500D" Then WScript.Echo "No such property!" & vbCrLf & "Err. Number: " _ & vbTab & CStr(Hex(Err.Number)) & vbCrLf & "Err. Descr.: " _ & vbTab & Err.Description End If ========================== Any suggestions? Thank You ============================ On Error Resume Next Const ADS_SCOPE_SUBTREE = 2 Dim objRootDSE Dim objConnection, objCommand, objRecordSet Dim UserDN, objUser, strDNSDomain, strQuery Dim objLogon, strWeeks, strDays, intLogonTime Dim intLLTS, intReqCompare, ADVersion Set objRootDSE = GetObject("LDAP://RootDSE") strDNSDomain = objRootDSE.Get("defaultNamingContext") Set objConnection = CreateObject("ADODB.Connection") Set objCommand = CreateObject("ADODB.Command") objConnection.Provider = "ADsDSOObject" objConnection.Open "Active Directory Provider" Set objCommand.ActiveConnection = objConnection objCommand.Properties("Page Size") = 1000 objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE strQuery = "SELECT distinguishedName FROM 'LDAP://" & strDNSDomain & "' WHERE objectCategory = 'User'" objCommand.CommandText = strQuery Set objRecordSet = objCommand.Execute objRecordSet.MoveFirst Do Until objRecordSet.EOF UserDN = objRecordSet.Fields("distinguishedName").Value Set objUser = GetObject("LDAP://" & UserDN) wscript.echo UserDN ' Begin calculation set objLogon = objUser.Get("lastLogonTimeStamp") intLogonTime = objLogon.HighPart * (2^32) + objLogon.LowPart intLogonTime = intLogonTime / (60 * 10000000) intLogonTime = intLogonTime / 1440 intLLTS = intLogonTime + #1/1/1601# strDays = strWeeks * 7 intReqCompare = Now - strDays If intLLTS < intReqCompare Then wscript.echo Mid(objUser.Name,4) & " last logged on at " & intLLTS End If objRecordSet.MoveNext Loop Tag: printer driver and prndrvr.vbs Tag: 206994
  - 4
    - WshShell.Run and long command Hi, I have an install of Adobe CS3 that I can execute from a bat file. I can't seem to convert the bat command to vbscript. It gets as far as executing the setup.exe, but ignores the silent switch and anything after it. Here is the command from the batch file that works. E:\D\Creative Suite 3\Application\Adobe CS3\setup.exe" --Mode=Silent --deploymentFile="E:\D\Creative Suite 3\Application\Adobe CS3\deployment\install.xml" Here is the vbscript that fails. It executes the setup.exe but ignores the statements after the setup.exe. Set WshShell = CreateObject("WScript.Shell") WshShell.Run """E:\D\Creative Suite 3\Application\Adobe CS3\setup.exe""" & Space(1) & "--Mode=Silent" & Space(1) & "--deploymentFile=" & """E:\D\Creative Suite 3\Application\Adobe CS3\deployment\install.xml""", 2, True I have tried doing different codes with no luck. I have used ( ) with no luck. I can usually figure the command out fine. Please help. Thanks, Jeff L. Tag: printer driver and prndrvr.vbs Tag: 206993
  - 5
    - VBScript to Remove Lotus Notes Person Record Hi, Is anyone able to assist. I need a Sub to remove/Delete a Person Record in lotus notes but a struggling to find the code to do this. I have code to delete a user, but 30 days before deleting the user we would like to just remove them from all address books. Here is the code I have already: '================================================================================== 'Sub to Delete the Leavers Lotus Notes Address Book Entries '================================================================================== '================================================================================== 'Sub to Delete the Leavers Lotus Notes User Accounts Including replica's '================================================================================== Sub DeleteLNUser (Lnusername,sLNpassword) Dim objSess As New NotesSession Dim adminp As NotesAdministrationProcess Const ID_HIERARCHICAL = 172 Const MAILFILE_DELETE_ALL = 2 Const Immediate = False '==================Enter True or False. True deletes all references to the user in the Domino Directory before issuing an administration process request. False lets the administration process make all deletions. Set ObjSess = CreateObject("Lotus.NotesSession") ObjSess.Initialize sLNpassword Set adminp = notesSession.CreateAdministrationProcess(NOTES SERVER) Call adminp.DeleteUser(Lnusername , immediate , MAILFILE_DELETE_ALL, "", False) End sub '================================================================================== Many Thanks Tag: printer driver and prndrvr.vbs Tag: 206992
  - 6
    - Simple Time function (for you, maybe) Hi, I want to look at a date time stamp and determine if it is before or after 0600 in the morning. I have tried this, with no luck (everything comes back as "Day" text = book1.Worksheets(1).Cells(x,4).Value FSpace = Instr(text," ") + 1 'Search for the first space in the string qTime = Right(text,FSpace) 'Chop the string down WScript.Echo "qTime: " & qTime If qTime > "6:00" Or qTime < "18:00" Then book1.Worksheets(1).Cells(x,6).Value = "Day" Else book1.Worksheets(1).Cells(x,6).Value = "Night" End if TIA Tag: printer driver and prndrvr.vbs Tag: 206982
  - 7
    - Generating a HTML file with accentuated characters? Hi! We wrote a VBScript that create an Active Directory report into a HTML file format, but users names containing accentuated characters are displayd incorrectly! What could we do to avoid that (codepage settings)? Thanks. Claude Lachapelle Systems Administrator, MCSE Tag: printer driver and prndrvr.vbs Tag: 206979
  - 8
    - backup a remote host's event logs Hello, With VBScript, I'm trying to back up all the workstations and member servers from the PDC FSMO role holder. My script enumerates the hosts on the domain and then passes each hostname to a method which tries to backup the event logs on that box (The script is also smart enough to know how many logs are on the box and tries to back them up one at a time). My script runs without complaining but it will only backup the log files on the box which the script is run -- not any of the remote boxes. I've looked at: http://groups.google.com/group/microsoft.public.win32.programmer.wmi/browse_thread/thread/f24756bda5859d8d/f74e6e83a58910c4 http://groups.google.com/group/microsoft.public.win32.programmer.wmi/browse_thread/thread/b3fe81a46fdeca2d/393d1380a58a207b One of the posts says you cannot do this with WMI and the other post implies they got it to work. A portion of my code is posted below (and is pretty much the same as what is in one of the links above). You'll notice I'm not ignoring errors and when I run the script here backupLog always returns zero -- this is the confusing thing, the script runs without complaining but it will only backup the log files on the box which the script is run -- not any of the remote boxes. ' h = hostname ' l = Win32_NTEventlogFile.LogfileName Sub backupLogs(h, l) Dim sFileName : sFileName = "C:\Temp\" &_ h & " " &_ l & " " &_ ".evt" Dim objWMI : Set objWMI = GetObject("winmgmts:" & "{impersonationLevel=impersonate,(Security, Backup)}!\\" & h & "\root \cimv2") Dim colLog : Set colLog = objWMI.ExecQuery("Select * from Win32_NTEventLogFile where LogFileName='" & l & "'") For Each log in colLog backupLog = log.BackupEventLog(sFileName) If backupLog <> 0 Then MsgBox "The " & l & " log on " & h & " could not be backed up." Else log.ClearEventLog() End If Next End Sub So what is it... is it indeed possible to backup event logs from remote machines? If so, any suggestions to where I went wrong with my script are greatly appreciated. Thanks! Tag: printer driver and prndrvr.vbs Tag: 206976
  - 9
    - Array Question I think this would be solved with an array, but I'm not sure. I have no idea how to implement one into this. I currently have a backup script going for my company. I'm just a IT person, not a programmer by any means. I'm working off of a previously created script. What this script does, is it calls another program called "Robocopy" to do the actual copying. Basically right now, the script backs up certain PC's. Afterwards, if there is an error it emails me, telling me which computers didn't complete the backup. It also creates text files with logs and stuff. I want to be able to have a list with the PC name's and corresponding email addresses of the owners of that PC. So if there is an error the script, it find the PC name that got the error, located the email address assigned to that PC name, and sends and email to that address, stating that there was an error. Here are my scripts ... This one specifies Source & Destination http://docs.google.com/Doc?id=dcc6zqw6_1fhdh4g This one is the actual script http://docs.google.com/Doc?id=dcc6zqw6_0czkw8m Tag: printer driver and prndrvr.vbs Tag: 206971
  - 10
    - How to change environment variables in text/.reg file before import I edited a regsitry key to look like the following (below). I have it saved as a .reg file. Everywhere it says %username%, I want it to change to the logged on user. Do you know of a simple way, where if a script or something runs while the user is logged on, I can get those variables to change to the logged on user. If so, I can then have the user import the .reg file into the registry with the actual username. Windows Registry Editor Version 5.00 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange] [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \024fa8a3cf910f49aef06914a7dded75] "001f3001"=hex:4d,00,69,00,63,00,72,00,6f,00,73,00,6f, 00,66,00,74,00,20,00,45,\ 00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,00,20,00,53,00,65,00,72,00,76,00,\ 65,00,72,00,00,00 "001f3d0a"=hex:65,00,6d,00,73,00,75,00,69,00,2e,00,64,00,6c,00,6c, 00,00,00 "001f3d13"=hex:7b, 00,36,00,34,00,38,00,35,00,44,00,32,00,36,00,41,00,2d,00,43,\ 00,32,00,41,00,43,00,2d,00,31,00,31,00,44,00,31,00,2d, 00,41,00,44,00,33,00,\ 45,00,2d, 00,31,00,30,00,41,00,30,00,43,00,39,00,31,00,31,00,43,00,39,00,43,\ 00,30,00,7d,00,00,00 "001f3d0b"=hex:45,00,4d,00,53,00,43,00,66,00,67,00,00,00 "00033009"=hex:02,00,00,00 "101e3d0f"=hex:03,00,00,00,10,00,00,00,1a,00,00,00,25,00,00,00,65,6d, 73,75,69,\ 2e,64,6c,6c,00,65,6d,73,61,62,70,2e,64,6c,6c,00,65,6d,73,6d,64,62,2e, 64,6c,\ 6c,00 "001f3d09"=hex:4d,00,53,00,45,00,4d,00,53,00,00,00 "01023d01"=hex:f1,3b,83,05,47,9a,7e,44,87,c6,b7,39,d3,86,38,6f "01023d00"=hex:d9,39,c1,fc,a9,e7,05,47,b7,ea,33,98,d5,af,6d,68,40,fc, 29,8f,50,\ db,b8,41,8b,53,74,69,3e,c4,c6,6d "01023d02"=hex:88,f9,13,d5,2e,6b,33,42,9e,ee,e5,76,78,28,ba,75,2f, 4e,ff,a0,47,\ 93,b3,44,9b,54,8a,fa,4c,8b,cd,86 "01023d08"=hex:cb,24,74,f4,f0,a2,32,4a,b6,26,28,54,01,94,05,8e "01023d0d"=hex:13,db,b0,c8,aa,05,10,1a,9b,b0,00,aa,00,2f,c4,5a [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \0a0d020000000000c000000000000046] "000b0340"=hex:01,00 "000b0413"=hex:01,00 "000b0412"=hex:01,00 "000b0395"=hex:00,00 "00030397"=hex:06,00,00,00 "00030399"=hex:00,00,00,00 "0003036f"=hex:66,cd,01,00 "0003033d"=hex:02,00,00,00 "00030398"=hex:02,00,00,00 "001e0336"="IPF.Note" "0003040d"=hex:9c,00,00,00 "00400032"=hex:a5,37,17,59,3f,ac,c7,01 "001f041c"=hex:00,00 "000b0417"=hex:01,00 "000b0425"=hex:00,00 "0003041b"=hex:06,00,00,00 "000b0416"=hex:00,00 "000b042a"=hex:00,00 "0102041e"=hex:f4,81,fd,df,2a,ba, 60,41,98,6a,f7,1b,e9,26,3a,b2,00,00,00,f0,4d,\ 9d [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \13dbb0c8aa05101a9bb000aa002fc45a] "00036661"=hex:00,00,00,00 "00036600"=hex:01,05,00,00 "00036601"=hex:14,00,00,00 "00036605"=hex:03,00,00,00 "00036604"=hex:02,00,00,00 "01023d0c"=hex:02,4f,a8,a3,cf,91,0f,49,ae,f0,69,14,a7,dd,ed,75 "01023d01"=hex:f1,3b,83,05,47,9a,7e,44,87,c6,b7,39,d3,86,38,6f "01023d00"=hex:d9,39,c1,fc,a9,e7,05,47,b7,ea,33,98,d5,af,6d,68,40,fc, 29,8f,50,\ db,b8,41,8b,53,74,69,3e,c4,c6,6d "01023d02"=hex:88,f9,13,d5,2e,6b,33,42,9e,ee,e5,76,78,28,ba,75,2f, 4e,ff,a0,47,\ 93,b3,44,9b,54,8a,fa,4c,8b,cd,86 "001e6750"="Exchange" "001f6607"=hex:62,00,77,00,31,00,37,00,31,00,00,00 "001e6608"="Exchgservername.campus.ExchORG.ext" "00036606"=hex:00,01,00,00 "00036619"=hex:09,00,00,00 "001f6620"=hex:4d,00,69,00,63,00,72,00,6f,00,73,00,6f, 00,66,00,74,00,20,00,45,\ 00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,00,20,00,53,00,65,00,72,00,76,00,\ 65,00,72,00,00,00 "00036623"=hex:2f,00,00,00 "001f6622"=hex:6d,00,61,00,69,00,6c,00,2e,00,6d,00,67,00,74,00,2e, 00,67,00,61,\ 00,74,00,65,00,63,00,68,00,2e,00,65,00,64,00,75,00,00,00 "001f6625"=hex:6d,00,73,00,73,00,74,00,64,00,3a,00,6d, 00,61,00,69,00,6c,00,2e,\ 00,6d,00,67,00,74,00,2e,00,67,00,61,00,74,00,65,00,63,00,68,00,2e, 00,65,00,\ 64,00,75,00,00,00 "00036627"=hex:01,00,00,00 "001f662a"=hex:61,00,65,00,61,00,74,00,6c,00,63,00,61,00,6d, 00,65,00,78,00,31,\ 00,30,00,2e,00,63,00,61,00,6d,00,70,00,75,00,73,00,2e, 00,67,00,74,00,72,00,\ 69,00,2e,00,65,00,78,00,74,00,00,00 "001e6603"="/o=ExchORG-EXT/ou=Exchange Administrative Group (RndmSetofLetters)/cn=Recipients/cn=%username%" "001f3001"=hex:57,00,61,00,73,00,68,00,69,00,6e,00,67,00,74,00,6f, 00,6e,00,2c,\ 00,20,00,42,00,6f,00,6f,00,6b,00,65,00,72,00,00,00 "001e6602"="Exchgservername" "001e6612"="/o=ExchORG-EXT/ou=Exchange Administrative Group (RndmSetofLetters)/cn=Configuration/cn=Servers/cn=Exchgservername" "101e6613"=hex:06,00,00,00,1c,00,00,00,31,00,00,00,5b, 00,00,00,72,00,00,00,88,\ 00,00,00,9d,00,00,00,6e,63,61,6c,72,70,63,3a,41,45,41,54,4c,43,41,4d, 45,58,\ 31,30,00,6e,63,61,63,6e,5f,69,70,5f,74,63,70,3a,61,65,61,74,6c, 63,61,6d,65,\ 78,31,30,2e,63,61,6d,70,75,73,2e,67,74,72,69,2e,65,78,74,00,6e, 63,61,63,6e,\ 5f,73,70,78,3a,41,45,41,54,4c,43,41,4d,45,58,31,30,00,6e,63,61,63,6e, 5f,6e,\ 70,3a,41,45,41,54,4c,43,41,4d,45,58,31,30,00,6e,65,74,62,69,6f,73,3a, 41,45,\ 41,54,4c,43,41,4d,45,58,31,30,00,6e,63,61,63,6e,5f,76,6e,73,5f, 73,70,70,3a,\ 41,45,41,54,4c,43,41,4d,45,58,31,30,00 "01026689"=hex:61,02,00,00,00,00,00,00,00,00,82,00,6a, 00,65,00,08,e0,e2,34,00,\ 00,00,00,00,9f,a5,36,00,00,00,00,08,06,09,54,65,73,74,2c, 20,42,42,00,62,2c,\ 09,63,b6,5b,1a,46,ab,ce,87,89,fd,2d,79,b6,1c, 01,05,00,00,00,00,00,05,15,00,\ 00,00,ff,4a,ed,2a,99,10,4e,55,34,70,73,2b, 53,06,00,00,50,00,42,42,54,45,53,\ 54,b0,b4,08,06,09,54,65,73,74,2c,20,42,42,00,62,2c,09,63,b6,5b,1a, 46,ab,ce,\ 87,89,fd,2d,79,b6,1c,01,05,00,00,00,00,00,05,15,00,00,00,ff,4a,ed,2a, 99,10,\ 4e,55,34,70,73,2b, 53,06,00,00,50,00,42,42,54,45,53,54,b0,b4,08,06,09,54,65,\ 73,74,2c,20,42,42,00,62,2c,09,63,b6,5b,1a,46,ab,ce,87,89,fd,2d, 79,b6,1c,01,\ 05,00,00,00,00,00,05,15,00,00,00,ff,4a,ed,2a,99,10,4e,55,34,70,73,2b, 53,06,\ 00,00,50,00,42,42,54,45,53,54,b0,b4,08,06,09,54,65,73,74,2c, 20,42,42,00,62,\ 2c,09,63,b6,5b,1a,46,ab,ce,87,89,fd,2d,79,b6,1c, 01,05,00,00,00,00,00,05,15,\ 00,00,00,ff,4a,ed,2a,99,10,4e,55,34,70,73,2b, 53,06,00,00,50,00,42,42,54,45,\ 53,54,52,00,0b, 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,08,\ 00,00,00,00,00,00,00,03,00,00,00,00,00,00,00,00,00,00,00,bc, 01,00,00,0c,00,\ 00,00,90,00,00,00,08,00,00,00,2c, 00,00,00,06,00,00,00,00,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,00,d6,01,00,00,14,00,00,00,3c, 00,00,00,14,00,00,00,\ 0a, 00,00,00,09,00,00,00,02,00,00,00,02,00,00,00,03,00,00,66,00,00,00,00,e5,\ 01,00,00,14,00,00,00,18,00,00,00,20,00,00,00,0a, 00,00,00,09,00,00,00,02,00,\ 00,00,02,00,00,00,03,00,00,66,01,00,00,00,f2,01,00,00,30,00,00,00,10,00,00,\ 00,20,00,00,00,0c,00,00,00,01,00,00,00,02,00,00,00,03,00,00,00,1e, 00,02,66,\ 00,00,00,00,f6,01,00,00,46,00,00,00,30,00,00,00,20,00,00,00,30,00,00,00,04,\ 00,00,00,02,00,00,00,1e,00,06,66,03,00,08,66,03,00,04,66,fc, 01,00,00,0c,00,\ 00,00,90,00,00,00,40,00,00,00,2c, 00,00,00,06,00,00,00,00,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,00,15,02,00,00,14,00,00,00,50,00,00,00,4c, 00,00,00,\ 0a, 00,00,00,09,00,00,00,02,00,00,00,02,00,00,00,03,00,01,66,00,00,00,00,26,\ 02,00,00,14,00,00,00,18,00,00,00,58,00,00,00,0a, 00,00,00,09,00,00,00,02,00,\ 00,00,02,00,00,00,03,00,01,66,01,00,00,00,3e, 02,00,00,30,00,00,00,10,00,00,\ 00,58,00,00,00,0c,00,00,00,01,00,00,00,02,00,00,00,03,00,00,00,1e, 00,03,66,\ 00,00,00,00,42,02,00,00,46,00,00,00,30,00,00,00,58,00,00,00,30,00,00,00,04,\ 00,00,00,02,00,00,00,1e, 00,07,66,03,00,09,66,03,00,05,66,48,02,00,00,4d,69,\ 63,72,6f,73,6f,66,74,20,45,78,63,68,61,6e, 67,65,20,53,65,72,76,65,72,00,53,\ 65,6e,64,20,74,68,69,73,20,69,74,65,6d,00,49,26,6d,6d, 65,64,69,61,74,65,6c,\ 79,00,26,49,6e,00,5b,30,2d,39,5d,00,4d,69,6e,75,74,65,73,5c,48,6f, 75,72,73,\ 5c,44,61,79,73,5c,57,65,65,6b, 73,00,45,78,70,69,72,65,20,74,68,69,73,20,69,\ 74,65,6d,00,4e, 26,65,76,65,72,20,65,78,70,69,72,65,20,74,68,69,73,20,69,74,\ 65,6d,00,49,26,6e,00,5b,30,2d,39,5d,00,4d,69,6e,75,74,65,73,5c,48,6f, 75,72,\ 73,5c,44,61,79,73,5c,57,65,65,6b,73,00 "0102668a"=hex: 00,00,00,00,00,00,00,00,00,00,28,00,01,00,00,00,01,00,00,00,00,\ 00,00,00,01,00,00,00,00,00,00,00,00,00,00,00,2a, 01,00,00,80,e0,00,54,00,00,\ 00,00,b0,a4,00,54,00,00,00,00,30,e6,00,54,00,00,00,00,80,e0,00,54,00,00,00,\ 00,2e,31,2e,33,fc,49,02,02,03,44,ec,d0,1f,f6,86,c3,ef,92,1e,85,1e, 39,07,5c,\ 9d,28,a3,68,a8,a5,8c, 08,43,c0,e0,28,ab,db,b4,f0,65,f6,2b,c8,98,75,f0,93,60,\ 13,32,ad,73,01,d0,80,32,09,38,ff,e9,d6,db,1b,29,5d,47,df,aa,1f,d4,8a, 98,e0,\ f4,1e,5b,7f,0a,fd, 81,10,01,be,d1,75,a1,74,55,22,04,12,d4,37,99,c1,06,00,00,\ 00,01,00,00,00,04,00,00,00,00,00,00,00,04,00,00,00,00,00,00,00,06,00,00,00,\ 01,00,00,00,24,37,66,32,6b,1d,28,31,dc,17,88,71,f8,6a, 65,ab,aa,d1,f2,49,52,\ 1a,58,0d,15,1d,01,12,af,fa,02,e9,47,cb,c5,ef,48,4b,b7,2f,0a,f2,7a, 00,89,7d,\ 40,ac,05,29,a8,4b,93,3d,e9,7d,a8,30,eb,45,82,4b,1f,f3,66,e1,2e,12,8d, 3a,2d,\ 71,52,14,95,e4,ef,46,6e,89,70,73,76,65,e2,2c,b7,32,16,7b,ce,68,2f,7b, 39,37,\ 42,61,00,f7 "0102668b"=hex: 80,01,00,00,00,00,00,00,00,00,65,00,02,00,00,00,00,00,00,00,00,\ 00,00,00,01,00,00,00,00,00,00,00,02,01,05,60,02,00,00,00,03,00,06,60,02,00,\ 00,00,03,00,07,60,02,00,00,00,03,00,08,60,02,00,00,00,e4,84,09,60,02,00,00,\ 00,03,00,0a,60,02,00,00,00,03,00,0b,60,02,00,00,00,e4,84,0c, 60,02,00,00,00,\ 03,00,0d, 60,02,00,00,00,02,01,10,60,02,00,00,00,03,00,11,60,02,00,00,00,03,\ 00,12,60,02,00,00,00,03,00,13,60,02,00,00,00,03,00,14,60,02,00,00,00,e4,84,\ 15,60,02,00,00,00,e4,84,16,60,02,00,00,00,03,00,17,60,02,00,00,00,03,00,18,\ 60,02,00,00,00,03,00,19,60,02,00,00,00,e4,84,1a, 60,02,00,00,00,e4,84,1b,60,\ 02,00,00,00,e4,84,1c,60,02,00,00,00,e4,84,1d,60,02,00,00,00,b0,84,1d, 60,02,\ 00,00,00,03,00,1e,60,02,00,00,00,03,00,1f, 60,02,00,00,00,03,00,20,60,02,00,\ 00,00,03,00,21,60,02,00,00,00,03,00,22,60,02,00,00,00,03,00,23,60,02,00,00,\ 00,03,00,24,60,02,00,00,00,40,00,25,60,02,00,00,00,03,00,26,60,02,00,00,00,\ 40,00,27,60,07,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,08,\ 00,00,00,00,00,00,00,02,00,00,00,00,00,00,00,00,00,00,00,1c, 01,00,00,05,00,\ 00,00,a5,00,00,00,0f, 00,00,00,08,00,00,00,00,00,00,00,00,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,00,25,01,00,00,05,00,00,00,af, 00,00,00,23,00,00,00,\ 37,00,00,00,06,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,4a, \ 01,00,00,0a,00,00,00,a5,00,00,00,2d, 00,00,00,08,00,00,00,09,00,00,00,02,00,\ 00,00,04,00,00,00,03,00,02,59,00,00,00,00,5c,01,00,00,0a, 00,00,00,a5,00,00,\ 00,37,00,00,00,08,00,00,00,09,00,00,00,02,00,00,00,04,00,00,00,03,00,02,59,\ 01,00,00,00,68,01,00,00,0a, 00,00,00,a5,00,00,00,41,00,00,00,08,00,00,00,09,\ 00,00,00,02,00,00,00,04,00,00,00,03,00,02,59,02,00,00,00,6e, 01,00,00,0a,00,\ 00,00,a5,00,00,00,4b, 00,00,00,08,00,00,00,09,00,00,00,02,00,00,00,04,00,00,\ 00,03,00,02,59,03,00,00,00,78,01,00,00,49,6e,74,65,72,6e, 65,74,00,48,6f,77,\ 20,64,6f,20,79,6f,75,20,77,61,6e,74,20,74,6f,20,73,65,6e, 64,20,61,74,74,61,\ 63,68,6d,65,6e,74,73,3f,00,41,74,74,61,63,68,6d,65,6e,74,20,46,6f, 72,6d,61,\ 74,00,26,44,6f,6e,27,74,20,4b,6e,6f,77,00,26,4d,49,4d, 45,00,26,55,55,45,6e,\ 63,6f,64,65,00,26,42,49,4e,48,45,58,00 "00146686"=hex:dc,c0,b3,f8,da,9e,c7,01 "01026687"=hex:03,00,0d,00,45,58,00,58,34,30,30,00,53,4d,54,50,00 "0003661b"=hex:ad,82,00,00 "00036624"=hex:00,02,00,80 "01026611"=hex: 07,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,b7,\ 45,28,38,d9,53,70,4d,87,25,71,3a,64,54,87,6f, 00,00,00,00,00,01,00,00,b7,45,\ 28,38,d9,53,70,4d,87,25,71,3a,64,54,87,6f, 00,00,00,00,00,02,00,00,b7,45,28,\ 38,d9,53,70,4d,87,25,71,3a,64,54,87,6f, 00,00,00,00,00,03,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,f4,81,fd,df, 2a,ba,\ 60,41,98,6a,f7,1b,e9,26,3a,b2,00,00,00,f0,43,1b, 00,00,00,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,f4,81,fd,df,2a,ba, 60,41,\ 98,6a,f7,1b,e9,26,3a,b2,00,00,00,f0,43,1d,00,00,f4,81,fd,df,2a,ba, 60,41,98,\ 6a,f7,1b,e9,26,3a,b2,00,00,00,f0,43,1a,00,00,f4,81,fd,df,2a,ba, 60,41,98,6a,\ f7,1b,e9,26,3a,b2,00,00,00,f0,43,12,00,00,f4,81,fd,df,2a,ba, 60,41,98,6a,f7,\ 1b,e9,26,3a,b2,00,00,00,f0,43,18,00,00,f4,81,fd,df,2a,ba, 60,41,98,6a,f7,1b,\ e9,26,3a,b2,00,00,00,f0,43,15,00,00,f4,81,fd,df,2a,ba, 60,41,98,6a,f7,1b,e9,\ 26,3a,b2,00,00,00,f0,43,16,00,00,f4,81,fd,df,2a,ba, 60,41,98,6a,f7,1b,e9,26,\ 3a,b2,00,00,00,f0,43,17,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,\ 00,00,00,00,00,00,00,00,a9,6d,f5,4e,98,6e,0d,4a,97,13,3d,b3,9c, 43,4a,d0 "010267f0"=hex:a6,8e,57,a6,4f,90,80,fa,b7,5b,88,00,fe,db,62,5b "101f6637"=hex:05,00,00,00,18,00,00,00,c4,00,00,00,3a, 01,00,00,62,01,00,00,ae,\ 01,00,00,2f,00,6f,00,3d,00,47,00,54,00,52,00,49,00,2d, 00,45,00,58,00,54,00,\ 2f,00,6f,00,75,00,3d,00,45,00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,00,20,\ 00,41,00,64,00,6d,00,69,00,6e, 00,69,00,73,00,74,00,72,00,61,00,74,00,69,00,\ 76,00,65,00,20,00,47,00,72,00,6f, 00,75,00,70,00,20,00,28,00,46,00,59,00,44,\ 00,49,00,42,00,4f,00,48,00,46,00,32,00,33,00,53,00,50,00,44,00,4c, 00,54,00,\ 29,00,2f,00,63,00,6e,00,3d, 00,52,00,65,00,63,00,69,00,70,00,69,00,65,00,6e,\ 00,74,00,73,00,2f,00,63,00,6e,00,3d, 00,62,00,77,00,31,00,37,00,31,00,00,00,\ 58,00,34,00,30,00,30,00,3a,00,43,00,3d,00,55,00,53,00,3b,00,41,00,3d, 00,20,\ 00,3b,00,50,00,3d,00,47,00,54,00,52,00,49,00,2d, 00,45,00,58,00,54,00,3b,00,\ 4f,00,3d,00,45,00,78,00,63,00,68,00,61,00,6e,00,67,00,65,00,3b, 00,53,00,3d,\ 00,57,00,61,00,73,00,68,00,69,00,6e,00,67,00,74,00,6f,00,6e,00,3b, 00,47,00,\ 3d,00,42,00,6f,00,6f,00,6b,00,65,00,72,00,3b,00,00,00,73,00,6d, 00,74,00,70,\ 00,3a, 00,62,00,77,00,31,00,37,00,31,00,40,00,67,00,74,00,72,00,69,00,2e,00,\ 65,00,78,00,74,00,00,00,53,00,4d,00,54,00,50,00,3a,00,62,00,6f,00,6f, 00,6b,\ 00,65,00,72,00,2e,00,77,00,61,00,73,00,68,00,69,00,6e, 00,67,00,74,00,6f,00,\ 6e,00,40,00,6d,00,67,00,74,00,2e, 00,67,00,61,00,74,00,65,00,63,00,68,00,2e,\ 00,65,00,64,00,75,00,00,00,73,00,6d,00,74,00,70,00,3a,00,62,00,6f, 00,6f,00,\ 6b,00,65,00,72,00,2e,00,77,00,61,00,73,00,68,00,69,00,6e, 00,67,00,74,00,6f,\ 00,6e,00,40,00,6d,00,67,00,74,00,2e,00,67,00,74,00,72,00,69,00,2e, 00,6f,00,\ 72,00,67,00,00,00 "00406638"=hex:ca,17,73,57,3f,ac,c7,01 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \2f4effa04793b3449b548afa4c8bcd86] "001f3001"=hex:4d,00,69,00,63,00,72,00,6f,00,73,00,6f, 00,66,00,74,00,20,00,45,\ 00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,00,20,00,54,00,72,00,61,00,6e,00,\ 73,00,70,00,6f,00,72,00,74,00,00,00 "001f3006"=hex:4d,00,69,00,63,00,72,00,6f,00,73,00,6f, 00,66,00,74,00,20,00,45,\ 00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,00,20,00,54,00,72,00,61,00,6e,00,\ 73,00,70,00,6f,00,72,00,74,00,00,00 "001f300a"=hex:45,00,4d,00,53,00,4d,00,44,00,42,00,2e,00,44,00,4c, 00,4c,00,00,\ 00 "001f3d13"=hex:7b, 00,36,00,34,00,38,00,35,00,44,00,32,00,36,00,41,00,2d,00,43,\ 00,32,00,41,00,43,00,2d,00,31,00,31,00,44,00,31,00,2d, 00,41,00,44,00,33,00,\ 45,00,2d, 00,31,00,30,00,41,00,30,00,43,00,39,00,31,00,31,00,43,00,39,00,43,\ 00,30,00,7d,00,00,00 "00033e03"=hex:24,00,00,00 "00036609"=hex:00,00,00,00 "01023d0c"=hex:02,4f,a8,a3,cf,91,0f,49,ae,f0,69,14,a7,dd,ed,75 "001f3d09"=hex:4d,00,53,00,45,00,4d,00,53,00,00,00 "00033009"=hex:00,00,00,00 "001e660b"="/o=ExchORG-EXT/ou=Exchange Administrative Group (RndmSetofLetters)/cn=Recipients/cn=%username%" "001e660c"="Exchgservername" "001f662b"=hex:61,00,65,00,61,00,74,00,6c,00,63,00,61,00,6d, 00,65,00,78,00,31,\ 00,30,00,2e,00,63,00,61,00,6d,00,70,00,75,00,73,00,2e, 00,67,00,74,00,72,00,\ 69,00,2e,00,65,00,78,00,74,00,00,00 "001e6614"="/o=ExchORG-EXT/ou=Exchange Administrative Group (RndmSetofLetters)/cn=Configuration/cn=Servers/cn=Exchgservername" [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \3517490d76624c419a828607e2a54604] "001f6000"=hex:45,00,78,00,63,00,68,00,61,00,6e,00,67,00,65,00,7e, 00,37,00,00,\ 00 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \40fc298f50dbb8418b5374693ec4c66d] "001f300a"=hex:45,00,4d,00,53,00,4d,00,44,00,42,00,2e,00,44,00,4c, 00,4c,00,00,\ 00 "001f3d13"=hex:7b, 00,36,00,34,00,38,00,35,00,44,00,32,00,36,00,41,00,2d,00,43,\ 00,32,00,41,00,43,00,2d,00,31,00,31,00,44,00,31,00,2d, 00,41,00,44,00,33,00,\ 45,00,2d, 00,31,00,30,00,41,00,30,00,43,00,39,00,31,00,31,00,43,00,39,00,43,\ 00,30,00,7d,00,00,00 "00033e03"=hex:21,00,00,00 "00033009"=hex:06,10,00,00 "00036609"=hex:0c,00,00,00 "0003660a"=hex:01,00,00,00 "01023414"=hex:54,94,a1,c0,29,7f,10,1b,a5,87,08,00,2b,2a,25,17 "001f3001"=hex:4d,00,61,00,69,00,6c,00,62,00,6f,00,78,00,20,00,2d, 00,20,00,57,\ 00,61,00,73,00,68,00,69,00,6e,00,67,00,74,00,6f,00,6e,00,2c, 00,20,00,42,00,\ 6f,00,6f,00,6b,00,65,00,72,00,00,00 "001f3006"=hex:4d,00,69,00,63,00,72,00,6f,00,73,00,6f, 00,66,00,74,00,20,00,45,\ 00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,00,20,00,53,00,65,00,72,00,76,00,\ 65,00,72,00,00,00 "01023d0c"=hex:02,4f,a8,a3,cf,91,0f,49,ae,f0,69,14,a7,dd,ed,75 "001f3d09"=hex:4d,00,53,00,45,00,4d,00,53,00,00,00 "001e660c"="Exchgservername" "001f662b"=hex:61,00,65,00,61,00,74,00,6c,00,63,00,61,00,6d, 00,65,00,78,00,31,\ 00,30,00,2e,00,63,00,61,00,6d,00,70,00,75,00,73,00,2e, 00,67,00,74,00,72,00,\ 69,00,2e,00,65,00,78,00,74,00,00,00 "001e6614"="/o=ExchORG-EXT/ou=Exchange Administrative Group (RndmSetofLetters)/cn=Configuration/cn=Servers/cn=Exchgservername" "001e660b"="/o=ExchORG-EXT/ou=Exchange Administrative Group (RndmSetofLetters)/cn=Recipients/cn=%username%" "01020fff"=hex:00,00,00,00,38,a1,bb,10,05,e5,10,1a,a1,bb,08,00,2b,2a, 56,c2,00,\ 00,45,4d,53,4d,44,42,2e,44,4c,4c,00,00,00,00,00,00,00,00,1b,55,fa, 20,aa,66,\ 11,cd,9b,c8,00,aa,00,2f,c4,5a,0c,00,00,00,41,45,41,54,4c,43,41,4d, 45,58,31,\ 30,00,2f,6f,3d,47,54,52,49,2d,45,58,54,2f,6f,75,3d,45,78,63,68,61,6e, 67,65,\ 20,41,64,6d,69,6e,69,73,74,72,61,74,69,76,65,20,47,72,6f, 75,70,20,28,46,59,\ 44,49,42,4f,48,46,32,33,53,50,44,4c,54,29,2f,63,6e,3d, 52,65,63,69,70,69,65,\ 6e,74,73,2f,63,6e,3d,62,77,31,37,31,00,d8,35,21,f3,bb, 00,00,00,01,00,00,00,\ 14,00,00,00,7f,00,00,00,2f,6f,3d,47,54,52,49,2d,45,58,54,2f,6f,75,3d, 45,78,\ 63,68,61,6e,67,65,20,41,64,6d,69,6e, 69,73,74,72,61,74,69,76,65,20,47,72,6f,\ 75,70,20,28,46,59,44,49,42,4f,48,46,32,33,53,50,44,4c,54,29,2f,63,6e, 3d,43,\ 6f,6e,66,69,67,75,72,61,74,69,6f,6e,2f,63,6e,3d, 53,65,72,76,65,72,73,2f,63,\ 6e,3d,41,45,41,54,4c,43,41,4d, 45,58,31,30,00,61,00,65,00,61,00,74,00,6c,00,\ 63,00,61,00,6d,00,65,00,78,00,31,00,30,00,2e,00,63,00,61,00,6d, 00,70,00,75,\ 00,73,00,2e,00,67,00,74,00,72,00,69,00,2e, 00,65,00,78,00,74,00,00,00,00,00 "01020ff9"=hex:b3,4a,86,88,e1,28,b4,44,87,9b,9c,34,ea,73,53,aa "00036688"=hex:01,00,00,00 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \5acf76a3665511cea39a00aa004acafa] "001e6710"="" "000b6716"=hex:01,00 "000b6717"=hex:00,00 "000b6718"=hex:01,00 "00036719"=hex:00,00,00,00 "000b6729"=hex:01,00 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \6cef6bcef9d8ea47b40875ab9c6e22e4] "001f300a"=hex:63,00,6f,00,6e,00,74,00,61,00,62,00,2e,00,64,00,6c, 00,6c,00,00,\ 00 "001f3d13"=hex:7b, 00,36,00,34,00,38,00,35,00,44,00,32,00,36,00,36,00,2d,00,43,\ 00,32,00,41,00,43,00,2d,00,31,00,31,00,44,00,31,00,2d, 00,41,00,44,00,33,00,\ 45,00,2d, 00,31,00,30,00,41,00,30,00,43,00,39,00,31,00,31,00,43,00,39,00,43,\ 00,30,00,7d,00,00,00 "00033e03"=hex:23,00,00,00 "001f3006"=hex:4f,00,75,00,74,00,6c,00,6f,00,6f,00,6b, 00,20,00,41,00,64,00,64,\ 00,72,00,65,00,73,00,73,00,20,00,42,00,6f,00,6f,00,6b,00,00,00 "01023d0c"=hex:ab,1d,fe,e0,50,aa,9c,47,ae,6a,16,f6,c5,37,ac,b7 "001f3d09"=hex:43,00,4f,00,4e,00,54,00,41,00,42,00,00,00 "001f3001"=hex:4f,00,75,00,74,00,6c,00,6f,00,6f,00,6b, 00,20,00,41,00,64,00,64,\ 00,72,00,65,00,73,00,73,00,20,00,42,00,6f,00,6f,00,6b,00,00,00 "00033009"=hex:00,00,00,00 "01026601"=hex:43,4a,38,07,61,ac,38,40,ad,e3,75,a2,82,40,83,5e "11026620"=hex:01,00,00,00,2e,00,00,00,0c,00,00,00,00,00,00,00,b3,4a, 86,88,e1,\ 28,b4,44,87,9b,9c,34,ea,73,53,aa,01,00,f4,81,fd,df,2a,ba, 60,41,98,6a,f7,1b,\ e9,26,3a,b2,00,00,00,f0,27,38,00,00,00,00 "10036621"=hex:0f,01,04,80 "101f6627"=hex:01,00,00,00,08,00,00,00,4d,00,61,00,69,00,6c, 00,62,00,6f,00,78,\ 00,20,00,2d,00,20,00,57,00,61,00,73,00,68,00,69,00,6e, 00,67,00,74,00,6f,00,\ 6e,00,2c,00,20,00,42,00,6f,00,6f,00,6b,00,65,00,72,00,00,00 "101f6628"=hex:01,00,00,00,08,00,00,00,43,00,6f,00,6e, 00,74,00,61,00,63,00,74,\ 00,73,00,00,00 "101f6629"=hex:01,00,00,00,08,00,00,00,43,00,6f,00,6e, 00,74,00,61,00,63,00,74,\ 00,73,00,00,00 "10036625"=hex:01,00,00,00 "11026626"=hex:01,00,00,00,5a,01,00,00,0c, 00,00,00,00,00,00,00,38,a1,bb,10,05,\ e5,10,1a,a1,bb,08,00,2b,2a,56,c2,00,00,45,4d,53,4d,44,42,2e,44,4c,4c, 00,00,\ 00,00,00,00,00,00,1b,55,fa,20,aa,66,11,cd,9b,c8,00,aa,00,2f,c4,5a,0c, 00,00,\ 00,41,45,41,54,4c,43,41,4d,45,58,31,30,00,2f,6f,3d,47,54,52,49,2d, 45,58,54,\ 2f,6f,75,3d,45,78,63,68,61,6e,67,65,20,41,64,6d,69,6e, 69,73,74,72,61,74,69,\ 76,65,20,47,72,6f,75,70,20,28,46,59,44,49,42,4f, 48,46,32,33,53,50,44,4c,54,\ 29,2f,63,6e,3d,52,65,63,69,70,69,65,6e,74,73,2f,63,6e,3d, 62,77,31,37,31,00,\ d8,35,21,f3,bb,00,00,00,01,00,00,00,14,00,00,00,7f,00,00,00,2f,6f,3d, 47,54,\ 52,49,2d,45,58,54,2f,6f,75,3d,45,78,63,68,61,6e,67,65,20,41,64,6d, 69,6e,69,\ 73,74,72,61,74,69,76,65,20,47,72,6f,75,70,20,28,46,59,44,49,42,4f, 48,46,32,\ 33,53,50,44,4c,54,29,2f,63,6e,3d,43,6f,6e,66,69,67,75,72,61,74,69,6f, 6e,2f,\ 63,6e,3d,53,65,72,76,65,72,73,2f,63,6e,3d,41,45,41,54,4c,43,41,4d, 45,58,31,\ 30,00,61,00,65,00,61,00,74,00,6c,00,63,00,61,00,6d, 00,65,00,78,00,31,00,30,\ 00,2e,00,63,00,61,00,6d,00,70,00,75,00,73,00,2e, 00,67,00,74,00,72,00,69,00,\ 2e,00,65,00,78,00,74,00,00,00,00,00,00,00 "101e6622"=hex:01,00,00,00,08,00,00,00,4d,61,69,6c,62,6f,78,20,2d, 20,57,61,73,\ 68,69,6e,67,74,6f,6e,2c,20,42,6f,6f,6b,65,72,00 "101e6623"=hex:01,00,00,00,08,00,00,00,43,6f,6e,74,61,63,74,73,00 "101e6624"=hex:01,00,00,00,08,00,00,00,43,6f,6e,74,61,63,74,73,00 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \8503020000000000c000000000000046] "0102300b"=hex:a9,6d,f5,4e,98,6e,0d,4a,97,13,3d,b3,9c,43,4a,d0 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \88f913d52e6b33429eeee5767828ba75] "001f3001"=hex:4d,00,69,00,63,00,72,00,6f,00,73,00,6f, 00,66,00,74,00,20,00,45,\ 00,78,00,63,00,68,00,61,00,6e,00,67,00,65,00,20,00,52,00,65,00,6d, 00,6f,00,\ 74,00,65,00,20,00,54,00,72,00,61,00,6e,00,73,00,70,00,6f, 00,72,00,74,00,00,\ 00 "001f3006"=hex:4d,00,69,00,63,00,72,00,6f,00,73,00,6f, 00,66,00,74,00,20,00,45,\ 00,78,00,63,00,68,00,61,00,6e,00,67,00,65,00,20,00,52,00,65,00,6d, 00,6f,00,\ 74,00,65,00,20,00,54,00,72,00,61,00,6e,00,73,00,70,00,6f, 00,72,00,74,00,00,\ 00 "001f300a"=hex:45,00,4d,00,53,00,55,00,49,00,2e,00,44,00,4c,00,4c, 00,00,00 "001f3d13"=hex:7b, 00,36,00,34,00,38,00,35,00,44,00,32,00,36,00,41,00,2d,00,43,\ 00,32,00,41,00,43,00,2d,00,31,00,31,00,44,00,31,00,2d, 00,41,00,44,00,33,00,\ 45,00,2d, 00,31,00,30,00,41,00,30,00,43,00,39,00,31,00,31,00,43,00,39,00,43,\ 00,30,00,7d,00,00,00 "00033e03"=hex:24,00,00,00 "00036609"=hex:40,00,00,00 "0003660a"=hex:0a,00,00,00 "01023d0c"=hex:02,4f,a8,a3,cf,91,0f,49,ae,f0,69,14,a7,dd,ed,75 "001f3d09"=hex:4d,00,53,00,45,00,4d,00,53,00,00,00 "00033009"=hex:00,00,00,00 "001e660b"="/o=ExchORG-EXT/ou=Exchange Administrative Group (RndmSetofLetters)/cn=Recipients/cn=%username%" "001e660c"="Exchgservername" "001f662b"=hex:61,00,65,00,61,00,74,00,6c,00,63,00,61,00,6d, 00,65,00,78,00,31,\ 00,30,00,2e,00,63,00,61,00,6d,00,70,00,75,00,73,00,2e, 00,67,00,74,00,72,00,\ 69,00,2e,00,65,00,78,00,74,00,00,00 "001e6614"="/o=ExchORG-EXT/ou=Exchange Administrative Group (RndmSetofLetters)/cn=Configuration/cn=Servers/cn=Exchgservername" [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \9207f3e0a3b11019908b08002b2a56c2] "01023d01"=hex:6c,ef,6b,ce,f9,d8,ea,47,b4,08,75,ab,9c,6e,22,e4,f1,3b, 83,05,47,\ 9a,7e,44,87,c6,b7,39,d3,86,38,6f "01023d0e"=hex:ab,1d,fe,e0,50,aa,9c,47,ae,6a, 16,f6,c5,37,ac,b7,02,4f,a8,a3,cf,\ 91,0f,49,ae,f0,69,14,a7,dd,ed,75 "01023d00"=hex:d9,39,c1,fc,a9,e7,05,47,b7,ea,33,98,d5,af,6d,68,40,fc, 29,8f,50,\ db,b8,41,8b,53,74,69,3e,c4,c6,6d "01023d02"=hex:88,f9,13,d5,2e,6b,33,42,9e,ee,e5,76,78,28,ba,75,2f, 4e,ff,a0,47,\ 93,b3,44,9b,54,8a,fa,4c,8b,cd,86 "01023d08"=hex:cb,24,74,f4,f0,a2,32,4a,b6,26,28,54,01,94,05,8e "11023d05"=hex:02,00,00,00,1e,00,00,00,14,00,00,00,5a, 00,00,00,34,00,00,00,00,\ 00,00,00,dc,a7,40,c8,c0,42,10,1a,b4,b9,08,00,2b, 2f,e1,82,01,00,00,00,00,01,\ 00,00,2f,00,00,00,00,00,00,00,fe,42,aa,0a,18,c7,1a,10,e8,85,0b,65,1c, 24,00,\ 00,03,00,00,00,03,00,00,00,43,4a,38,07,61,ac, 38,40,ad,e3,75,a2,82,40,83,5e,\ 00,00,00,00,b3,4a,86,88,e1,28,b4,44,87,9b,9c,34,ea,73,53,aa, 01,00,f4,81,fd,\ df,2a,ba,60,41,98,6a,f7,1b,e9,26,3a,b2,00,00,00,f0,27,38,00,00,00,00 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \9375CFF0413111d3B88A00104B2A6676] "{ED475418-B0D6-11D2-8C3B-00104B2A6676}"=hex:02,00,00,00 "LastChangeVer"=hex:0c,00,00,00,00,00,00,00 "{ED475419-B0D6-11D2-8C3B-00104B2A6676}"=hex:01,00,00,00 "{ED475420-B0D6-11D2-8C3B-00104B2A6676}"=hex:02,00,00,00 "NextAccountID"=dword:00000003 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \9375CFF0413111d3B88A00104B2A6676\00000001] "clsid"="{ED475414-B0D6-11D2-8C3B-00104B2A6676}" "Mini UID"=dword:7c81368c "Service Name"=hex:43,00,4f,00,4e,00,54,00,41,00,42,00,00,00 "Service UID"=hex:ab,1d,fe,e0,50,aa,9c,47,ae,6a,16,f6,c5,37,ac,b7 "MAPI Provider"=dword:00000002 "Account Name"=hex:4f,00,75,00,74,00,6c,00,6f,00,6f,00,6b, 00,20,00,41,00,64,00,\ 64,00,72,00,65,00,73,00,73,00,20,00,42,00,6f,00,6f,00,6b,00,00,00 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \9375CFF0413111d3B88A00104B2A6676\00000002] "clsid"="{ED475414-B0D6-11D2-8C3B-00104B2A6676}" "Mini UID"=dword:fc047238 "Service Name"=hex:4d,00,53,00,45,00,4d,00,53,00,00,00 "Service UID"=hex:02,4f,a8,a3,cf,91,0f,49,ae,f0,69,14,a7,dd,ed,75 "MAPI Provider"=dword:00000005 "Identity Eid"=hex:00,00,00,00,dc,a7,40,c8,c0,42,10,1a,b4,b9,08,00,2b, 2f,e1,82,\ 01,00,00,00,00,00,00,00,2f,4f,3d,47,54,52,49,2d,45,58,54,2f,4f,55,3d, 45,58,\ 43,48,41,4e,47,45,20,41,44,4d,49,4e, 49,53,54,52,41,54,49,56,45,20,47,52,4f,\ 55,50,20,28,46,59,44,49,42,4f,48,46,32,33,53,50,44,4c,54,29,2f,43,4e, 3d,52,\ 45,43,49,50,49,45,4e,54,53,2f,43,4e,3d,42,57,31,37,31,00 "XP Provider UID"=hex:88,f9,13,d5,2e,6b,33,42,9e,ee,e5,76,78,28,ba, 75,2f,4e,ff,\ a0,47,93,b3,44,9b,54,8a,fa,4c,8b,cd,86 "Account Name"=hex:4d,00,69,00,63,00,72,00,6f,00,73,00,6f, 00,66,00,74,00,20,00,\ 45,00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,00,20,00,53,00,65,00,72,00,76,\ 00,65,00,72,00,00,00 "XP Status"=dword:00000001 "XP Capabilities"=dword:00000002 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \ab1dfee050aa9c47ae6a16f6c537acb7] "001f3d0a"=hex:63,00,6f,00,6e,00,74,00,61,00,62,00,2e,00,64,00,6c, 00,6c,00,00,\ 00 "001f3d13"=hex:7b, 00,36,00,34,00,38,00,35,00,44,00,32,00,36,00,36,00,2d,00,43,\ 00,32,00,41,00,43,00,2d,00,31,00,31,00,44,00,31,00,2d, 00,41,00,44,00,33,00,\ 45,00,2d, 00,31,00,30,00,41,00,30,00,43,00,39,00,31,00,31,00,43,00,39,00,43,\ 00,30,00,7d,00,00,00 "101e3d0f"=hex:01,00,00,00,08,00,00,00,63,6f,6e,74,61,62,2e,64,6c,6c, 00 "001f3d0b"=hex:53,00,65,00,72,00,76,00,69,00,63,00,65,00,45,00,6e, 00,74,00,72,\ 00,79,00,00,00 "00033009"=hex:22,00,00,00 "001f3d09"=hex:43,00,4f,00,4e,00,54,00,41,00,42,00,00,00 "001f3001"=hex:4f,00,75,00,74,00,6c,00,6f,00,6f,00,6b, 00,20,00,41,00,64,00,64,\ 00,72,00,65,00,73,00,73,00,20,00,42,00,6f,00,6f,00,6b,00,00,00 "01023d01"=hex:6c,ef,6b,ce,f9,d8,ea,47,b4,08,75,ab,9c,6e,22,e4 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \cb2474f4f0a2324ab62628540194058e] "001f3001"=hex:4d,00,53,00,20,00,45,00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,\ 00,20,00,48,00,6f,00,6f,00,6b,00,00,00 "001f3006"=hex:4d,00,53,00,20,00,45,00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,\ 00,20,00,48,00,6f,00,6f,00,6b,00,00,00 "001f300a"=hex:45,00,4d,00,53,00,4d,00,44,00,42,00,2e,00,44,00,4c, 00,4c,00,00,\ 00 "001f3d13"=hex:7b, 00,36,00,34,00,38,00,35,00,44,00,32,00,36,00,41,00,2d,00,43,\ 00,32,00,41,00,43,00,2d,00,31,00,31,00,44,00,31,00,2d, 00,41,00,44,00,33,00,\ 45,00,2d, 00,31,00,30,00,41,00,30,00,43,00,39,00,31,00,31,00,43,00,39,00,43,\ 00,30,00,7d,00,00,00 "00033e03"=hex:28,00,00,00 "00033009"=hex:00,02,00,00 "01023d0c"=hex:02,4f,a8,a3,cf,91,0f,49,ae,f0,69,14,a7,dd,ed,75 "001f3d09"=hex:4d,00,53,00,45,00,4d,00,53,00,00,00 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \d939c1fca9e70547b7ea3398d5af6d68] "00033e03"=hex:21,00,00,00 "001f300a"=hex:45,00,4d,00,53,00,4d,00,44,00,42,00,2e,00,44,00,4c, 00,4c,00,00,\ 00 "001f3d13"=hex:7b, 00,36,00,34,00,38,00,35,00,44,00,32,00,36,00,41,00,2d,00,43,\ 00,32,00,41,00,43,00,2d,00,31,00,31,00,44,00,31,00,2d, 00,41,00,44,00,33,00,\ 45,00,2d, 00,31,00,30,00,41,00,30,00,43,00,39,00,31,00,31,00,43,00,39,00,43,\ 00,30,00,7d,00,00,00 "00033009"=hex:40,00,00,00 "00036609"=hex:06,00,00,00 "0003660a"=hex:03,00,00,00 "01023414"=hex:78,b2,fa,70,af,f7,11,cd,9b,c8,00,aa,00,2f,c4,5a "001f3001"=hex:50,00,75,00,62,00,6c,00,69,00,63,00,20,00,46,00,6f, 00,6c,00,64,\ 00,65,00,72,00,73,00,00,00 "001f3006"=hex:4d,00,69,00,63,00,72,00,6f,00,73,00,6f, 00,66,00,74,00,20,00,45,\ 00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,00,20,00,53,00,65,00,72,00,76,00,\ 65,00,72,00,00,00 "01023d0c"=hex:02,4f,a8,a3,cf,91,0f,49,ae,f0,69,14,a7,dd,ed,75 "001f3d09"=hex:4d,00,53,00,45,00,4d,00,53,00,00,00 "001e660c"="Exchgservername" "001f662b"=hex:61,00,65,00,61,00,74,00,6c,00,63,00,61,00,6d, 00,65,00,78,00,31,\ 00,30,00,2e,00,63,00,61,00,6d,00,70,00,75,00,73,00,2e, 00,67,00,74,00,72,00,\ 69,00,2e,00,65,00,78,00,74,00,00,00 "001e6614"="/o=ExchORG-EXT/ou=Exchange Administrative Group (RndmSetofLetters)/cn=Configuration/cn=Servers/cn=Exchgservername" "01020fff"=hex:00,00,00,00,38,a1,bb,10,05,e5,10,1a,a1,bb,08,00,2b,2a, 56,c2,00,\ 00,45,4d,53,4d,44,42,2e,44,4c,4c,00,00,00,00,00,00,00,00,1c, 83,02,10,aa,66,\ 11,cd,9b,c8,00,aa,00,2f,c4,5a,06,00,00,00,41,45,41,54,4c,43,41,4d, 45,58,31,\ 30,00,d8,35,21,f3,bb,00,00,00,01,00,00,00,14,00,00,00,7f,00,00,00,2f, 6f,3d,\ 47,54,52,49,2d,45,58,54,2f,6f,75,3d,45,78,63,68,61,6e, 67,65,20,41,64,6d,69,\ 6e,69,73,74,72,61,74,69,76,65,20,47,72,6f, 75,70,20,28,46,59,44,49,42,4f,48,\ 46,32,33,53,50,44,4c,54,29,2f,63,6e,3d,43,6f,6e, 66,69,67,75,72,61,74,69,6f,\ 6e,2f,63,6e,3d,53,65,72,76,65,72,73,2f,63,6e,3d,41,45,41,54,4c, 43,41,4d,45,\ 58,31,30,00,61,00,65,00,61,00,74,00,6c,00,63,00,61,00,6d, 00,65,00,78,00,31,\ 00,30,00,2e,00,63,00,61,00,6d,00,70,00,75,00,73,00,2e, 00,67,00,74,00,72,00,\ 69,00,2e,00,65,00,78,00,74,00,00,00,00,00 "01020ff9"=hex:1a,44,73,90,aa,66,11,cd,9b,c8,00,aa,00,2f,c4,5a "00036688"=hex:01,00,00,00 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \dca740c8c042101ab4b908002b2fe182] "001f662a"=hex:61,00,65,00,61,00,74,00,6c,00,63,00,61,00,6d, 00,65,00,78,00,31,\ 00,30,00,2e,00,63,00,61,00,6d,00,70,00,75,00,73,00,2e, 00,67,00,74,00,72,00,\ 69,00,2e,00,65,00,78,00,74,00,00,00 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \f13b8305479a7e4487c6b739d386386f] "001f3001"=hex:4d,00,69,00,63,00,72,00,6f,00,73,00,6f, 00,66,00,74,00,20,00,45,\ 00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,00,20,00,44,00,69,00,72,00,65,00,\ 63,00,74,00,6f, 00,72,00,79,00,20,00,53,00,65,00,72,00,76,00,69,00,63,00,65,\ 00,00,00 "001f3006"=hex:4d,00,69,00,63,00,72,00,6f,00,73,00,6f, 00,66,00,74,00,20,00,45,\ 00,78,00,63,00,68,00,61,00,6e, 00,67,00,65,00,20,00,44,00,69,00,72,00,65,00,\ 63,00,74,00,6f, 00,72,00,79,00,20,00,53,00,65,00,72,00,76,00,69,00,63,00,65,\ 00,00,00 "001f300a"=hex:45,00,4d,00,53,00,41,00,42,00,50,00,2e,00,44,00,4c, 00,4c,00,00,\ 00 "001f3d13"=hex:7b, 00,36,00,34,00,38,00,35,00,44,00,32,00,36,00,41,00,2d,00,43,\ 00,32,00,41,00,43,00,2d,00,31,00,31,00,44,00,31,00,2d, 00,41,00,44,00,33,00,\ 45,00,2d, 00,31,00,30,00,41,00,30,00,43,00,39,00,31,00,31,00,43,00,39,00,43,\ 00,30,00,7d,00,00,00 "00033e03"=hex:23,00,00,00 "01023d0c"=hex:02,4f,a8,a3,cf,91,0f,49,ae,f0,69,14,a7,dd,ed,75 "001f3d09"=hex:4d,00,53,00,45,00,4d,00,53,00,00,00 "00033009"=hex:00,00,00,00 [HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion \Windows Messaging Subsystem\Profiles\Exchange \f86ed2903a4a11cfb57e524153480001] Tag: printer driver and prndrvr.vbs Tag: 206969
  - 11
    - logoff/shutdown script My manager has asked me to write a script that will run every time someone tries to log off or shutdown a computer. In the past people have logged off computers while virtual machines were running and usually automation would be running at the time or people would be doing manual QE testing so it would always be a real pain when they were shut off without warning. He wants me to write a script (shutdown or logoff or even both) that would check for one of VMware's executable files that only appear when a VM is running and then prompt a warning to the user to stop them from shutting down or logging off. I've done a some reading on the internet about logoff/shutdown scripts and I've emailed some people that I know. I know that it should be either a vbscript or jscript file. I know where to save the script when I'm done and how to configure group policy so that it runs on all the computers. I even know how to format the script (1. get a process list, 2. search the list for the VMware process 3. if process is found alert the user and cancel shutdown/logoff 4. if not, do nothing). The only problem is I DON'T KNOW HOW TO WRITE ONE. Do you guys have any suggestions as far as websites or reading material? Any thoughts would be appreciated. Tag: printer driver and prndrvr.vbs Tag: 206957
  - 12
    - Error Handling - IADS bug ? I have a script to create users. ....... On Error Resume Next set objUser = objCIADS.Create("User", "CN=" & strFname & " " &strLname) objUser.Put "samAccountName", strAccName objUser.SetInfo if (Err.Number<>0) then Wscript.Echo "User Creation failed for " & strFname & " " & strLname & vbcrdlf & _ "With Error " & Err.Description & " - continuing" ....... It works just fine. If I try and create a user that already exists then the error event is not triggered. If I omit the On Error Resume Next I get an error saying the object already exists. Is this a bug or have I got something wrong? Tag: printer driver and prndrvr.vbs Tag: 206954
  - 13
    - scripting folder date If I use the following script --> Const CONVERT_TO_LOCAL_TIME = True Set dtmStart = CreateObject("WbemScripting.SWbemDateTime") dtmStart.SetVarDate Now, CONVERT_TO_LOCAL_TIME dtmRegular = dtmStart.GetVarDate(CONVERT_TO_LOCAL_TIME) dtmNew = DateAdd("d", -37, dtmRegular) Wscript.Echo dtmNew wscript.quit <-- I get an output something similar to 5/6/2007 10:11:10 AM Is there a way to trim off the time information? I'm writing a script to determine the date of a folder, and then if it is older than say 4 months, delete it. Unfortunately, the time information is also there, and so the script never deletes the folder. Any Ideas how I can trim that time info off of there? Thanks Tag: printer driver and prndrvr.vbs Tag: 206953
  - 14
    - Hex program Hi, I want to know if there's any method to open a file in Hex with VBScript Thx Omar Abid Tag: printer driver and prndrvr.vbs Tag: 206945
  - 15
    - Need a vb-script to read user + data (phone-number etc.) from active We need a dynamic phone list for an internal website with user-names and corresponding phone number. to keep administrative effort low it would be best to generate it automatically from active directory entries. has anyone a script that can do that? eventually another one to search data for a given name? thx, mk (ts) Tag: printer driver and prndrvr.vbs Tag: 206941
  - 16
    - Parse text find match extract line I am looking for a way to loop through a file and do the following (vbs script?) 1) Find string match A, then move down 4 lines and save the contents of that new line (Line 5) 2) Find string match B then save that same line Save 1 and 2 above to a new file, separated by a comma. For example if a file looks like this: ********************* HEADER_BEGIN header1line1 header1line2 header1line3 header1line4 HEADER_END DATA_BEGIN data line1 data line2 data line3 DATA_END HEADER_BEGIN header2line1 header2line2 header2line3 header2line4 header2line5 header2line6 HEADER_END DATA_BEGIN data line1 data line2 data line3 DATA_END **************** Tricky because the headers may be different lengths (some 3 lines, some 10 lines) "HEADER_BEGIN" is always the same. (I want the 4th line underneath) "data line3" is always the same (I want this whole line) My output file would read like this: ******** header1line4, data line3 header2line4, data line3 ********** I've spent hours searching for answers and have been unsuccessful. File is thousands of lines long. I have hundreds of files in one folder. (Ideally I could loop through all the files) Tag: printer driver and prndrvr.vbs Tag: 206939
  - 17
    - Register event sink in Exchange Hello! I'm working on my first event sink, written in VBScript. Following some examples found in the Web I was able to write a simple script, which should check every new message and if it finds a known value in TO: field, write a mail to the sender (something like an out-of-office but selective). Now I'm trying to register my script in Exchange, I followed the steps in this KB article: http://support.microsoft.com/kb/895239 but when I try to send this command: C:\Scripts>cscript regevent.vbs add OnSave ExOleDB.ScriptEventSink.1 "file://./BackOfficeStorage/mycompany.local/MBX/kurtz" -m deep -file "c:\scripts\autoreply.vbs" I always get this error: Error Opening Connection : -2147217895 Unable to find an object or data correspondly to name, interval or selection criteria specified (I'm translating from my language...) I'd like to connect my script only to my mail folder (named kurtz). Where Am I wrong? Thanks! PS: Maybe this isn't the correct NG? Better in exchange ng? Tag: printer driver and prndrvr.vbs Tag: 206938
  - 18
    - Copying a Link's Target File I want to: 1. iterate through a folder of shortcuts 2. Get the target path 3. Copy the target file back to the folder of links. Here is my attempt. Any suggestions? Set oFSO = CreateObject("Scripting.FileSystemObject") Set oFolderOfLinks = oFSO.GetFolder("C:\Documents and Settings\Dan \Desktop\Links") Set colFiles = oFolderOfLinks.Files For Each oFile in colFiles If strcomp(right(oFile.name,4),".lnk", vbTextCompare) = 0 Then Set oLink = oFile.TargetPath Set oLinkedFile = oFSO.GetFile(oLink) oLink.Copy oFolderOfLinks End If Next Tag: printer driver and prndrvr.vbs Tag: 206937
  - 19
    - get event log NAMES Hello, I have a script for backing up and clearing log files. I was wondering... is there any way (WQL perhaps) to get the names of the event logs. In the domain, there are domain controllers and member servers. The domain controllers have 6 physical logs and the member servers have 3 physical logs. It would be cool to create a collection which holds all the event view logs on the host automatically -- instead of hardcoding event log names or maintaining two different scripts where the only difference is the number of *.evt files. I tried looking at some of the very verbose scriptomatic stuff but didn't see a method to get all the event log names off of a host. Suggestions are greatly appreciated! Tag: printer driver and prndrvr.vbs Tag: 206932
  - 20
    - octet string - Echo or Dump Contents How Echo the value of the Attrib. I do not need to convert to a string. I just need the HEX raw data. FYI the attrib is extensionData(SmartDL Filter) Thanks in Advance... RT Tag: printer driver and prndrvr.vbs Tag: 206928
  - 21
    - VBScript Working Progress Hi Does anyone know how to make to IE progress bar to display the VBScript running progress? Kururu Tag: printer driver and prndrvr.vbs Tag: 206925
  - 22
    - Including STYLE tag in script I am creating an InternetExplorer object to show progress. I am trying to hide the scrollbars and can do this via CSS but do not know how to include this in the script. How can I include this: <STYLE TYPE='text/ css'> to get rid of the scrollbars? objExplorer.Document.style.innerhtml? Tag: printer driver and prndrvr.vbs Tag: 206909
  - 23
    - Retrieving two (or more) Arguments from a Text File hello, i've a script that read line and return line as argument _______________________________________________ Const ForReading = 1 Set objDictionary = CreateObject("Scripting.Dictionary") Set objFSO = CreateObject("Scripting.FileSystemObject") Set objTextFile = objFSO.OpenTextFile _ ("list.txt", ForReading) i = 0 Do Until objTextFile.AtEndOfStream strNextLine = objTextFile.Readline objDictionary.Add i, strNextLine i = i + 1 Loop For Each objItem in objDictionary StrComputer = objDictionary.Item(objItem) msgbox strComputer Next ________________________________________________________ return line by line the content of list.txt file. 10.119.1.1;i'mfirstcomouter 10.119.1.2;i'mSecondcomputer 10.119.1.3;i'm........... Is possible to have 2 (or more) arguments with input file separated by ; or other symbol ? Thank you for any suggestions, A. Tag: printer driver and prndrvr.vbs Tag: 206906
  - 24
    - Learn scripting from scratch (VB) wich study book ? Trying to find out what the best study book is to learn scripting (VB) from scratch, Need a good study book. Which one ?? Rik Tag: printer driver and prndrvr.vbs Tag: 206904
  - 25
    - Serious HTA/CSS Help... I'm trying to use show/hide layers with CSS to make something like a tabbed interface for my HTA. I found and modified a nice bit of javascript and CSS that uses changes the "display" property of some div tags to either "block" or "none". I'm been using it on my website (thepip3r.com) -- you can see it working if you click projects -> HTAs -> RunAs_Admin. That tabbed interface is what I'm trying to incorporate into my HTA. The problem is that I got all of the code into my HTA and CSS files for the HTA but when I run the HTA, all of my Div tags are displayed at the start instead of not displaying like the display:none property does on my site. I'm not sure what's going on or if CSS is just qwerky with HTAs. I've verified that my div display property is initially set to "none" and that my javascript function is correctly setting only layer1's display property to "block" on the initial page load. So I'm not sure where my problem lies. If anyone can offer any insight, please do so -- i'm at a loss. Also... ironically, even though the page shows everything as "block" on the inital HTA load, once you start clicking the layer tabs, each div starts disappearing like it's supposed to be doing so I have no idea what I'm doing wrong if anything. Thanx in advance. Tag: printer driver and prndrvr.vbs Tag: 206895

hi

am trying to delete a printer driver from windows 2003 server and saying it
cannot do it because it is in use

Any ideas on h ow to delete it?

Have tried stopping and starting spooler but does not work, also tried
prndrvr.vbs and still says it is in use

help
don

Top