Couple of ideas,
What 'rights' do lowly users have on the desktop? You are writing to the registry. Can your users do that?
Your Mapit message to cal the system admin is outside the subroutine (probably more housekeeping than anything else.)
You mention you can run it from the desktop as an...
Ensure Auditing is turned on
check the Security event log for event 552. This tracks a successful logon to the computer that the remote user is logged into. It gives the remote users login ID and ip address.
i.e. John doe remotes into 'Target' - ip address 1.1.1.1 from his computer.
Event...
OUCH!
LDAP searches are painful. You can use winnt.
use your domain and logon name. (Can even ask for these in a msgbox)
----script below---------------
'Find users in NT4 Domains
option explicit
msgbox Time
'WScript.Echo Time
Dim binFound, objUser, strDomainName, strUserName
Const...
When the problem strikes is it one or tw folks or everyone at the same time?
What is your DNS resolution handled? Outlook 'might' be timing out the resolution of the server name rather than an 'e-mail' issue.
Woodhead
I have been a MCDBA for about 3 years now. I have yet to see anyone looking for that cert. 8-( I see companies looking for Developers (Programmers) they tend to make them do the DBA stuff.
I attacked the DBA from the other direction - keeping the server and the SQL on top of it alive. - But...
I remembr running into the 2000 record limit - for most of my clients this was not an issue. Off hand I do not remember my solution.
Try commenting out both the line:
objADOCommand.Properties("Size Limit") = 2000
so it looks like: (notice the single quote)...
In a Nutshell, it is easier to use the WinNT to locate the user then get the LDAP info.
The script below uses the Login Name (i.e. kbwood to get the information - Namely ASD path. This script will ask for the name. If you do not give a name, it will write ALL ids to a file inthe C:\temp...
Try something like this
------------------
'lastboot.vbs Date of last boot of machine requires Admin Priv to run
dim strMonth
ComputerName = InputBox("Enter the name of the computer you wish to query")
winmgmt1 = "winmgmts:{impersonationLevel=impersonate}!//"& ComputerName &...
Yes - you need three files (from what I can tell
----file 1 fdialogbox.vbs
'information for alltogether.vbs also needs alltogether.wfs
Function DialogBox(L, T, H, W, Cancel, File)
Dim DFile
Set DFile = FileSystem.GetFile(File)
IEDbx.Left = L
IEDbx.Top = T
IEDbx.Height = H...
If outlook is installed,
'Send Outlook Mail Item w/Attachment - can be called from batch with arguments
' ***************************************************
Dim objOutlook
Dim objNameSpace
Dim mItem
Dim strReceipient
Dim strSubject
Dim strBodyText
Dim strMsg
Dim pAttachment
Dim...
Easiest way in notepad the "name" something, Without playing with the Save as, clicking files of all types etc.
Click File, Save as,
In the File Name boxe REMOVE ALL TEXT....so the box is empty.
enter the filename and extension you want surrounded by double quotes i.e...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.