Interface

I am try to add an optin to set static ip on my winpe hta menu... For thisI use a vbs script to run netsh ,,Please tel me what I am doing wrong!!! when I run thsi vbs the error is like the following command was not find . SetIp.vbs '******************************************************************** '* File: StaticIp.vbs '* Author: CodeMan '* dicky2k5@gmail.com '* Created: May 2007 '* Version: 2 '* Description: Seting Static IP ''* Dependencies: To Use on Win Pe2 '******************************************************************** Option Explicit Dim strTaskValue, objShell, objFso, objWmiService, strOutPut Dim strIP, strSub, strGtw Set objShell = CreateObject("WScript.Shell") Set objFso = CreateObject("Scripting.FileSystemObject") Set objWMIService = GetObject ("winmgmts:\\.\root\cimv2") '**************************************************************************** '*SetIp '**************************************************************************** 'Sub RunSetip strIP = inputbox ("Please enter the IP Address.","192.168.1.11","192.168.1.11") strSub = inputbox ("Please enter the Subnet Mask.","255.255.255.0","255.255.255.0") strGtw = inputbox ("Please enter the Gate Way.","192.168.1.1","192.168.1.1") 'Msgbox "netsh int ip addr set local static "& strIP & " "& strSub & " "& strGtw & " " objShell.Run "%comspec% /k netsh int ip addr set local static "&strIP & " "& strSub & " "& strGtw & " ",1, false Msgbox "Whois Me-->IP--> " & strIP & " MASK--> "& strSub & " G'WAY-->"& strGtw & " " 'End '****************************************************************************

Hi, Please read this and Can you tell me how may domain controller I need If I have 1000 domain users. My hardware: IBM Dual P4-3Ghz CPU 73 GB SCSI HDD RAID1 and WIN2K3 SP1 Enterprise Edtion. Have seen these Don't put me in confusion Any formula or tools not Statitics like Consultants and Professionals.. I Belive The Force............

Hi, I don't Understand Automatic......But this is my way...... not 30+ but 1K++++ Again save as WhatEverYouLike.vbs and 2click.. Then you will see a COMPUTERS.txt File genarated "Automatically" put the computer name inside and 2 click. You can challange the script to do automatic using counters,,and loops etc try... or let me know... But don't forget the "ChangePwdComputers.log" '******************************************************************** '* '* File: ADMLpass.vbs '* Created: September 2005 '* Version: 2k509.21 '* '* ' Sample Script For Changing The Local Administrator Account Password. '* '* Main Function: To Change The Local Administrator Account Password. '* '* Syntax Computername '* '* Copyright (C) 2005 Nidheesh Nattiala '* '******************************************************************** ' Description: This script will read in a list of computer account names ' from a file (created manually or by exporting a list from an ' OU/container using ADU&C). Each computer name must be the ' first item on each line of the file; anything after the ' computer name will be ignored. The script will attempt to ' change the local Administrator account password for each ' computer. Note: The first line of the input file is ' assumed to be a header line. By NNattiala '------------------------------------------------------------------------------- '------------------------------------------------------------------------------- ' Initialization - Declare variables '------------------------------------------------------------------------------- Dim fsoIn, fsoOut Dim inFile, outFile Dim arrComputerNames Dim objUser Dim strComputer Dim newPassword Dim ErrorOccurred Const ForReading = 1 Const ForWriting = 2 Const ForAppending = 8 Const inFilename = "Computers.txt" Const outFilename = "ChangePwdComputers.log" '------------------------------------------------------------------------------- ' Main script '------------------------------------------------------------------------------- On Error Resume Next ErrorOccurred = False ' Insert WARNING here... Msgbox ("WARNING: This script will change the local administrator password for every " & _ "computer listed in COMPUTERS.TXT. If any services are running with the local " & _ "administrator credentials, those services must be updated, or they won't " & _ "start on the next boot. For this script to work, you must have administrative " & _ "privileges on all of the remote computers you are changing the password for.") ' Get new password newPassword = Inputbox ("Please Enter The New Password For The Local Administrators: Take Care Created By NNattiala","Enter The New Password","N!dh55sh") ' Open the input file and skip the header line Set fsoIn = CreateObject("scripting.filesystemobject") Set inFile = fsoIn.OpenTextFile(inFilename, ForReading, True) inFile.Skipline ' Open the log file (append mode) and timestamp the entry Set fsoOut = CreateObject("scripting.filesystemobject") Set outFile = fsoOut.OpenTextFile(outFilename, ForAppending, True) outFile.writeline (Now & vbTab & "Starting script...") While Not inFile.AtEndOfStream arrComputerNames = Split(inFile.Readline, vbTab, -1, 1) ' arrComputerNames(0) contains the computer name strComputer = arrComputerNames(0) ' Connect to the computer\administrator account Set objUser = GetObject("WinNT://" & strComputer & "/Administrator, user") If Err.Number <> 0 Then outFile.writeline Now & vbTab & "Error connecting to " & strComputer & " --- " & Err.Description Err.Clear ErrorOccurred = True Else ' Set the password for the account objUser.SetPassword newPassword objUser.SetInfo If Err.Number <> 0 Then outFile.writeline Now & vbTab & "Error setting password for " & strComputer & _ "\Administrator" & " --- " & Err.Description Err.Clear ErrorOccurred = True Else outFile.writeline (Now & vbTab & "Password set for " & strComputer & "\Administrator") End If End If Wend ' Clean up the environment outFile.writeline (Now & vbTab & "Ending script...") inFile.close outFile.close If ErrorOccurred Then msgbox "Script completed with errors. Please check the log file." Else MsgBox "Script completed successfully." End If Belive The Force....

Hi, How can I print a document directly to a network printer by using any (.cmd .vbs ,vb or.js) script? But I have a condition: I will not install any printer on a pc where the script is running. If no script any tool or utility......

Hi, This is my way ...... Copy this to WhatEverYouLike.vbs and double click. Remainng is its power. For me it create a DomUinfo.txt file and your domain is on that file....... You can challange this script ot import any feild on teh Active Directory Users and Computers seperalely....... But you have to modify some lnels.......try it ...................... '******************************************************************** '* '* File: DomainUinfo.vbs '* Created: September 2005 '* Version: 2k510.03 '* '* ' Sample Script For Listing All The User Related Infomations In The Domain. '* '* Main Function: Listing All The User Related Infomations In The Domain. '* '* Syntax Domain Name '* '* Copyright (C) 2005 N Nattiala '* '******************************************************************** ' Description - This portion of the script will attach to the domain using the ' WinNt provider and filter out a list of every computer object's ' name and write them to DomUinfo.txt. If the file already exists it will ' overwrite, otherwise it will create the file. '------------------------------------------------- ' Insert WARNING here... Msgbox " This script will collect all the Computers,Domain User and Group related information and"_ & vbcrlf & vbcrlf & " store in DOMUINFO.TXT. Please input your Domain name according to your environment" _ & vbcrlf & vbcrlf & " Created and Completed By: N Nattiala. ",48,"WARNING" ' Check for the existence of DomUinfo.txt. ' and open for Writing. Dim myComputer, objUser, objGroup Dim myDomain Set fsoObject = WScript.CreateObject("Scripting.FileSystemObject") If (fsoObject.FileExists("DomUinfo.txt")) Then Set open_File = fsoObject.OpenTextFile("DomUinfo.txt", 2) Else Set open_File = fsoObject.OpenTextFile("DomUinfo.txt", 2, "True") End If ' Get Domain Name myDomain = Inputbox ("Please Enter Your Domain Name: "_ & vbcrlf & vbcrlf & " Take Care") msgbox" Your Domain Name is :" &mydomain _ & vbcrlf & vbcrlf &"This is the LAST STAGE TO STOP MY SCRIPT",vbYesNo,"Warning" ' Attach to the domain and search for all ' computer objects. Dump the names into ' DomUinfo.txt. Set myComputer = GetObject ( "WinNT://"& mydomain ) myComputer.Filter = Array("computer") For Each item in myComputer open_File.Writeline (item.Name) Next myComputer.Filter = Array("user") For Each objuser in myComputer open_File.Writeline (",User Name," & objUser.Name & " ,Full Name," & objuser.fullname & " ,Description," & objuser.description ) Next myComputer.Filter = Array("group") For Each objGroup In myComputer For Each objUser In objGroup.Members open_File.Writeline (",Group, " & objGroup.Name & ",Member, " & objUser.Name) Next Next ' Closes the file open_File.Close() Believe The Force....

Hi, I have tried many of this with GPO Auditing, and also on a shared folder in on the security tab but I didn't get the information like which file is created, or which file is copied etc... Besides the security log will in increase very fast and its headache... Security log will not give a correct information to point some users... for forensic!!!!! I have used this script to notify the actions but I need to log this information in a text file or invoke email some this like that …. Do any body now any third party tool? Or any body can help on this script Any changes or idea to meet the requirement will be appreciable ....

Hi, I would like to log the actions done by the users on a network share folder like, COPY, DELETE,MODIFY of files in it. Not to Monitor the Action But I need to Log this into a .txt file.

Hi, How can I list blank password (no password) users in my win2K3 domain. I am aware that I can enforce GPO,password policy to have one for everyone. But I wannna list the users who doesn't have one before applying GPO. Any Script or Tools will do....

Hi, How to reset windows Local GPO to default (gpedit.msc). I would like to reset windows Local Computer Policy( both computer configuration and User Configuration) to default by using a command or script. I mean not GPUPDATE But restore the local Policy of a XP box or remove all the policy applied to the XPbox. I have tried Seedit.exe like this secedit /configure /cfg %windir%\repair\secsetup.inf /db secsetup.sdb /verbose scesrv.log says all the policy back to default but most of them remain unchanged ,,,, any idea is there any other way to do this (cmd,vbs or exe ) I have gone through all these: How to reset security settings How To Reset Security Settings Back to the Defaults

Hi,,, How do I list all the users who logged (active users) on to my Server (or Domain), any command or utilities….. Not all Users but Who Logged on to (Active Users)… I am aware of NET USERS /DOMAIN and DSQUARY USER Both these command s lists all the users regardless of logged in or not.

Hi,,,, Sorry for late............ I totally understand all the steps You mentioned about .adm files and have done all these many times before I post the topic to the forum. But My Problem is How Can I specify our Exchange Server Name and The corresponding User Name (I mean %username%) in This OUTLK11.adm .or In the GPO| User Configuration| Administrative Tools |Microsoft Office Outlook2003|?????? (Under which option I can specify username and Exchange server name). Like If you Run Ms Office Custom Installation Wizard (.MST or .CMW) at 17/24 if you select Modify Profile ,18/24 You will get an option called Configure An Exchange Server connection , here you can Specify the username (%Username%) and Your Exchange Server name +++. Help me……… Please Your Deploying method and Group creation are good and it makes sense. And I like that logic.. I am Goooooooooooooooooooooooole@@@@@@@@@@@@@@....

Okay,,,, The First method ...........I didn't tried because we have almost 1000+ PC's and all have office 2003 installed and Ms outlook is configured for receiving mails form our exchange 2003 server and is working fine ( not all are configured for email). If I reload the GPO Software package by using a new transform file (like .MST or .CMW or .PRF) any problem? I didn't tried Because ..........Bosses For the New Branch I am using this Method.... :thumb up Secondly if you are talking about administrative templates outlk11.adm, then How do and where I configure that and put my information in it .How to edit this according to my needs … Any guide for this and how to apply on GPO. I remember a year before by using administrative templates for disabling the CD, Floppy and USB through GPO, in the night I loose my control (may be my ignorance)…….. Crazy man.. Plese help me.... I have gone through all these….. http://www.pcreview.co.uk/forums/thread-1860006.php http://www.windowsdevcenter.com/pub/a/wind...templates..html http://office.microsoft.com/en-us/assistan...1364241033.aspx

Hi, Is there any way to configure and setup Ms Outlook 2003 by using Group policy or by using batch file to edit registry. I just wane configure Ms Outlook 2003 to the client pc's either by GPO or by registry tweak. We have Exchange 20003 server.

Hi, Is there a product or any way or scrept to 1. Detect and send alert to the Computer which is plugged in the network with out informing the authority. 2. Send a warning message automatically and immediately to the PC and block the newly connected PC to access the network resources, when it is connected to the network. The warning message should look like a legal notice to inform the person to contact the system department for the permission to connect the PC to the network.

Hi, Maybe this will help you ( Search this topic :Silent installation of vbrun60sp6.exe) http://www.msfn.org/board/index.php?showtopic=34018&hl=