Goal: a text file showing the password status for every user in AD.
Problem: the script quits unexpectedly as soon as it gets to a user whose "User must change password at next logon" box is checked. My understanding is that this status should trigger the "password has expired" Else routine...
Goal: a .hta page that will allow users to reset the password only for users within their dept & email IT to notify that it was done.
Problem: UserList.value in Sub ResetPassword does not include any characters after the space between first & last names. So in testing the name "Jane Smith"...
Main form is called frmNewTicket, subform is called fsubClose. fsubClose's default visible property is No. I created a command button on frmNewTicket & for its OnClick event I have the following code:
Private Sub Command87_Click()
Me!Forms!fsubClose!Form!Visible = True
End Sub
When I click...
Am trying to have a textbox on my form auto-populate with the ID of the user currently logged onto the PC when the form is opened. I created a module w/ the following code from faq702-4949:
Public Function GetUserName_TSB() As String
On Error GoTo error_handler
Dim lngLen As Long
Dim strBuf As...
I am trying to copy a single file to multiple PCs (using a text file to generate the array of workstation names) then verify the file was copied. For testing purposes the text file currently has only 2 PCs listed in it, 1 is Win2K & the other is XP. Here's my code:
Option Explicit
'Declare...
I am trying to setup a single screensaver companywide using VBScript login script & GPOs. We have both XP & 2K workstations & 2 Win2000 AD servers. The screensaver is ssmypics.scr. My VBScript copies this file to the appropriate system32 folder (based on OS) makes the following registry...
My goal is to map TCP/IP printers as part of user login scripts. I've written a test script to verify it works on my own PC - it doesn't. Here's my code:
Option Explicit
Dim oWMIService, oNewPort
Set oWMIService = GetObject("winmgmts:")
Set oNewPort = oWMIService.Get _...
Here is my code:
Sub FindLinks(strMatchPattern, strPhrase, file)
Dim oRE, oMatches, oMatch, dt, start, sArray, timeStamp, url, sToday
Set oRE = New RegExp
oRE.Pattern = strMatchPattern
oRE.Global = True
oRE.IgnoreCase = False
Set oMatches = oRE.Execute(strPhrase)
sToday =...
When I view the TIFs thru IE I see a column called "Internet Address". However, when I try to view this column in Windows Explorer (after changing WE settings to show hidden & system OS files) there is no column w/ this name available. Is there a way in VBScript to get this info for files in...
I am trying to run a script on a MS cluster to get certain info. Here is my code so far:
On Error Resume Next
strComputer = "*****"
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\mscluster")
Set colItems =...
I need to modify a function that finds the newest file in a folder & outputs the result to the screen. I want the output added to a .html document that was already opened earlier in the script. Here is my code from a test script:
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set...
Problem: can't ping Cisco 3550 switch from PC. The PC can ping all other switches on the network except this 1. The 2 devices are connected via a Cisco 6509. If I telnet to the 6509 I can ping both devices. Both switches are on the same VLAN. Here's my layout:
Win2K PC (ip xxx.xxx.4.253)...
What command(s) would I enter to discover the IPs & MACs of devices connected to all the ports on a Cisco Catalyst WS-C6509 switch? When I try using 'show mac-address-table' I get an "unknown command" error. The 'show arp' command only shows data for 2 IPs, each of which belongs to routers...
I am unable to view any websites using either Konquerer or Firefox except by using their IP address. I cannot get DNS to work correctly. My linux box is part of a peer-to-peer LAN. I can view/ping all other PCs (Windows boxes) on the LAN fine using either their hostname or IP address. All...
I have a LAN with 9 PCs: 6 Win98SE, 2 Win2K Pro, & 1 WinXP Home. All are setup in a P2P configuration (no domain) with a shared Internet connection (fractional T1). All the PCs can share folders &/or printers fine except for the XP box. When the user logs into her XP box it does not...
I tried to install a new MS IntelliMouse (v3.0, optical, not wireless) onto a Compaq Presario running Windows XP Home. The mouse is connected to my PS/2 port. I ran the CD that came with the mouse to install IntelliPoint 5 - no problems. When the PC reboots the mouse is not detected. I tried...
I have to send out a new user list (an ASCII file) to each new user that is on that same list via mailx, on the 1st of every month. This means that my recipient list must be generated from the file itself. How do I do this from the command line? The filename changes every month (thank you...
I am trying to setup a peer-to-peer LAN in XP Home (using a hub) for 2 PCs to share files & printers. Each has its own Internet connection (via dialup). I have run the Network Setup wizard on each, made sure they have valid IPs (192.168.1.1 & 192.168.1.2), are in the same subnet...
I have 3 machines on a LAN: a Win98, a XP, & a RedHat Linux 8.0. I want the Win98 & Linux boxes to be networked [in a peer-to-peer configuration] for file & printer sharing, but to have neither available to the XP machine. Here is what I have done so far:
1. Installed a network card on Linux...
I want to build an expression that calculates the age for someone using their date of birth. This will include people born before 1930. The catch is that I want it calculated (& entered into the table automatically) when the person entering the data exits out of the Date of Birth field on my...
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.