<div>
p.s place psexec in your system32 folder 

</div>

<div>
so what you are telling me is that this will be my line of code 
C:\WINDOWS\system32\cmd.exe /k for /f %%a in (c:\computers.txt) do ( psexec \\%%a regedit /s \\server\share\your.reg) 
and make it a .bat file...i just want to make sure...because what i was using was .bat to modify the key not import..it...and it will read the computers from the line..
</div>

<div>
yes 
 
C:\WINDOWS\system32\cmd.exe /k for /f %%a in (c:\computers.txt) do ( psexec \\%%a regedit /s \\server\share\your.reg) 
 
 
will be the only line in your .bat file. &nbsp;It will read the list of computers from c:\computers(you configure this) and then it will import/modify the registry on each computer in the list 

</div>

<div>
But what if it does not read the list of computers oh one more question 
 
i have to stop and start the service 
net stop &quot;wintdow time&quot; 
code 
net start..&quot;windows time 
 
is that thte right format.
</div>

<div>
 what do you mean, &quot;what if it does not read the list of computers&quot;??? 
 
 
Is there a reason you dont want to use group policy to configure ntp settings as i mentioned in your other thread <a href="https://www.experts-exchange.com/OS/Microsoft_Operating_Systems/Windows/XP/Q_23766675.html" rel="ugc nofollow">https://www.experts-exchange.com/OS/Microsoft_Operating_Systems/Windows/XP/Q_23766675.html</a>&nbsp; ??? 
 
 

</div>

<div>
Are you configuring an &quot;Authoritative Time Server&quot;?? 

</div>

<div>
we have the police in place, but what is happening is that is adding an extra string to the time widow.com 1x0 
 
so when you do a query it looks like this ..(servername,time.windows.cox 1x0) so we are gettig alot of w32 time errors 
 

</div>

<div>
I would go over your settings on the pdc and group policy 
 
 
 
<a href="http://www.windowsnetworking.com/articles_tutorials/Configuring-Windows-Time-Service.html" rel="ugc">http://www.windowsnetworking.com/articles_tutorials/Configuring-Windows-Time-Service.html</a> 
 
 &nbsp; &nbsp;HKLM\SYSTEM\CurrentControlSet\Services\W32Time\Parameters\NtpServerThis registry entry specifies a space-delimited list of stratum 1 time servers from which the local computer can obtain reliable time stamps. The list may consist of one or more DNS names or IP addresses (if DNS names are used then you must append ,0x1 to the end of each DNS name). For example, to synchronize the PDC Emulator in your forest root domain with tock.usno.navy.mil, an open-access SNTP time server run by the United States Naval Observatory, change the value of the NtpServer registry entry from time.windows.com,0x1 to tock.usno.navy.mil,0x1 here. Alternatively, you can specify the IP address of this time server, which is 192.5.41.209 instead. 
 

</div>

<div>
PS i ran the code you told me as bat and it said 
C:\WINDOWS\system32\cmd.exe /k for /f %%a in (D:\Documents and Settings\erwin.miranda\Desktop\Registry_Update\COMPUTER_LIST.txt) do ( psexec \\%%a regedit /s \\D:\Documents and Settings\erwin.miranda\Desktop\Registry_Update\Test.reg) 

</div>

<div>
I m sorry this is what it said &quot;The system cannot find the file and.&quot;
</div>

<div>
Place both the &quot;Test.reg&quot; and the &quot;COMPUTER_LIST.txt&quot; in a folder that doesnt have spaces in the path. &nbsp; Like c:\test 

</div>

<div>
PsExec could not start regedit: 
Logon failure: unknown user name or bad password.
</div>

<div>
Did you try running it as domain admin ? 
 
you can also try EZ-execute &nbsp; <a href="http://www.penguinbyte.com/software/ezexecute/" rel="ugc">http://www.penguinbyte.com/software/ezexecute/</a> 
 
<a href="https://filedb.experts-exchange.com/incoming/2009/03_w10/111789/ez-execute-large.jpg" target="_blank" class="file-inline" title="ez-execute (43 KB)"><svg xmlns="http://www.w3.org/2000/svg" viewBox="0 0 512 512"><path d="M67.508 468.467c-58.005-58.013-58.016-151.92 0-209.943l225.011-225.04c44.643-44.645 117.279-44.645 161.92 0 44.743 44.749 44.753 117.186 0 161.944l-189.465 189.49c-31.41 31.413-82.518 31.412-113.926.001-31.479-31.482-31.49-82.453 0-113.944L311.51 110.491c4.687-4.687 12.286-4.687 16.972 0l16.967 16.971c4.685 4.686 4.685 12.283 0 16.969L184.983 304.917c-12.724 12.724-12.73 33.328 0 46.058 12.696 12.697 33.356 12.699 46.054-.001l189.465-189.489c25.987-25.989 25.994-68.06.001-94.056-25.931-25.934-68.119-25.932-94.049 0l-225.01 225.039c-39.249 39.252-39.258 102.795-.001 142.057 39.285 39.29 102.885 39.287 142.162-.028A739446.174 739446.174 0 0 1 439.497 238.49c4.686-4.687 12.282-4.684 16.969.004l16.967 16.971c4.685 4.686 4.689 12.279.004 16.965a755654.128 755654.128 0 0 0-195.881 195.996c-58.034 58.092-152.004 58.093-210.048.041z"/></svg>ez-execute-large.jpg</a>
</div>

ez-execute-large.jpg

<div>
I did and it does not work...i put this tool in C:\ProgramFiles\SysInterna.
</div>

<div>
psexec.exe needs to be in the system32 folder(its a command line tool) 
 
EZ-execute makes it easier to figure out the switches and for you to add admin and password, and also makes it easier to select the machines you want to deploy to. 
 
 
what is the error that you are getting now? 

</div>

<div>
The specified network name is no longer available..
</div>

<div>
Maybe I am the biggest dummy in the world, i just want to edit the registry to multiple machines and apparently i can do it with all your guys help i still can. &nbsp;I found this batch in our continuity &nbsp;file but like i said , i would like to implemented to a list of computer names... 
 

<pre><code class="code-10 nolinks" id="code-263578">@echo off
setlocal
if {%1}=={} goto syntax
:loop
if {%1}=={} goto finish
set remote=&quot;\\%1\HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server&quot;
shift
reg.exe ADD %remote% /v fDenyTSConnections /t REG_DWORD /d 0 /f&gt;nul 2&gt;&amp;1
if NOT %ERRORLEVEL% EQU 0 @echo %remote% NOT found.
goto loop
:syntax
@echo Syntax: RemoteDesktop Computer1 [Computer2 .... ComputerN]
goto loop
:finish
endlocal
</code></pre>
</div>

<div>
If this is the above script you need EXACTLY HOW IT IS SETUP........... Or any other script you want to deploy, just change the name in the psexec line at the end......... 
 
Save the script above as NTP.Bat, and place it in a folder called PSTools, off the C Drive. 
 
Save the list of names to c:\PSTools\PCNames.txt 
 
Go to your command shell.... 
Go to the PSTools folder... 
psexec @c:\PSTools\PCNames.txt -d -c ntp.bat 
 
Make sure you launch this, loogged in as a Domain Admin, or an equivalnet user with local admin rights to EACH machine..... 
 
I see you have a few different questions open on the same subject, I was waiting for a response in the other one.....
</div>

<div>
Youre just trying to enable remote desktop on these PC's? 
 
The batch file needs 2 lines of code..... 
 
reg ADD &quot;HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server&quot; /v fDenyTSConnections /t REG_DWORD /d 0 
exit 
 
Also 
&quot;I see you have a few different questions open on the same subject&quot; 
 
Disregards, looks like similar, but not the same....
</div>

<div>
Heck, even this would work, without the batch file...... 
 
psexec @c:\PSTools\PCNames.txt -d reg ADD &quot;HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server&quot; /v fDenyTSConnections /t REG_DWORD /d 0 

</div>

<div>
Should see them zoom by with Exit Code &quot;0&quot;
</div>

<div>
How did this go from a w32 time issue to a terminal server issue??? 

</div>

<div>
3 different questions, similar......Thought the same thing....
</div>

<div>
ok how would i edit reg key to read the name ntp
</div>

<div>
Are we talking ab out NTP, or Enabling RDP? Your last script referred to enabling RDP.....????....????
</div>

<div>
NTP and then i would like for the script that i just show to read a list of machines and change the ntp server
</div>

<div>
You need to concentrate on a single question..... you have multiple questions, which is first of all, is not good, and I think you are confusing the people trying to help you..... I know I am..... 
 
I have already provided a good solution on your other thread, for setting the NTP server..... 
 
Are you aware that the script you posted at Question 23770389 is for enabling Remote Desktop? 
 
I provided a solution for that one as well.... Is that not needed?? There are alot of people helping you in all three threads here, please just concentrate on one.... 
 
Where do you stand RIGHT NOW with your issue? What works and what doesnt work? 
 

</div>

<div>
&quot;ok how would i edit reg key to read the name ntp&quot; 
 
OK.... 
 
To answer this one...... 
 
 

<pre><code class="code-1 nolinks" id="code-263712">psexec @c:\PSTools\PCNames.txt -d reg query &quot;HKLM\SYSTEM\CurrentControlSet\Services\W32Time\Parameters&quot; /v NTPServer
</code></pre>
</div>

<div>
but what if dont want to use psexec I want to be able to call in a vbs , also i dont think i have psexec due to the fact that is in .mil domain..anyways is there a code to basically change the regkey to a bunch of machines from a .txt and then start and stop a service... 
 
bit of a problme i would like to do this from a workstation...i have domain admin rights on my logon..
</div>

<div>
Or a batch file method, same as above...... 
 
Put the following in a batch file..... 
 
Name it NTPQuery.bat 
 
Create a txt file on a share accessible from each pc, for logging.....Call it NTPQuery.txt 
 
Results will look similar to this...... 
 
 
V2500 
System queried on Mon 03/02/2009 at &nbsp;0:32:59.19 
&nbsp; &nbsp; NTPServer &nbsp; &nbsp;REG_SZ &nbsp; &nbsp;time.windows.com,0x9 
&nbsp; 
V2500 
System queried on Mon 03/02/2009 at &nbsp;0:32:59.72 
&nbsp; &nbsp; NTPServer &nbsp; &nbsp;REG_SZ &nbsp; &nbsp;time.windows.com,0x9 
&nbsp; 
V2500 
System queried on Mon 03/02/2009 at &nbsp;0:33:00.25 
&nbsp; &nbsp; NTPServer &nbsp; &nbsp;REG_SZ &nbsp; &nbsp;time.windows.com,0x9 
&nbsp; 
V2500 
System queried on Mon 03/02/2009 at &nbsp;0:33:00.70 
&nbsp; &nbsp; NTPServer &nbsp; &nbsp;REG_SZ &nbsp; &nbsp;time.windows.com,0x9 
&nbsp; 
V2500 
System queried on Mon 03/02/2009 at &nbsp;0:33:01.14 
&nbsp; &nbsp; NTPServer &nbsp; &nbsp;REG_SZ &nbsp; &nbsp;time.windows.com,0x9 
&nbsp; 

<pre><code class="code-1 nolinks" id="code-263717">;The batch file needs 4 lines of code.....
 
echo %Computername% &gt;&gt;&quot;\server\share\NTPQuery.txt&quot;
echo System queried on %date% at %time% &gt;&gt;&quot;\\server\share\NTPQuery.txt&quot;
reg query &quot;HKLM\SYSTEM\CurrentControlSet\Services\W32Time\Parameters&quot; /v NTPServer | find /i &quot;ntpserver&quot; &gt;&gt;&quot;\\server\share\NTPQuery.txt&quot;
echo. &gt;&gt;&quot;\\server\share\NTPQuery.txt&quot;
exit
</code></pre>
</div>

<div>
but how about changing the ntp server to &nbsp;rty-0-90 within the same batchfile
</div>

<div>
Do you want to query it or modify it? 
 
.......
</div>

<div>
query it and modify at the same time if possible &nbsp;from the bottom of my heart thank you 
 
i have been up for almost 23hours in I***q and i cant figure it out
</div>

<div>
Do you wanna query it and modify it based on the results? 
 

</div>

<div>
I will pay you from now on...you will be my personal teacher..if you would not mind...we never get to play like this in states but ..because it is all contracted out..so the contractors get more of the experience...i was just push into this job, i have never had this type of request...or this type of training..and we have books, but book can explain not like looking at the code.... 
 
thank you from the bottom of my heart and soul...
</div>

<div>
I dont mind helping, none of us do.... I think we need to start from the basics though, and allow more people to follow where we are RIGHT NOW. 
 
You want to get a script to detect a specific value, and if it detects it, writes it with a different one? 
 
Do me a favor and list the following out.... 
 
NTPServer value you want to find. 
If you find the value you are looking for, You want to change it to BLAH? 
What value do you want to skip if it finds it? Assuming same as ~~~^ 
 
I think VBS might be the way to go with this, especially if you cant use psexec.... 
 
Unless you are using logon scripts.... You can put the code in there..... 

</div>

<div>
we will use it in login script..but, what i would like to find out is, how do we implement a batch file to &nbsp;login.vbs script...i think i have the key to be able to modify the regkey, but i can have this script running all the time can i 
 
NTP values is ru-09-bs 
if value found, then change it to Hokey 
if hokey found then exit out...of the program 
 
 
i would also like to stop and start a service so the change is made instantly 
 
i have the list of the machines that i want to change..we have legacy software that we cant modify, but through the GPO we will be able to control future machines on the network
</div>

<div>
strCommand = &quot;&quot;&quot;D:\Documents and Settings\erwin.miranda\Desktop\Import_Reg\test1.reg /s&quot;&quot;&quot; 
set objWshShell = WScript.CreateObject(&quot;WScript.Shell&quot;) 
intRC = objWshShell.Run(&quot;&quot;&quot;strCommand&quot;&quot;&quot;, 0, TRUE) 
if intRC &lt;&gt;&nbsp;0 then 
&nbsp; &nbsp;WScript.Echo &quot;Error returned from importing registry: &quot;&nbsp;&amp; intRC 
Else 
&nbsp; &nbsp;WScript.Echo &quot;No errors returned from importing the registry file&quot; 
end if 
 
I put quataions on the code now..but its given &nbsp;line 3 char 
the system cannot find the files specified 

</div>

<div>
change 
 
strCommand = &quot;&quot;&quot;D:\Documents and Settings\erwin.miranda\Desktop\Import_Reg\test1.reg /s&quot;&quot;&quot; 
 
to 
 
strCommand = &quot;&quot;&quot;D:\Documents and Settings\erwin.miranda\Desktop\Import_Reg\test1.reg&quot;&quot;&quot; /s 

</div>

<div>
We don't have to use .reg files if we're able to make the WMI connection the remote machine. &nbsp; 
Here's a section of code from the other thread related to this question: 
*see it for the portion on pulling from a list of machines* 
(<a href="https://www.experts-exchange.com/questions/24192049/VBS-SCRIPT-SERIOUS-HELP.html" rel="ugc">https://www.experts-exchange.com/questions/24192049/VBS-SCRIPT-SERIOUS-HELP.html</a>) 
 
 
Set oReg=GetObject(&quot;winmgmts:{impersonationLevel=impersonate}!\\&quot; &amp;&nbsp;strComputer &amp;&nbsp;&quot;\root\default:StdRegProv&quot;) &nbsp; &nbsp; &nbsp;'##This makes oReg our connection to the remote machine's registry 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; If Err.number &lt;&gt;&nbsp;0 Then &nbsp; &nbsp; &nbsp;'##Anything other than 0 means we've got an error. 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; ologFile.WriteLine strComputer &amp;&nbsp;&quot; [ WMI connection failed. - &quot;&nbsp;&amp; err.number &amp;&nbsp;&quot; ]&quot; 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Else 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; '##Create or edit the values 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; strRegPath = &quot;SYSTEM\CurrentControlSet\Services\W32Time\Parameters\&quot; 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; oReg.SetStringValue HKLM, strRegPath, &quot;ServiceMain&quot;, &quot;SvchostEntry_W32Time&quot; 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; oReg.SetExpandedStringValue HKLM, strRegPath, &quot;ServiceDll&quot;, &quot;C:\WINDOWS\System32\w32time.dll&quot; 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; oReg.SetStringValue HKLM, strRegPath, &quot;NtpServer&quot;, &quot;time.windows.com,0x1&quot; 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; oReg.SetStringValue HKLM, strRegPath, &quot;Type&quot;, &quot;NT5DS&quot; 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; If intRC &lt;&gt;&nbsp;0 then 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; ologFile.WriteLine strComputer &amp;&nbsp;&quot; [ failed - Unable to set Key Value. - &quot;&nbsp;&amp; strValueName &amp;&nbsp;&quot; - &quot;&nbsp;&amp; intRC &amp;&nbsp;&quot; ]&quot; 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Else 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; ologFile.WriteLine strComputer &amp;&nbsp;&quot; [ Success ]&quot; 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; End If 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Set oReg = Nothing 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; End If 
 
 
 
If you want to use .reg files - let me know and we can take it in that direction.
</div>

<div>
Okay sure...I would like to have that one too..because we will be testing this .reg file we are to import so please...
</div>

<div>
Listen man iam getting an error saying : Object required 'fso'
</div>

<div>
HELLO I need Help 
 
I placed this code at the end of my vbs and it keeps giving me the error 
Microsoft runtime error: Object required 'fso' 
 
i have gone line by line with this code and it works on one network but not on the other... 
 
Please I nee help bad with this one... 

<pre><code class="code-10 nolinks" id="code-265620">Const ForReading = 1, TemporaryFolder = 2
 Reachable = false
 Set tfolder = fso.GetSpecialFolder(TemporaryFolder)
 tname = fso.GetTempName
 TempFile = tfolder &amp; tname
 strCMD = &quot;cmd /c ping -n 1 -w 20 &quot; &amp; HostName &amp; &quot;&gt;&quot; &amp; TempFile
 wshShell.run strCMD,0,true
 Set results = fso.GetFile(TempFile)
 Set ts = results.OpenAsTextStream(ForReading)
 Do While ts.AtEndOfStream &lt;&gt; True
 retString = ts.ReadLine
 If instr(retString, &quot;Reply&quot;) &gt; 0 Then
 colon = instr(1,retstring,&quot;:&quot;,vbTextCompare)
 ipAddress = mid(retstring, 12, colon -12)
 Reachable = true
 Exit Do
 End If
 Loop
 ts.Close
 results.delete
 
 Set ts = Nothing
 Set results = Nothing
 Set tfolder = Nothing
 Set fso = Nothing
 Set wshShell = Nothing
End Function
</code></pre>
</div>

<div>
Did you get the answer you needed? 
</div>

<div>
No cause im stuck, i cant get rid of this error..its on line 3 
on the code is online 51 

<pre><code class="code-10 nolinks" id="code-265631">Const HKLM = &amp;H80000002 
 
ipFile = &quot;D:\Documents and Settings\erwin.miranda\Desktop\Import_Reg\list.txt&quot; 
logFile = &quot;D:\Documents and Settings\erwin.miranda\Desktop\Import_Reg\log.txt&quot; 
 
Set wshShell = wscript.createobject(&quot;wscript.shell&quot;)
Set fso = CreateObject(&quot;Scripting.FileSystemObject&quot;)
err.Clear
Set oipFile = fso.opentextfile(ipFile, 1, false)
Set ologFile = fso.opentextfile(logFile, 8, True)
ologFile.WriteLine &quot;Process Started - &quot; &amp; Now
 
Do while oipFile.atEndOfStream &lt;&gt; True
 strComputer = oipfile.ReadLine 
 If Not Reachable(strComputer) Then 
 ologFile.WriteLine strComputer &amp; &quot; [ failed - ping failed ]&quot;
 Else
	err.Clear	
	Set oReg=GetObject(&quot;winmgmts:{impersonationLevel=impersonate}!\\&quot; &amp; strComputer &amp; &quot;\root\default:StdRegProv&quot;)
	 If Err.number &lt;&gt; 0 Then 
			ologFile.WriteLine strComputer &amp; &quot; [ WMI connection failed. - &quot; &amp; err.number &amp; &quot; ]&quot;
 Else
	 strRegPath = &quot;SYSTEM\CurrentControlSet\Services\W32Time\Parameters\&quot;
		 oReg.SetStringValue HKLM, strRegPath, &quot;ServiceMain&quot;, &quot;SvchostEntry_W32Time&quot;
		 oReg.SetExpandedStringValue HKLM, strRegPath, &quot;ServiceDll&quot;, &quot;C:\WINDOWS\System32\w32time.dll&quot;
		 oReg.SetStringValue HKLM, strRegPath, &quot;NtpServer&quot;, &quot;time.windows.com,0x1&quot;
		 oReg.SetStringValue HKLM, strRegPath, &quot;Type&quot;, &quot;NT5DS&quot;
		 If intRC &lt;&gt; 0 Then
				ologFile.WriteLine strComputer &amp; &quot; [ failed - Unable to set Key Value. - &quot; &amp; strValueName &amp; &quot; - &quot; &amp; intRC &amp; &quot; ]&quot;
		 Else
				ologFile.WriteLine strComputer &amp; &quot; [ Success ]&quot;
		 End If
		 Set oReg = Nothing
		End If
 End If
 err.clear
Loop
 
oipFile.close 
Set oipFile = Nothing
ologFile.WriteLine &quot;Process Complete.&quot;
ologFile.close
 
WScript.Echo &quot;Process Complete.&quot; 
 
 
 
Function Reachable(HostName)
 Const ForReading = 1, TemporaryFolder = 2
 Reachable = false
 Set tfolder = fso.GetSpecialFolder(TemporaryFolder)
 tname = fso.GetTempName
 TempFile = tfolder &amp; tname
 strCMD = &quot;cmd /c ping -n 1 -w 20 &quot; &amp; HostName &amp; &quot;&gt;&quot; &amp; TempFile
 wshShell.run strCMD,0,True
 Set results = fso.GetFile(TempFile)
 Set ts = results.OpenAsTextStream(ForReading)
 Do While ts.AtEndOfStream &lt;&gt; True
 retString = ts.ReadLine
 If instr(retString, &quot;Reply&quot;) &gt; 0 Then
 colon = instr(1,retstring,&quot;:&quot;,vbTextCompare)
 ipAddress = mid(retstring, 12, colon -12)
 Reachable = true
 Exit Do
 End If
 Loop
 
 ts.Close
 results.delete
 
 Set ts = Nothing
 Set results = Nothing
 Set tfolder = Nothing
 Set fso = Nothing
 Set wshShell = Nothing
End Function
</code></pre>
</div>

<div>
what 
hey how come i cant execute the code above, it gives me erro like say fso not set and things like that..can some one help me..the reason is that we have 2 networks, class. &nbsp;and unclass...if you get m drift
</div>

<div>
I was searching for a similar script and hence came across this... 
 
Add the following text after line 50 
Set fso = CreateObject(&quot;Scripting.FileSystemObject&quot;) 
 
and add the following line after line 54 
Set WSHShell = CreateObject(&quot;Wscript.Shell&quot;) 
 
Here is the complete script: 
 

<pre><code class="code-10 nolinks" id="code-363081">Const HKLM = &amp;H80000002 
 
ipFile = &quot;D:\Documents and Settings\erwin.miranda\Desktop\Import_Reg\list.txt&quot; 
logFile = &quot;D:\Documents and Settings\erwin.miranda\Desktop\Import_Reg\log.txt&quot; 
 
Set wshShell = WScript.createobject(&quot;wscript.shell&quot;)
Set fso = CreateObject(&quot;Scripting.FileSystemObject&quot;)
err.Clear
Set oipFile = fso.opentextfile(ipFile, 1, False)
Set ologFile = fso.opentextfile(logFile, 8, True)
ologFile.WriteLine &quot;Process Started - &quot; &amp; Now
 
Do While oipFile.atEndOfStream &lt;&gt; True
	strComputer = oipfile.ReadLine 
	If Not Reachable(strComputer) Then 
		ologFile.WriteLine strComputer &amp; &quot; [ failed - ping failed ]&quot;
	Else
		err.Clear	
		Set oReg = GetObject(&quot;winmgmts:{impersonationLevel=impersonate}!\\&quot; &amp; strComputer &amp; &quot;\root\default:StdRegProv&quot;)
		If Err.number &lt;&gt; 0 Then 
			ologFile.WriteLine strComputer &amp; &quot; [ WMI connection failed. - &quot; &amp; err.number &amp; &quot; ]&quot;
		Else
			strRegPath = &quot;SYSTEM\CurrentControlSet\Services\W32Time\Parameters\&quot;
			oReg.SetStringValue HKLM, strRegPath, &quot;ServiceMain&quot;, &quot;SvchostEntry_W32Time&quot;
			oReg.SetExpandedStringValue HKLM, strRegPath, &quot;ServiceDll&quot;, &quot;C:\WINDOWS\System32\w32time.dll&quot;
			oReg.SetStringValue HKLM, strRegPath, &quot;NtpServer&quot;, &quot;time.windows.com,0x1&quot;
			oReg.SetStringValue HKLM, strRegPath, &quot;Type&quot;, &quot;NT5DS&quot;
			If intRC &lt;&gt; 0 Then
				ologFile.WriteLine strComputer &amp; &quot; [ failed - Unable to set Key Value. - &quot; &amp; strValueName &amp; &quot; - &quot; &amp; intRC &amp; &quot; ]&quot;
			Else
				ologFile.WriteLine strComputer &amp; &quot; [ Success ]&quot;
			End If
			Set oReg = Nothing
		End If
	End If
	err.clear
Loop
 
oipFile.close 
Set oipFile = Nothing
ologFile.WriteLine &quot;Process Complete.&quot;
ologFile.close
 
WScript.Echo &quot;Process Complete.&quot; 
 
 
 
Function Reachable(HostName)
	Const ForReading = 1, TemporaryFolder = 2
	Reachable = False
	Set fso = CreateObject(&quot;Scripting.FileSystemObject&quot;)
	Set tfolder = fso.GetSpecialFolder(TemporaryFolder)
	tname = fso.GetTempName
	TempFile = tfolder &amp; tname
	strCMD = &quot;cmd /c ping -n 1 -w 20 &quot; &amp; HostName &amp; &quot;&gt;&quot; &amp; TempFile
	Set WSHShell = CreateObject(&quot;Wscript.Shell&quot;)
	WshShell.run strCMD, 0, True
	Set results = fso.GetFile(TempFile)
	Set ts = results.OpenAsTextStream(ForReading)
	Do While ts.AtEndOfStream &lt;&gt; True
		retString = ts.ReadLine
		If InStr(retString, &quot;Reply&quot;) &gt; 0 Then
			colon = InStr(1, retstring, &quot;:&quot;, vbTextCompare)
			ipAddress = Mid(retstring, 12, colon - 12)
			Reachable = True
			Exit Do
		End If
	Loop
	 
	ts.Close
	results.delete
	 
	Set ts = Nothing
	Set results = Nothing
	Set tfolder = Nothing
	Set fso = Nothing
	Set wshShell = Nothing
End Function
</code></pre>
</div>

<div>
<div class="content wysiwyg-content">
I would like to find a way or a solution to import a .reg file into the registry using either bat or vbs, here is the hard part i would like for either the bat or vbs to call the list from a source file (computername) any help would be apprecitate and i have allready tried the solution from cookin windows xp from &nbsp;oreilly
</div>
</div>

I would like to find a way or a solution to import a .reg file into the registry using either bat or vbs, here is the hard part i would like for either the bat or vbs to call the list from a source file (computername) any help would be apprecitate and i have allready tried the solution from cookin windows xp from  oreilly

inport a registry to a list of computers from a source file using vbs or bat

Kernel and system programming is the process of creating the software necessary for a computer or device to function and operate other programs. Some operating systems (such as Microsoft Windows) are proprietary, but others, such as the various Linux distributions, are open source.

System Programming

Operating systems perform basic tasks, such as recognizing input from the keyboard, sending output to the display screen, keeping track of files and directories on the disk, and controlling peripheral devices such as disk drives and printers. For large systems, the operating system makes sure that different programs and users running at the same time do not interfere with each other. The operating system is also responsible for security, ensuring that unauthorized users do not access the system. Operating systems provide a software platform on top of which other programs, called application programs, can run.

Operating Systems

The Microsoft Legacy Operating System topic includes legacy versions of Microsoft operating systems prior to Windows 2000: All versions of MS-DOS and other versions developed for specific manufacturers and Windows 3/3.1, Windows 95 and Windows 98, plus any other Windows-related versions, and Windows Mobile.