Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
SOAP request not returning response
Not sure if I fully understand your requirement. I ran your code and just as expected, I was able to get the textual content of the WSDL. -
how to replace @VARIABLE in text file with value of Emails in xml file
The Sub elements are not properly terminated. It should be. <Sub Report="BusinessSummarySubs" EMails="lalla@yahoo.com; haha@yahoo.com"/> Does the number of email addresses in the XML file correspond to the number of lines in the txt with the @VARIABLE string? Or do you want to concatenate all... -
VBscript to Search / Modify Windows Services file
@strongm Good option! It has been weeks since I worked on this. As far as I can remember, the original poster also wants the blank lines removed from the original file. -
VBscript to Search / Modify Windows Services file
Blank lines in the original file are not skipped. To do so, update the following line. If r.Test(TextLine) = False Then To If r.Test(TextLine) = False And Len(TextLine) > 0 Then Again, please test thoroughly before you deploy. -
VBscript to Search / Modify Windows Services file
I doubt if that can be accomplished from within the script. If I were to venture a solution, I would write another script that calls this script. See an example here. -
VBscript to Search / Modify Windows Services file
Correction in my code, I meant Temp NOT Temp1. -
VBscript to Search / Modify Windows Services file
You don't need to create the file in the etc folder. I don't even think it's a good idea. Since the file is simply a way to check if the service file was edited, I recommend creating the service.ack file in a temp folder. Afterall, the file won't be missed after your project is complete. So... -
VBscript to Search / Modify Windows Services file
Here is another option using regular expressions. Set objFSO = CreateObject("Scripting.FileSystemObject") 'Check if the service.ack file exist. If it does then stop the execution as the script already ran. If objFSO.FileExists("C:\Windows\System32\drivers\etc\service.ack") Then WScript.Echo... -
Filter by server name Get-ADComputer -Filter {Name -Like $filter}
Another way to write what you are going to try is SACCTX\d{3}.- jkspeed
- Post #5
- Forum: PowerShell (Microsoft)
-
File deletion from specific folders runs with no errors but doesnt delete.
You're welcome. In regards to your follow-up question, there are no wildcards for what you are trying to accomplish. Can you give an example of what you are trying to accomplish with going through each subfolder and files. Take care. -
File deletion from specific folders runs with no errors but doesnt delete.
PLEASE disregard my previous post and use this. Call DeleteFiles("C:\FTPdata","dat",15) Call DeleteFiles("C:\mobileiron","tgz",2) Call DeleteFiles("C:\block\PRIME","gpg",2) Call DeleteFiles("C:\block\ISE","gpg",2) Sub DeleteFiles(Path,Ext,n) Set oFSO =... -
File deletion from specific folders runs with no errors but doesnt delete.
Here is a cleaner way to do this. Call DeleteFiles("C:\FTPdata",15,"dat") Call DeleteFiles("C:\mobileiron",2,"tgz") Call DeleteFiles("C:\block\PRIME",2,"gpg") Call DeleteFiles("C:\block\ISE",2,"gpg") Sub DeleteFiles(Path,Ext,n) Set oFSO = CreateObject("Scripting.FileSystemObject") For Each... -
Setting Metadata
Hi All, I just wrote a vbscript that uploads files into a shared folder. It works. The problem is that the default state of these files is "Check Out". So I have to manually select these files on the front-end to "Check In". This I believe defeats the purpose of my script. Is there a way...- jkspeed
- Thread
- Replies: 1
- Forum: Microsoft: SharePoint
-
remove Double from csv file and create unique list
Update line 7 from -4 to -5. nbLines = UBound(myAry) - 5 This accounts for the 3 lines at the beginning and the 2 at the end. -
remove Double from csv file and create unique list
Correction on the line 1's comment. The first dimension is the number of lines in your input file -1. -
remove Double from csv file and create unique list
This should work... Dim arr(6,5) 'The first dimension is the number of lines in your input file and the second is the number of fields - 1. InFile = "<PATH TO YOUR INPUT CSV FILE" OutFile = "<PATH TO YOUR RESULT FILE>" Set oFSO = CreateObject("Scripting.FileSystemObject") Set InF =... -
Open save as dialog
You can read about HTAs here. I'm also starting to experiment with it as some of my scripts require a GUI. -
Open save as dialog
That is weird as it's not happening on my end. Tried it with both WinXP and 7. Does it happen to any other dialog boxes or windows? Going back to your original post, another option that I could think of to make your "Save As" project elegant is to use HTA. -
Open save as dialog
This is probably as close to "Save As" as you can get. Set oFSO = CreateObject("Scripting.FileSystemObject") Set oShell = CreateObject("Shell.Application") Path = oShell.BrowseForFolder(0,"Choose Folder",0,17).Items.Item.Path Name = InputBox("Please Enter A FileName",,"FileName.txt") If Path...
