Question about Computers & Internet

4 Answers

I get the fallowing error message with my script below any thoughts or ideas? C:\Documents and Settings\karmstrong\Desktop\JDE Backup>cscript JDEBackup.vbs Microsoft (R) Windows Script Host Version 5.7 Copyright (C) Microsoft Corporation. All rights reserved. C:\Documents and Settings\karmstrong\Desktop\JDE Backup\JDEBackup.vbs(15, 1) Mic rosoft VBScript runtime error: Variable is undefined: 'objFSO' Option Explicit ForceScriptEngine("cscript") REM Dim wshArgs REM Set wshArgs = Wscript.Arguments REM If WshArgs.Count = 2 Then REM Call SyncFolders(WshArgs.Item(0), WshArgs.Item(1)) REM Else REM Wscript.Echo("Wrong number of arguments. Syntax: SyncFolders LocalDir ServerDir") REM Wscript.Sleep(3000) ' To allow Function syntax popup message to be seen. REM End If Set objFSO = CreateObject("Scripting.FileSystemObject") LocalDir = "%HOMEDRIVE%\E810\PD810\Export" ServerDir = "\\epcdhe.com\public\profiles\%USERNAME%\E810\PD810\Exports" If Not objFSO.FolderExists(LocalDir) Then objFSO.CreateFolder(LocalDir) End If If Not objFSO.FolderExists(ServerDir) Then objFSO.CreateFolder(ServerDir) End If Sub SyncFolders(strLocalDir, strServerDir) Dim objFileSys Dim objLocalDir Dim objServerDir Dim objFile1 Dim objFile2 Dim objSubFolder Dim arrFolders Dim i arrFolders = Array(strLocalDir, strServerDir) Set objFileSys = CreateObject("Scripting.FileSystemObject") For i = 0 To 1 If objFileSys.FolderExists(arrFolders(i)) = False Then wscript.echo("Creating folder " & arrFolders(i)) objFileSys.CreateFolder(arrFolders(i)) End If Next For i = 0 To 1 If i = 0 Then Set objLocalDir = objFileSys.GetFolder(strLocalDir) Set objServerDir = objFileSys.GetFolder(strServerDir) Else Set objLocalDir = objFileSys.GetFolder(strServerDir) Set objServerDir = objFileSys.GetFolder(strLocalDir) End If For Each objFile1 in objLocalDir.files If Not objFileSys.FileExists(objServerDir & "\" & objFile1.name) Then Wscript.Echo("Copying " & objLocalDir & "\" & objFile1.name & _ " to " & objServerDir & "\" & objFile1.name) objFileSys.CopyFile objLocalDir & "\" & objFile1.name, _ objServerDir & "\" & objFile1.name Else Set objFile2 = objFileSys.GetFile(objServerDir & "\" & objFile1.name) If objFile1.DateLastModified > objFile2.DateLastModified Then Wscript.Echo("Overwriting " & objServerDir & "\" & objFile1.name & _ " with " & objLocalDir & "\" & objFile1.name) objFileSys.CopyFile objLocalDir & "\" & objFile1.name, _ objServerDir & "\" & objFile1.name End If End If Next For Each objSubFolder in objLocalDir.subFolders Call SyncFolders(strLocalDir & "\" & objSubFolder.name, strServerDir & _ "\" & objSubFolder.name) Next Next Set objFileSys = Nothing End Sub Sub ForceScriptEngine(strScriptEng) ' Forces this script to be run under the desired scripting host. ' Valid arguments are "wscript" or "cscript". ' The command line arguments are passed on to the new call. Dim arrArgs Dim strArgs For Each arrArgs In WScript.Arguments strArgs = strArgs & " " & Chr(34) & arrArgs & Chr(34) Next If Lcase(Right(Wscript.FullName, 12)) = "\wscript.exe" Then If Instr(1, Wscript.FullName, strScriptEng, 1) = 0 Then CreateObject("Wscript.Shell").Run "cscript.exe //Nologo " & _ Chr(34) & Wscript.ScriptFullName & Chr(34) & strArgs Wscript.Quit End If Else If Instr(1, Wscript.FullName, strScriptEng, 1) = 0 Then CreateObject("Wscript.Shell").Run "wscript.exe " & Chr(34) & _ Wscript.ScriptFullName & Chr(34) & strArgs Wscript.Quit End If End If End Sub

Posted by on

  • kris_armstro May 26, 2010

    This is a VBSscript that will eventually be used as a login script. Currently I am just running it from an XP box to test its functionality.

    The goal is to keep the two folders in sync via a login script

  • kris_armstro May 26, 2010

    Ok I have this working. Except one smal peace. I would like to check if the localDir and ServerDir exists. If they do continue processing. If not Create the folders. Here is the updated script.

    REM JDEBackup Script
    REM Author: Kris Armstrong
    REM Date: May 2010

    Option Explicit

    ForceScriptEngine("cscript")

    Dim LocalDir
    Dim ServerDir
    Dim LocalDisk
    Dim oShell
    Dim strUserName
    Dim strHomeDrive
    Dim objNetwork

    REM Set objNetwork = WScript.CreateObject("WScript.Network")
    REM strUserName = objNetwork.UserName

    Set oShell = CreateObject("WScript.Shell")
    strUserName = oShell.ExpandEnvironmentStrings("%USERNAME%")
    strHomeDrive = oShell.ExpandEnvironmentStrings("%HOMEDRIVE%")

    LocalDir = strHomeDrive&"\E810\PD810\Export"
    ServerDir = "\\epcdhe.com\public\profiles\"&(strUserName)&"\E810\PD810\Export"

    Call SyncFolders(LocalDir, ServerDir)

    Sub SyncFolders(strLocalDir, strServerDir)
    Dim objFileSys
    Dim objLocalDir
    Dim objServerDir
    Dim objFile1
    Dim objFile2
    Dim objSubFolder
    Dim arrFolders
    Dim i

    arrFolders = Array(strLocalDir, strServerDir)
    Set objFileSys = CreateObject("Scripting.FileSystemObject")
    For i = 0 To 1
    If objFileSys.FolderExists(arrFolders(i)) = False Then
    wscript.echo("Creating folder " & arrFolders(i))
    objFileSys.CreateFolder(arrFolders(i))
    End If
    Next
    For i = 0 To 1
    If i = 0 Then
    Set objLocalDir = objFileSys.GetFolder(strLocalDir)
    Set objServerDir = objFileSys.GetFolder(strServerDir)
    Else
    Set objLocalDir = objFileSys.GetFolder(strServerDir)
    Set objServerDir = objFileSys.GetFolder(strLocalDir)
    End If
    For Each objFile1 in objLocalDir.files
    If Not objFileSys.FileExists(objServerDir & "\" & objFile1.name) Then
    Wscript.Echo("Copying " & objLocalDir & "\" & objFile1.name & _
    " to " & objServerDir & "\" & objFile1.name)
    objFileSys.CopyFile objLocalDir & "\" & objFile1.name, _
    objServerDir & "\" & objFile1.name
    Else
    Set objFile2 = objFileSys.GetFile(objServerDir & "\" & objFile1.name)
    If objFile1.DateLastModified > objFile2.DateLastModified Then
    Wscript.Echo("Overwriting " & objServerDir & "\" & objFile1.name & _
    " with " & objLocalDir & "\" & objFile1.name)
    objFileSys.CopyFile objLocalDir & "\" & objFile1.name, _
    objServerDir & "\" & objFile1.name
    End If
    End If
    Next
    For Each objSubFolder in objLocalDir.subFolders
    Call SyncFolders(strLocalDir & "\" & objSubFolder.name, strServerDir & _
    "\" & objSubFolder.name)
    Next
    Next
    Set objFileSys = Nothing
    End Sub

    Sub ForceScriptEngine(strScriptEng)
    ' Forces this script to be run under the desired scripting host.
    ' Valid arguments are "wscript" or "cscript".
    ' The command line arguments are passed on to the new call.
    Dim arrArgs
    Dim strArgs
    For Each arrArgs In WScript.Arguments
    strArgs = strArgs & " " & Chr(34) & arrArgs & Chr(34)
    Next
    If Lcase(Right(Wscript.FullName, 12)) = "\wscript.exe" Then
    If Instr(1, Wscript.FullName, strScriptEng, 1) = 0 Then
    CreateObject("Wscript.Shell").Run "cscript.exe //Nologo " & _
    Chr(34) & Wscript.ScriptFullName & Chr(34) & strArgs
    Wscript.Quit
    End If
    Else
    If Instr(1, Wscript.FullName, strScriptEng, 1) = 0 Then
    CreateObject("Wscript.Shell").Run "wscript.exe " & Chr(34) & _
    Wscript.ScriptFullName & Chr(34) & strArgs
    Wscript.Quit
    End If
    End If
    End Sub

×

Ad

4 Answers

  • Level 3:

    An expert who has achieved level 3 by getting 1000 points

    Superstar:

    An expert that got 20 achievements.

    All-Star:

    An expert that got 10 achievements.

    MVP:

    An expert that got 5 achievements.

  • Master
  • 4,737 Answers

This problem is caused when a Site Server Web is mapped to a Membership Server, the HTML Administrator pages run in the context of the proxy account for the Membership instance. Normally, this account will be MemProxyUserX (where X is a number). The user logged on to the Administrator pages at this point is likely to be the Site Server Administrator. In this case, the Administrator's privileges are dynamically added to the MemProxyUserX account. Unfortunately, the Site Server Administrator does not have the necessary privileges to call BeginTransaction method of the "SiteServer.ContentIndex.1" object.
To solve this problem, follow the instructions below:
1. Add the Site Server Administrator to the Windows NT Server Administrator group and verify that Anonymous and Automatic Cookie Authentication are not enabled on the SiteServer\Admin virtual Directory. To do this, perform the following steps:
2. Open the properties for the Site Server Administrator (in the members container) in the MMC. Be sure to log on to the MMC with the Administrator account.
3. Click the Groups tab, and then click Add.
4. In the Show names from drop-down list, select ou=NTGroups.
5. On the Available item tab, you will find the Administrator group (not Site Server Administrator).
6. Add the Site Server Administrator to the Windows NT Administrator group.
7. Expand the virtual directories for the Web Site where the Web Based Administration is being performed.
8. Expand the Site Server virtual directory.
9. Open the properties for the Admin directory.
10. On the Membership Authentication tab, make sure that the Anonymous Authentication check box is clear, and that you do not use Automatic Cookie Authentication.

Good luck.

Posted on May 26, 2010

Ad
  • Level 3:

    An expert who has achieved level 3 by getting 1000 points

    Superstar:

    An expert that got 20 achievements.

    All-Star:

    An expert that got 10 achievements.

    MVP:

    An expert that got 5 achievements.

  • Master
  • 1,472 Answers

Kris_armstro

In most cases if you are having trouble with JAVA then you need to uninstall all versions of JAVA and then reinstall the ones that you need on your computer in order. In most cases this will fix most JAVA problems.

Let me know if you have any more problems or questions

Issken
http://www.fixya.com/users/issken

Posted on May 26, 2010

Ad
  • Level 3:

    An expert who has achieved level 3 by getting 1000 points

    Superstar:

    An expert that got 20 achievements.

    All-Star:

    An expert that got 10 achievements.

    MVP:

    An expert that got 5 achievements.

  • Master
  • 2,427 Answers

Well my guess is since that's a vbs script and a lot of malware use vbs scripts as a matter of codeing.. I am thinking that is infected.. Replace the script with backup or one from anoter pc.. Or if the scrript is an application reinstall the app or download it from the internet and replace the script file.. Ps u can debug it using visual basic ..

Posted on May 26, 2010

  • Level 3:

    An expert who has achieved level 3 by getting 1000 points

    All-Star:

    An expert that got 10 achievements.

    MVP:

    An expert that got 5 achievements.

    Vice President:

    An expert whose answer got voted for 100 times.

  • Master
  • 590 Answers

Hi kris,
I don't think that these errors are from operating system but from the scripts which you are using.

It seems that your script is have some errors as not written properly. It is hard to find out the error location by just seeing to it. So please debug the code and resolve the bugs with the help of person who wrote the scripts actually.

Thanks

Posted on May 26, 2010

1 Suggested Answer

6ya6ya
  • 2 Answers

SOURCE: I have freestanding Series 8 dishwasher. Lately during the filling cycle water hammer is occurring. How can this be resolved

Hi,
a 6ya expert can help you resolve that issue over the phone in a minute or two.
Best thing about this new service is that you are never placed on hold and get to talk to real repairmen in the US.
the service is completely free and covers almost anything you can think of.(from cars to computers, handyman, and even drones)
click here to download the app (for users in the US for now) and get all the help you need.
Goodluck!

Posted on Jan 02, 2017

Add Your Answer

Uploading: 0%

my-video-file.mp4

Complete. Click "Add" to insert your video. Add

×

Loading...
Loading...

Related Questions:

1 Answer

"Script Error" on my FB page. Pleeeeeeese Help!


Script error is in the browser, have you tried install another browser (Google Chrome or Firefox)?

If you are using Internet Explorer, go to Settings -> Internet Options -> Advanced. Press on Restore advanced settings and also Restore.

Mar 13, 2015 | Computers & Internet

1 Answer

I have loaded microsoft office 2007 and it has accepted the product key. When I try to use the email it asks for the product key again but this time does not recognise it. I dont know why please help


Here is what I found to work. Key in your Product key again and activate it. Close Office without doing anything else..

Open a command prompt / Run as Administrator. Key in one of the scripts below (x86 for 32 bit computers and x64 for 64bit).

x86
c:\>cscript "C:\Program Files\Microsoft Office\Office14\ospp.vbs" /act

x64
c:\>cscript "C:\Program Files (x86)\Microsoft Office\Office14\ospp.vbs" /act

Key this in and press enter.
c:\>reg add HKEY_LOCAL_MACHINE\software\microsoft\officesoftwareprotectionplatform /v USEROPERATIONS /t REG_DWORD /d 1 /f

Now open Office Check if it is activated.

Feb 25, 2015 | Microsoft Office Home and Student 2007...

1 Answer

When I start magic desktop I get an error that says cannot run scripts on this page How can I fix this?


go into internet options from the control panel, click on advanced tab and reset browser settings.

May 20, 2014 | HP Computers & Internet

2 Answers

My desktop (windows XP) is telling me almost every startup that its using too much virtual memory. Why is this happening and can I stop it? Also i'm getting the message " a script seems to be running...


Most likely cause would be a rogue startup program that starts an instance of Internet Explorer (or some other browser). If you can get to the desktop then use a utility called autoruns from Microsoft (http://technet.microsoft.com/en-us/sysinternals/bb963902.aspx) and disable any suspicious looking startup programs.

Jan 06, 2014 | Computers & Internet

2 Answers

Keep getting a box popping up talking about script errors. how do we stop that?


If you use Internet Explorer as your Web browser, chances are you have experienced, or will experience, popup script errors. Typically, a dialog box may appear stating "A Runtime Error has occurred. Do you wish to Debug?" or "Internet Explorer Script Error. An error has occurred in the script on line 1. Do you wish to continue running scripts on this page?" These errors can be distracting and interfere with your Web browsing experience. If you would like to stop receiving these error messages, you must modify your IE settings.

Open IE, select "Tools" and ten choose "Internet Options." The Internet Options dialog box will open. Click on the "Advanced" tab, scroll to the "Browsing" section and then select the "Disable Script Debugging" box.

Clear the "Display a notification about every script error" box under the same section if it has been selected. Click "Apply" and then choose "OK" to modify your IE settings. You will receive no more IE script error notifications. Hope this helps.

Jan 01, 2013 | Microsoft Internet Explorer 8

1 Answer

Yahoo messenger message windows shows blank message when i send to other or other send to me....


You may not have Internet Explorer as your default browser but it is coded with Yahoo Messenger
For this reason you must keep it up to date and the support software as well. You do not have to set it as default but you need to keep it clean.
Flashplayer FOR IE
Sun Java runtime
Check out the Yahoo Messenger Scripting Help page
http://help.yahoo.com/kb/index?page=answ... Browse the section for your problem and your OS and click on the link
note. There are 2 pages of links - click 'next' at the bottom of the first selection to view the second page


To enable scripting:Internet Explorer8

Click "Tools"
Click "Internet Options."
Click "Security" tab.
Click "Custom Level" button.
Scroll down to "Script ActiveX.controls marked safe for scripting"- enable
Scroll down to "Scripting - Active scripting" - enable
Scroll down to "Scripting of Java applets" - enable
Click OK
Click OK
Restart IE

Finally make sure you clean your browsers on a regular basis
Download 'ccleaner' and use it daily. Run it through a couple of times,using the factory settings and the 'Analyze' control to view the files offered for deletion - Use the 'Run Cleaner control to delete them.
Run the 'Registry' from the left hand toolbar but 'Save' any changes after opting to 'repair' errors.Never make changes to your Registry without saving the information.




Click Start menu, Click Run, type "sfc /scannow" without quotes. Provide the windows cd when prompted. Restart the PC. The issues are becoz of corrupted windows files.




3.


Follow the below commonds
open internet explorer
select tool menu
->internet option
-> select security tab
-> select internet(global icon)
->click on Custom Level button.
-> choose scritping
-> enble all script type

Dec 24, 2010 | Yahoo Messenger

3 Answers

How to fix and stop internet exptorer script error messagers?


Which version of Internet Explorer?
Upgrade to IE7 or IE8, via 'http://windowsupdate.microsoft.com'.

Aug 20, 2010 | Microsoft Windows XP Home Edition

2 Answers

Internet Explorer Script error


You may have scripting disabled in your Internet Explorer.
To enable scripting:

Click "Tools"
Click "Internet Options."
Click "Security" tab.
Click "Custom Level" button.
Scroll down to "Script ActiveX.controls marked safe for scripting"- enable
Scroll down to "Scripting - Active scripting" - enable
Scroll down to "Scripting of Java applets" - enable
Click OK
Click OK
Restart IE

Still not working ? Update software

use the links on this page to help update software.

http://help.yahoo.com/l/us/yahoo/messenger/messenger10/notices/mstabuguqscripterror.html

After updating check you do not have old versions of Flashplayer, Shockwaveplayer and Java running alongside the latest - this can cause conflicts
Start / control panel / programs
delete any old versions

Dec 07, 2009 | Yahoo Messenger

1 Answer

Help


Due to No memory in the handset ......
or settings not set
Goto Menu--> select Messages icon--> Select menu button--> options--> General options--> Scroll down to the bottom--> Keep messages--> Change it to number of days you want the messages to be in your handset ...

If not happening Install Blackberry desktop Manager ...Take Backup..
Reinstall the Software ...

Aug 12, 2009 | RIM BlackBerry Curve 8310 Smartphone

1 Answer

Ymsgr Chat Rooms


Go to start-->>control panel-->>internet option go to advance tab uncheck these entries. disable script debugging(internet explorer) disable script debugging(other)

restart the computer

Nov 10, 2008 | Yahoo Messenger

Not finding what you are looking for?
Computers & Internet Logo

Related Topics:

187 people viewed this question

Ask a Question

Usually answered in minutes!

Top Computers & Internet Experts

Doctor PC
Doctor PC

Level 3 Expert

7733 Answers

kakima

Level 3 Expert

102366 Answers

David Payne
David Payne

Level 3 Expert

14161 Answers

Are you a Computer and Internet Expert? Answer questions, earn points and help others

Answer questions

Manuals & User Guides

Loading...