Rename files with script

TheMSsForum.com: The Microsoft Software Forum

The MSS Forum ‹ VBscripts
- Archive
  - Biz
  - MCSE
  - CRM
  - Drivers
  - Framework
  - ADO
  - ASP
  - Compact
  - Forms
  - Dotnet
  - C#
  - VB
  - FontpageGen
  - Excel
  - WorkSheet
  - Exchange
  - Setup
  - Fox
  - Fontpage
  - ASP
  - IIS
  - Entourage
  - Money
  - Messanger
  - PocketPC
  - Powerpoint
  - Project
  - Publisher
  - Excel
  - VB
  - Security
  - Portal
  - Services
  - SQLServerDev
  - SVCS
  - SQLServer
  - VB
  - VC
  - MFC
  - ExcelGen

- Previous
  - 1
    - Client-Side Include Code in WEB Page Javascript has the ability to reference HTML code using the external source file prefix .JS. I'd like to create a set of VBScript functions and subroutines and bundle them in an external file and include the external source file. Does VBScript have the capability to perform the task. If not, can I create VBScript routines in Javascript include .JS file. Any help would be greatly appreciated. Thanks and regards, Ian Renfrew Tag: Rename files with script Tag: 153939
  - 2
    - vbscript / Internet Explorer info Hi: I am looking for a document describing how to manipulate Internet Explorer objects. Right now I am facing the problem of adding options to a SELECT drop down box in an HTML page. I can find quite some JavaScript fragments, such as Code: document.forms[0].musicType.options[3] = new Option("Folk", "folk", false, false) for doing the above task, but I have problems finding VBscript examples. Thanks, Erwin ---------------------------------------------------------------- Erwin Kalvelagen GAMS Development Corp., http://www.gams.com erwin@gams.com, http://www.gams.com/~erwin ---------------------------------------------------------------- Tag: Rename files with script Tag: 153922
  - 3
    - Need a Script to enter in username & password HI! I just need a script so that when I enter into a page on my password protected site that the username & Password get entered in for me and executed. ( meaning the enter button is pressed for me sort of like ). There used to be a way of doing that before like this example below.. http://username:password@www.somewebsite.com/private/index.htm but this no longer works now, is there another way of using a script to do this? PLEASE NOTE: I am aware of a way with IE to do something like this by saving it in the password history and also with Norton password manager but I specifically need it done this way with a script. I posted a similar post before but I feel that it was mis-understood so I am reposting this in a different way. paul.dallaire@sympatico.ca Tag: Rename files with script Tag: 153915
  - 4
    - Way to force shutdown of a PC from a script that is run when Windows first starts up? I'm trying to develop a vbscript that will allow me to shutdown a PC (running Windows XP Pro) on a Windows 2003 network. I would like to implement this a policy for my laptop computer users. This policy will check to see if the computer's virus defintions are upto date. If not the laptop will be shutdown before the user can logon to our network. The script needs to be run when the PC first starts up, BUT before the user logs on. I know where to set up the script (as part Local Computer Policy -> Computer Configuration ->Windows Settings -> Scripts (Startup/Shutdown) -> Startup). I've tried everything from executing the windows shutdown command from a vbscript (shutdown.exe -s -t 00) to various vbscript code including: Const SHUTDOWN = 1 strComputer = "." Set objWMIService = GetObject("winmgmts: {(Shutdown)}" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colOperatingSystems = objWMIService.ExecQuery _ ("SELECT * FROM Win32_OperatingSystem") For Each objOperatingSystem in colOperatingSystems ObjOperatingSystem.Win32Shutdown(SHUTDOWN) Next The problem is that the PC will not shut down. After the startup code is excuted, I see the logon prompt. Which means I'm past the startup script and into the user logon part of the entire authentication process. I know the shutdown code works. I've tested it while I've been logged on. It shuts down the machine every time. I know that the shutdown code was executed. I saw a test message. that I put after the shutdown code. Yet the PC will not shutdown! I think the problem is that I have the wrong permissions, but I'm unsure how to fix the problem. Any thoughts and script samples would be greatly appreciated. Thanks in advance. ...Gary White Tag: Rename files with script Tag: 153898
  - 5
    - Possible to time out a popup? Hi, A question I've been thinking of for some time... I am sure I saw the answer somewhere on the web but can't find it again... I am trying to display a popup box that times out. I know it can be done with the wscript.shell popup command by just specifying the timeout time as one of the paramters, however I want some message box to keep updating the amount of time left as text IN the popup box and somehow loop it so it doesn't allow user interaction until the timeout expires. My instinct tells me this can only be done through scripting something with IE (form), but I am sure I saw this done somewhere with either msgbox or popup within somekind of a loop to keep updating the msgbox/popup text on the fly. Any help would be great! Thanks Tag: Rename files with script Tag: 153896
  - 6
    - Lost Cookies Start http://212.123.5.17/mb/xdata/am.asp in the left Frame choose N,F or D (Nederlands, French, Deutsch) Not E (Standard for English) Click GO Close your Browser Reopen the page. On top you will see the result of the Language Cookie - result = N,F or D Start http://www.adq.be/ws.htm in the left Frame choose N,F,D (Nedelands, French, Deutsch) Not E (Standard for English) Click GO Close your Browser Reopen the page. There is no result for the Language Cookie and the standard (E) is selected Only difference between the two is that in the second case the first (http://212.123.5.17/mb/xdata/am.asp) is called in an frame of website on another domain. This is the code to write the cookie Response.Cookies("am")("language")=Request.QueryString("language") Response.Cookies("am").Expires=date()+30 this to read Request.Cookies ("am")("language") What can be the reason herefore and how o resolve Thx - Maarten (Belgium) MBProductiesMBProducties - Frank Catry Hazelaarsdreef 22 8530 HARELBEKE - BELGIË tel 00-32 (0)56/71.81.41 - fax 00-32 (0)65/20.55.87 - gsm 00 32 (0)477/62.00.82 e-mail: mbp@pandora.be - MSN: mb@ris.be This e-mail and any attachment thereto may contain information which is confidential and is intended for the sole use of the addressees. Any use of the information contained herein (including but not limited to total or partial reproduction or distribution in any form) by other persons or the addressees is prohibited. If you have received this e-mail in error, please notify the sender and delete its contents. Tag: Rename files with script Tag: 153895
  - 7
    - filters, photos and timers driving me nuts i am going slowly crazy. .net 2002 framework 1.0 i made a slide show. pictures are slide1.gif, slide2.gif etc etc defined 2 divisions that share the same part of the screen page1 and page2, page1 is normally visible, page2 is normally hidden. i use page1.innerhtml = "blah blah this picture" and teh same for page2 what im trying to do is to transition page1 to page2, wait 10 seconds and then loop thru switching new pictures for page1 and 2 and keep going till i hit the end of teh show. so far real frustrated. any clue how to do this? I sincerely appreciate any and all guidance on this as msdn has been clear as mud. thanx Woody any sugestion or comment made by me should be examined first for validity and appropriateness before assuming i have any idea at all what the heck i am talking about. I am not responsible for anything you may see with my name attached to it, i think. *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! Tag: Rename files with script Tag: 153892
  - 8
    - Simple little problem - I think Hey group, I have a little proble that i think a little Script might solve:) I have around 20 sites, each site has a different IP rang and all PCs are static IP (No DHCP), its a bit of a pain when i have to keep changing the IP, Gateway, DNS and other IP settings on my Laptop. I was wondering if I could write a script file which asked me what site i was at i clicked the site and it automatically changed all my IP settings? this would have to work on Windows 2000 or XP. Anybody got anything similar, or any links? Many Thanks Merlin Tag: Rename files with script Tag: 153888
  - 9
    - User input via console I know this may be a stupid question, but I've googled around, searched MSN groups, and this forum and can't find an answer. I need to get user input from the console, not using InputBox. I want to make a function, such as "readln" that will give the user a prompt and return their answer as a string or integer. VBScript must be able to do this. Is my assumption bad? Tag: Rename files with script Tag: 153887
  - 10
    - FYI - New WinZip vulnerability Courtesy of Peter Torr's blog... New WinZip vulnerability http://blogs.msdn.com/ptorr/archive/2004/02/27/81238.aspx -- Michael Harris Microsoft.MVP.Scripting Tag: Rename files with script Tag: 153884
  - 11
    - Need advice on automated newsletters and emails HI! I would like to know if someone could suggest some good programs for automated newsletter and email submissions. A program that can store the users email address in a defined database that will send them a newsletter when scheduled, including an autoresponder, Thanks in advance: :) paul.dallaire@sympatico.ca Tag: Rename files with script Tag: 153877
  - 12
    - How do we insert a username & Password into a link? HI! I need to know how to enter in a Username & Password into a link. I also need to know if there is a script out there that can go to a page and enter in the username & password automaticly. ( It has to be a script of some sort ). I know there are programs out there that can do that but its not what I want, I want a script that I can enter into a ASP or HTM page to go to a link and then enter in the username & Password when prompted. Can someone point me in the right direction or show tell me where to find it.. Thanks in advance :) Paul. paul.dallaire@sympatico.ca Tag: Rename files with script Tag: 153871
  - 13
    - Compiler location Does anyone know where office xp installs the compiler.. mse7 I think.. I can't define a default compiler in anything, wscript, primal script etc.. ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! >100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- Tag: Rename files with script Tag: 153870
  - 14
    - Word 2000 (RTF and/or DOC files) to HTML Converting Script I am looking for a script that will convert a .doc and/or an .rtf file to an .html file through a website that I am creating. I would prefer the script be written in VB and/or ASP. The ideal script would be easy to use, such as give a the location of the file to be converted and the destination of the converted file, and that is it. Tag: Rename files with script Tag: 153868
  - 15
    - Attachment to zip file Hi All How can I send like a text file into a zip file so that I can send it out in email Thanks JJ Tag: Rename files with script Tag: 153863
  - 16
    - Find Group in AD and report distinguished name Greetings I need a VBScript that will search AD to find whether or not a group name exists and if so, report back the distinguishedName Thanks in advance for any assistance! Tag: Rename files with script Tag: 153860
  - 17
    - granting ntfs permissions via vbscript Hi all, I am trying to - via setup - set some ntfs permissions to IUSR on a folder that resides on the target computer. I have a web application written in VB.NET. One of the features of this web app is file upload. So, I need to grant write access to the internet anonymous user on a folder that is created by de setup app. And this folder will be used by the web app to host the uploaded files. The .NET Web Setup Project offers a way to do this: via custom actions, that are no more, no less than vbscripts executions on target computer. Ok, that is the cenario, but my problem is to create this damn vbscript, responsible on grant the correct permissions to the IUSR account. Anyone has a clue on how do I accomplish this goal? tks Renato -- ----------------------------------------------------- Renato Aloi Analista Programador J&W Informática Ltda. Tag: Rename files with script Tag: 153856
  - 18
    - Advanced string parsing I've written a script that reports the distinguished name in Active Directory of the argument to the script. For instance: ============== C:\> findou.vbs "Trimboli, David" CN=Trimboli\, David,OU=Users,OU=Information Technology,OU=Administration,DC=cshl ,DC=edu ============== It works perfectly. Now I want to find a way to turn the above information into the following format: cshl.edu\Administration\Information Technology\Users\Trimboli, David I want to avoid writing a temporary file if possible. I cannot predict ahead of time what the OU structure of the queried object will be (that's the whole point). The returned data is stored in a variable. Does anybody have any advice on how I can transform the returned string into what I want? David Stardate 4158.1 Tag: Rename files with script Tag: 153855
  - 19
    - Scripting firewall rule change Is it possible to script a rule change on an external firewall utilizing the WMI SNMP provider? If so, how do I do this thanks -NM Tag: Rename files with script Tag: 153853
  - 20
    - Removeing a local account from the Power Users group How would I remove an account from the Power Users group with a vbs script? And then create a local account and set a password then add the new account to the Power Users group. I need to be able to do this on 300+ systems. Thanks. Tag: Rename files with script Tag: 153849
  - 21
    - Help with time Hi, I need to know how I can use time as a variable in cleaning out a folder of old files. Specifically, I need to delete log files older than 6 hours. Any ideas? Thanks in advance for any assistance, Mike Deering Tag: Rename files with script Tag: 153841
  - 22
    - mailto with multiple text box Hi all, I want to use the following form: <form name="Myform" method="post" action=""> <p> <input name="name" type="text" id="name"> Name </p> <p> <input name="email" type="text" id="email"> Email </p> <p> <input type="submit" name="Submit" value="Submit"> </p> </form> to send an email? I can use JavaScript, VBScript or Mailto, but I can't use server side scripting. Is very important for me that form use MULTIPLE text field. Thanks in advance Tag: Rename files with script Tag: 153840
  - 23
    - createobject fails?? Hi, I have a problem that an ActiveX exe class library that I created in VB6 will work properly when 'createobject' is used within VBA or VB, but fails when used from VBScript (e.g. - run from WSH or an application using the Microsoft scripting engine). I *think* this may be a permissions problem but have not been able to find a clear description of how one sets activex permissions. In the script, I'm getting error 424 "object required". Strangely, another activex exe that I had written previously works fine, even though I can see no difference in the way I set up the project...!! Any suggestions? -- Regards, Steve O'Hagan Tag: Rename files with script Tag: 153839
  - 24
    - Can I do client side populations from my ASP Page? I have done alot of ASP pages with VBScript which is all server side. I have done a few VBS files that runs locally and works with web forms. I would like to have a ASP webpage with a form for the user to enter data. I would like to include some client side stuff such as: When the user keys in the first value in a row the value is copied to the other fields in the row. And when a user clicks on certain values in an option box it would enable/disable or visible/hide additional fields. And finally make sure all visible fields are populated before the data is set back to the server. Any good examples of how to do this? *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! Tag: Rename files with script Tag: 153837
  - 25
    - Create exchange mailbox Hi there, I have my script done to create everything for the user apart from the exchange 2k mailbox. Anyone got some code to do this. Some comments on what to change within the code would be appreciated. Thanks, Senore Pedro Tag: Rename files with script Tag: 153836
- Next
  - 1
    - Limitation on fso size function I've written a script to get the sizes of the various data shares on our servers. The relevant part of the code is like so: computerName = WSHShell.ExpandEnvironmentStrings("%COMPUTERNAME%") f = "\\"&computerName&"\home" dirsize = objFSO.GetFolder(f).Size strf = f & " " & dirsize & " bytes" outFile.WriteLine strf And the same for the other shares we use. When I run this on each server, it works fine except on some of the large servers, where the shares are quite large (> 200Gb, some getting up to half a terabyte). On these servers, the dirsize variable comes back empty from the call to Size, but as it doesn't return immediately but runs for some considerable time before failing, it would seem to be failing somewhere inside the recursion through the directory structure. I guess the two possibilities are either that the function can't cope with a dir structure over a certain size or with an overly long pathlength somewhere in the directory structure. The largest dir for which I have got a valid result back from Size is 207442015120 bytes. As this is actually slightly larger than some of the shares for which the function fails (I got the size of those shares from the right-click dir properties in Windows Explorer), I suspect that the problem is with pathlengths > 256 chars long. Any suggestions on how to get a script to return the size of these dir structures? I'm running the script on Win2000 SP4 servers. Nick Tag: Rename files with script Tag: 153832
  - 2
    - Getting active user name How can I get (using VBScript in Outlook Form) user name, that is currently logged in? Tag: Rename files with script Tag: 153830
  - 3
    - Remote Assistance. Does anyone know how to 'Offer Remote Assistance' to a remote computer with VbScript with the Ip or NetBios name? Remote Desktop was much easier using the following but I haven't been able to figure this one out. SET SHELL = CREATEOBJECT("WSCRIPT.SHELL") SHELL.RUN("MSTSC /V:" & REMOTE_COMPUTER & " /CONSOLE") Much appreciated. Rob Tag: Rename files with script Tag: 153826
  - 4
    - read and compare 2 file dates/times Guys I have a issue with comparing the Time and date stamp of a file in FTP folder on the web and the same file previuosly down loaded. I have written a script where it goes to the FTP site and get the file details like date and time stamp and these info are recorded in FTP1.TXT file looks like ---------------------FTP1.TXT---------------------- -rwxrwxr-x 1 hevasymantec-ftp5 hevasymantec-ftp3 4651576 Feb 11 14:15 symcdefsi32.exe --------------------------------------------------- I run one more script which gets the file deatils of prevoiusly downloaded file which is ther on G:\ ------------------Ter.txt------------------------- Volume in drive G is Local Disk Volume Serial Number is 8C0A-2423 Directory of G:\ 20/02/04 16:03 4651598 symcdefsi32.exe 1 File(s) 4651598 bytes 4,600,000,512 bytes free ------------------------------------------------- Now how do I compare the dates to find out which is new...BTW there is no version property for this file Thanks cha Tag: Rename files with script Tag: 153824
  - 5
    - Why does the & result in the error message??? Hello I am just trying to learn VBscript. I get an error message I can't solve. This code is in a wsf file. <?xml version="1.0"?><package><job id="VBSJob"><?job debug="true" error="false"?><script language="VBScript" Dim fs, strMsg strMsg2 = "text1 " & "text2 MsgBox strMsg </script></job></package The error message I receive is: test.wsf(15, 12) Windows Script Host: Unterminated entity reference - matching ';' not foun The script runs fine without the & operation Can someone tell me what I do wrong I use WSH 5.6 on Windows 2000 Pro. Tag: Rename files with script Tag: 153811
  - 6
    - Help - cannot copy file to remote desktop Hello, I'm want to copy a file to many pc's, either to the desktop or Startup folder. OS is 2k. Local admin password is the same on all, all pc's in the same workgroup. With the script below, I can open the desired folders and manually copy with no problem. I can also copy to the root folder. Something else I tried without success was to copy to C: and create shortcut on remote desktop. I know I can do this from a local script, but not remotely. Error messages included in script. Thanks Set oFS = CreateObject("Scripting.FileSystemObject") Set WshShell = WScript.CreateObject("WScript.Shell") 'Open a text file of computer names Set oTS = oFS.OpenTextFile("F:\getlist\blacat.txt") Do Until oTS.AtEndOfStream sComputer = oTS.ReadLine DesktopPath = WshShell.SpecialFolders("AllUsersDesktop") WshShell.Run "\\" & sComputer & "\d$\Docume~1\Alluse~1\Desktop" 'This works WshShell.Run "\\" & sComputer & "\d$\Docume~1\Alluse~1\StartM~1\Programs\Startup" 'This works oFS.CopyFile "F:\getlist\metapad.exe" ,"\\" & sComputer & "\c$\" 'This works Wscript.echo "\\" & sComputer &"\" & DesktopPath 'This works and looks ok 'WshShell.Run "\\" & sComputer &"\" & DesktopPath 'This don't work 'Error Message - The system cannot find the path specified. 'oFS.CopyFile "F:\getlist\metapad.exe" ,"\\" & sComputer & "\d$\Docume~1\Alluse~1\Desktop" 'This don't work ' Error Message Permission denied. oFS.CopyFile "C:\scripts\getlist\blacat.txt" ,"\\" & sComputer & "\" & DesktopPath This don't work 'Error Message path not found Loop oTS.Close Tag: Rename files with script Tag: 153810
  - 7
    - caption compare Is there any function or add-in in visual basic that allows you to compare the caption of two text boxes and output a percentage of how similar they are? If not is there an easy way of doing this? Many thanks in advance. Tag: Rename files with script Tag: 153806
  - 8
    - How to prevent calculated variables from rounding? I'm trying to get the output of the variable "ResTime" to come out in a format like 2.45 Instead, the following code rounds the number like 2.00 <% StartDate = rs.fields.item("Date_Created").value EndDate = rs.fields.item("Date_Closed").value ResTime = FormatNumber(Cdbl(DateDiff("h",StartDate,EndDate)),2) %> I am able to get the desired result (no rounding) by using... Convert(decimal(10,2), (datediff(hour, [date_Created], [date_closed])) ...directly in a SQL query. But the way my ASP page works, I really want to be able to manipulate and calculate the variables in VBScript after the query is run. Any suggestions? Thanks, Russell Tag: Rename files with script Tag: 153804
  - 9
    - Can't get debugger to work. I run my vbs script using the following command line and get a box that tells me there is a syntax error. Then another box pops up and asks me to select a debugger, but the list is empty I installed the microsoft script debugger, but its dated 1997 and let me run vbs files, just open them. Thanks in advance. Mas ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! >100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- Tag: Rename files with script Tag: 153801
  - 10
    - Problem accessing exe and url attachments using cdo! Hi all, I'm writing a script that will create a list of attachments in an exchange 5.5 mailbox folder. The code below works except it can't find .exe or .url attachments. If I rename the same attachment's extensions ( .ex ,.e ,.ur, .u,.test,.etc) they are reported. I'm using cdo 1.2 (not sure how to determ the version my vbs script is really using) I'm developing and testing on Windows XP PRO w/ Office XP PRO installed against an Exchange 5.5 sp4 server on an NT4 sp6a machine Could this be Office XP security settings blocking .exe and .url? Or the OS or CDO 1.2 security? I run the script using wscript.exe. Thanks, Doug below is the subroutine responsible for finding and reporting attachments in a folder. sub scanAttachments( objFolder) ' get Inbox's messages collection Set objMsgColl = objFolder.Messages ' performs loop, Sets each objMess For Each objMess in objMsgColl set objAttachments = objMess.Attachments For Each objAttachment In objAttachments ' report each attachment to a file strAttName = objAttachment.Name objFile.WriteLine = objFolder.name & "," & strAttName Next Next end sub Tag: Rename files with script Tag: 153800
  - 11
    - date string like 2004-02-26-17-07 How to easily make a string that contains the current YYYY-MM-DD-HH-MM like on Unix: date +'%Y-%m-%d-%H-%M' 2004-02-26-17-07 Is there an easier way than using Year, Month, Hour etc then testing each for nos <10 and inserting 0 if so? thanks in advance John Tag: Rename files with script Tag: 153799
  - 12
    - problems with a scheduled script time bump Tag: Rename files with script Tag: 153796
  - 13
    - Help with VBS and ASP I have a script sitting in my asp page, and I needs some help trying to accomplish something. Below is my script and I can display the date in my title of my web page, but I would like to display the pervious date if possible. I am pulling information out of a database for things that happened the day before and want to print that date out. %> <html> <head> <title>Eventlogs for <% Response.Write Date() %></Title> </head> <body> <p> <% Thanks for the help in advanced, Steve Tag: Rename files with script Tag: 153793
  - 14
    - Help with ASP and HTML Tables Below is my code, I am one trying to make it where I don't have my usename and password, and server information to be in my code. Second, unser my response.write, I want to massage this data into table format where it will make sense. All I get now is everthing ran together. If you can, can some help me in doing this. Thanks in advance. Stephen Robinson ______________________________________________________________________ <%@ Language=VBScript%> <% dim Conn, objRS, objConn, strSQL Set Conn = CreateObject("ADODB.Connection") Set objRS = CreateObject("ADODB.Recordset") Conn.Open = "provider=sqloledb;data source=SCK-EAV-01;" & _ "user id=sa;password=XXXXXX;" & _ "initial catalog=Eventlogs" strSQL = "SELECT [ComputerName], [EventCode], [Message] " & _ "[SourceName], [TimeWritten], [Type] FROM [EventTable] " & _ "WHERE [Type]='error' ORDER BY [TimeWritten]" objRS.Open strSQL, Conn, 0, 1 'adOpenForwardOnly, adLockReadOnly %> <html> <head> <title>Eventlogs for <% Response.Write Date() %></Title> </head> <body> <p> <% objRS.MoveFirst While Not objRS.EOF Response.Write objRS("ComputerName") & objRS("EventCode") & objRS("SourceName") objRS.MoveNext Wend %> </p> </body> </html> ___________________________________________________________________________ Tag: Rename files with script Tag: 153792
  - 15
    - Toggle IE Accessibility settings Here's a VBS for quickly toggling "Internet options", "Accessibility", to use/ignore web page fonts and colors. I've named the file "IE Accessibility.vbs" and placed it in . . .\Documents and Settings\. . .\Favorites\Links To toggle the settings, just click on the "IE Accessibility.vbs" button in the IE "Links" toolbar. Your comments and ideas are most welcome. I'm pasting the code below, sorry about the wrapped lines: ============== START =================== 'Toggle IE Accessibility settings Set WSHShell = CreateObject("Wscript.Shell") RegKey = "HKCU\Software\Microsoft\Internet Explorer\Settings\" With WSHShell If .RegRead(RegKey & "Always Use My Colors") = 1 Then 'Use Web page Fonts and Colors .RegWrite RegKey & "Always Use My Colors", 0, "REG_DWORD" .RegWrite RegKey & "Always Use My Font Size", 0, "REG_DWORD" .RegWrite RegKey & "Always Use My Font Face", 0, "REG_DWORD" Else 'Ignore Web page Fonts and Colors .RegWrite RegKey & "Always Use My Colors", 1, "REG_DWORD" .RegWrite RegKey & "Always Use My Font Size", 1, "REG_DWORD" .RegWrite RegKey & "Always Use My Font Face", 1, "REG_DWORD" End If End With WSHShell.Run "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl", 1, False If ActivateWindow("Internet Properties") Then WSHShell.SendKeys "{ENTER}", True End If WScript.Quit Function ActivateWindow(Title) Do i = i + 1 If i > 50 Then Exit Do 'Try for max 5 seconds WScript.Sleep 100 ActivateWindow = WSHShell.AppActivate(Title) Loop While ActivateWindow = False ' WSHShell.Popup i ' Debug attempt count End Function ============== END =================== Tag: Rename files with script Tag: 153785
  - 16
    - VBScript runtime (0x800A0046) Permission denied: 'GetObject' Hello, I am trying to construct a script that will add local users to a remote machine that does not reside in the same domain as the machine running the script. Currently I have the following; '---------Script Begin-------------- strComputer = "Reports" Set colAccounts = GetObject("WinNT://" & strComputer & ",computer") Set objUser = colAccounts.Create("user", "NewUser") objUser.SetPassword "1234" objUser.Put "Description", "NewUser account" objUser.SetInfo Set objGroup = GetObject("WinNT://" & strComputer & "/Users,group") Set objUser = GetObject("WinNT://" & strComputer & "/NewUser,user") objGroup.Add(objUser.ADsPath) objUser.SetInfo '---------Script End-------------- The problem here is that the computer "Reports" is not the computer running the script nor is it even in the same domain. When I run it now I get Error: Permission denied: 'GetObject' Code: 800A0046 Is there a way I can pass a username and password or something so it will work? -- -Scott Elgram Tag: Rename files with script Tag: 153784
  - 17
    - problems with a scheduled script I have a small script that gives me some problems. The script is InFolder = "\\10.1.1.3\mcafee$\Autoupdate" Set FSO = CreateObject("Scripting.FileSystemObject") Set fld = FSO.GetFolder(InFolder) When i run the script via the command line it runs without a problem. When i schedule the script i get the following message when it runs Line : 3 Char: 1 error : Path not found code : 800A004C Who can help ? Rikkie Tag: Rename files with script Tag: 153781
  - 18
    - How to register a NT client on a 2000 Dynamic DNS via script Hi, all is there a way to register a nt machine with a script o similar on a DNS server on Windows 2000 with dynamic update activate? Thanks, Giuseppe Cibrario Tag: Rename files with script Tag: 153780
  - 19
    - Differentiate between Server and Workstation Hello, I need to run a script in a W2K AD domain but I only want it to run against servers (Member, DC, GC, FSMO). Is there a way to do this using VBScript (only - no third party apps)? All suggestions will be greatly appreciated. TIA, Bill Burke bill@2burkes.com Tag: Rename files with script Tag: 153778
  - 20
    - Last time Password Changed I want to write a script that will query AD and tell me when a user last changed thier passsword or how old the password is. Any ideas? Tag: Rename files with script Tag: 153775
  - 21
    - ARITHABORT when trying to run UPDATE query from vbscript? Hi All, I have a simple update query that I'm trying to run in VBScript against an SQL SERVER 2000 database table. The query runs without problems when I run it in SQL Analyzer, however, when I try to run the same query in VBScript, I get the following error message: Microsoft OLE DB Provider for ODBC Drivers: [Microsoft][ODBC SQL Server Driver][SQL Server]UPDATE failed because the following SET options have incorrect settings: 'ARITHABORT'. I think the problem is caused because I have an indexed computed column in this table that concatenates several other columns from the table, and the update query is updating a column that included in the computed column's concatenation. However, I'm confused that this would run in SQL Analyzer, and not in VBScript. I was expecting that it would either run in both, or neither. Can anyone give me any advice on how to get past this error? Much warmth, Murray Tag: Rename files with script Tag: 153774
  - 22
    - cration of Mailenabled user Hi, I would like to create a mailenabled user in AD, not a mailboxenabled user. When I put an external e-mailaddress in TargetAddress i only get an account that is disabled in AD. Is there any other attributes that needs to be established? //Mariah Tag: Rename files with script Tag: 153773
  - 23
    - Scripting the display of active desktop items? It's driving me nuts I have a gif[1] that comes from the web and is on my desktop as active content. Sometimes I want it displayed, sometimes I don't. Switching it off is easy - just click the little x at top rhs. Switching on? right click on the desktop, properties/desktop/customise desktop/web/checkboxes Anyone know how I can script that (and I don't mean sendkeys :-))? I know how to script changes to the registry, but not yet the values for the relevant entries which I suspect are HKCU/software/internet explorer/desktop/components... Anyone know for certain what the various entries there mean and valid values? and that they are the ones that matter? I would prefer something less brutal than registry editing IYSWIM. Many thanks in advance. [1]http://www.meto.gov.uk/datafiles/flat3ani.gif William Hite maximize the value of your IE favs: www.searchfavorites.com Tag: Rename files with script Tag: 153767
  - 24
    - Enumeration of Files on the Local Machine Hi, Does anyone know how I can enumerate files on the local computer in a directory? I need to do 2 things in my script. Get a list of all the files in a particular directory into an array from the local machine and in a second array, get a list of files on a shared directory on a remote computer Any ideas? Tag: Rename files with script Tag: 153765
  - 25
    - Serial communications Hello, Is it possible to send data on the serial port via vbscript? Gr Yves Wittouck Tag: Rename files with script Tag: 153764

Hi,

does anyone know how to rename all files in a directory by script?

The files should be renamed with a rule like paste an underline between
the the 2nd and 3rd character of the name and so one.

The script should run on W2K.

Greeting,
Andreas

Top

Re: Rename files with script by Robert

Robert
Sun Feb 29 04:38:53 CST 2004

See my recent answer to a query

Re: Renaming Long Filenames in a Directory

in microsoft.public.scripting.wsh for ideas and example code on doing this.

Robert Day

"Andreas Schlegel" <schlegelaw@epost.de> wrote in message
news:Oc62zvq$DHA.2216@TK2MSFTNGP10.phx.gbl...
> Hi,
>
> does anyone know how to rename all files in a directory by script?
>
> The files should be renamed with a rule like paste an underline between
> the the 2nd and 3rd character of the name and so one.
>
> The script should run on W2K.
>
> Greeting,
> Andreas

Top