Upload File to Web Folder via Web Dav

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
    - VBScript for Outlook profile Hi, I am just wondering if anyone knows any link that provides sample script for adding or modifying user profile (exhcange a/c) for Outlook xp/2003? or is it possible to do it remotely using script or policy? Thanks for advice. Tag: Upload File to Web Folder via Web Dav Tag: 196237
  - 2
    - View list of safe, scriptable ActiveXObjects Hello, I want to view the list of safe, scriptable objects that are installed on my machine, and their methods as well. I am planning on using them either with new ActiveXObject() with javascript or CreateObject() in vbscript in my browser, so I need them to be scriptable in the browser and not buzz me up with warnings (while I am running in internet zone). I've used OLE viewer from Visual Studio but the list is overwhelming while things like XMLHTTPRequest and an ATL COM object that I installed somehow are not shown, so I supposed there is a better way. Thanks alot, please let me know. Tag: Upload File to Web Folder via Web Dav Tag: 196236
  - 3
    - Help getting user account kind from IE Hi, Any body knows how to check user privilege with vbscript on IE? User privilege as in whether the user is running IE with admin or limited user priv. I've been thinking down the line of writing to registry with WScript and see if it fails... but I prefer the method to not invlove any warning messages for my users (IE warns about unsafe script for WScript...) Thanks. Tag: Upload File to Web Folder via Web Dav Tag: 196234
  - 4
    - How to monitor for the absence of any new files created in a folder? Hello all. I need a script that will repeatedly check a folder every 30 minutes, and tell me if no new files have been created during that time interval. I've taken the script found here: http://www.microsoft.com/technet/scriptcenter/resources/qanda/oct04/hey1011.mspx and tried to tweak it to no avail. Any help would be greatly appreciated. Thanks! - Dave Tag: Upload File to Web Folder via Web Dav Tag: 196229
  - 5
    - (free advice) avoid msgboxes in event handlers all right, all right, you already know this(?). You may exit here. As for myself, I have always adhered to the principal that an event handler ought to be as minimal as possible. Preferably just set a flag, and do your processing elsewhere. The motivation behind this was a concern (maybe just a vague uneasiness) about all the messages flying around the system, and the possibility of losing one as a result of spending too much time in an event handler. And so, I have tended to avoid msgboxes in event handlers without the benefit of any free advice. Anyway, the free advice comes as a result of lurking in the windows api ng. Lately there has been an extremely long thread concerning the above subject, with sub-debates concerning what actually happens when you do use a msgbox in an event handler. While the api guys delight in the details, you scripters just want to get the job done, and so the above advice. Just set aside all the technicalities, and avoid msgboxes in event handlers altogether. cheers, jw Tag: Upload File to Web Folder via Web Dav Tag: 196225
  - 6
    - Using Text Area object at run time.. I am using a simple HTA application. I have made a drop down box which has a few values. Depending upon values selected in the drop down box appropriate message has to be displayed in textarea. Can anyone help me? I have defined the textarea in the body section. I am not sure where I have to put the code. Let me know if possible with code example. Thanks Dave Tag: Upload File to Web Folder via Web Dav Tag: 196223
  - 7
    - Verifying a user without knowing his precise OU Hello, Here's the task at hand. I have a user drive which has twice as many folders as we have employees. Therefore, someone hasn't done its job of deleting the users. Now, I'm not talking about having 20 employees and 40 folders; it's in the thousands. I did a dir /b and outputted the result in a text file, which is easily parsable in vbscript. Folders are name through the pre-Win2000 username, which is cool. However, the thing is, the users can be located in various OUs, for policy and site reasons. Therefore, I don't want to go through EACH OU; I'd like to be able to input to the script the name of the user and search AD automatically through a function of some sort. Is it even doable ? Thank you ! Mathieu Tag: Upload File to Web Folder via Web Dav Tag: 196215
  - 8
    - Forcing a download in asp results in zero bytes file Hi to all, I'm a JScript user, but this time I've a problem with someone else code, written in VBScript. The problem is: using the script I join to force the download of a .pdf file, works fine except with a certain pdf file of 7 mb: with this very pdf, it results in a zero byte download. The file is not corrupted and opens finely in Acrobat if I download it the usual way. The problems arise only when downloaded via this - usually well working - script. The application is not mine and I cannot rewrite it in Jscript :-D. Any idea or suggestion? Thank you alot!! J. PS the fact that the file is bigger than usual can count? <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <%Response.Buffer = True%> <% On Error Resume Next Dim strPath strPath = CStr(Request.QueryString("file")) '-- do some basic error checking for the QueryString If strPath = "" Then Response.Clear Response.Write("Specificare il file.") Response.End ElseIf InStr(strPath, "..") > 0 Then Response.Clear Response.Write("Cartella non trovata.") Response.End ElseIf Len(strPath) > 1024 Then Response.Clear Response.Write("Path troppo lungo.") Response.End Else Call DownloadFile(strPath) End If Private Sub DownloadFile(file) '--declare variables Dim strAbsFile Dim strFileExtension Dim objFSO Dim objFile Dim objStream '-- set absolute file location strAbsFile = Server.MapPath(file) '-- create FSO object to check if file exists and get properties Set objFSO = Server.CreateObject("Scripting.FileSystemObject") '-- check to see if the file exists If objFSO.FileExists(strAbsFile) Then Set objFile = objFSO.GetFile(strAbsFile) '-- first clear the response, and then set the appropriate headers Response.Clear '-- the filename you give it will be the one that is shown ' to the users by default when they save Response.AddHeader "Content-Disposition", "attachment; filename=" & objFile.Name Response.AddHeader "Content-Length", objFile.Size Response.ContentType = "application/octet-stream" Set objStream = Server.CreateObject("ADODB.Stream") objStream.Open '-- set as binary objStream.Type = 1 Response.CharSet = "UTF-8" '-- load into the stream the file objStream.LoadFromFile(strAbsFile) '-- send the stream in the response Response.BinaryWrite(objStream.Read) objStream.Close Set objStream = Nothing Set objFile = Nothing Else 'objFSO.FileExists(strAbsFile) Response.Clear Response.Write("File non esistente.") End If Set objFSO = Nothing End Sub %> Tag: Upload File to Web Folder via Web Dav Tag: 196214
  - 9
    - create registry key Shouldn't this script create a registry key called test under the path of HKEY_CURRENT_USER\software\microsoft\Exchange\ const HKEY_CURRENT_USER = &H80000002 strComputer = "." Set StdOut = WScript.StdOut Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &_ strComputer & "\root\default:StdRegProv") strKeyPath = "SOFTWARE\MICROSOFT\EXCHANGE\test" oReg.CreateKey HKEY_CURRENT_USER,strKeyPath Tag: Upload File to Web Folder via Web Dav Tag: 196211
  - 10
    - remove windows games My bosses have decided that they want all of the windows games removed. I'm looking for a script that I can run to automate that process rather than having to go to each machine in person. Any help would be appreciated. Bill Tag: Upload File to Web Folder via Web Dav Tag: 196208
  - 11
    - Update Information in SQL from a VBS script I have a vbs script that calls a list of systems inside a SQL database. It then uses that list to go out and collect additional information on those systems and inserts the collected data into another table. My question is what is the best way to remove redundant date. Should I just update the information in the existing cells (if so how?) or should I create a clean up script that looks for duplicate items and delete the ones with the oldest time stamp? Thanks -Matt- Tag: Upload File to Web Folder via Web Dav Tag: 196205
  - 12
    - Problems with objRecordSet (vbs) Hello, i am new to vbs and here is my first prob. I want to display all ous from a starting ou and all sub-ous. And for every (sub)ou i want to display the users. So, heres is my script for a better understanding: Set objConnection = CreateObject("ADODB.Connection") Set objCommand = CreateObject("ADODB.Command") Set objCommandUsers = CreateObject("ADODB.Command") objConnection.Provider = "ADsDSOObject" objConnection.Open "Active Directory Provider" Set objCommand.ActiveConnection = objConnection Set objCommandUser.ActiveConnection = objConnection Set ExApp = WScript.CreateObject("Excel.Application") ExApp.Visible = True ExApp.Workbooks.Add objCommand.Properties("Page Size") = 1000 objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE objCommandUsers.Properties("Page Size") = 1000 objCommandUsers.Properties("Searchscope") = ADS_SCOPE_SUBTREE objCommand.CommandText = _ "SELECT ADsPath FROM 'LDAP://OU=OU,dc=domain,dc=com' WHERE " & _ "objectCategory='organizationalUnit'" Set objRecordSet = objCommand.Execute objRecordSet.MoveFirst objRecordSetUsers.MoveFirst anzahlous=0 anzahluser=0 Do Until objRecordSet.EOF anzahlous=anzahlous+1 ExApp.Cells((anzahlous),1) = objRecordSet.Fields("ADsPath").Value objCommandUsers.CommandText = _ "SELECT Name FROM '" & objRecordSet.Fields("ADsPath").Value & "' WHERE objectCategory='user'" ExApp.Cells(anzahlous,2)= objCommandUsers.CommandText Set objRecordSetUsers = objCommandUsers.Execute WScript.Echo ("Anzahl") Do Until objRecordSetUsers.EOF anzahluser=anzahluser+1 ExApp.Cells((anzahluser),2) = objRecordSetUsers.Fields("ADsPath").Value '' objRecordSetUsers.MoveNext loop objRecordSet.MoveNext Loop Set objConnection = nothing Set objCommand = nothing Set objRecordSet = nothing Set objRecordSetUsers = nothing Set objCommandUsers = nothing So with the objCommand and the objRecordSet i get the list of all ous and sub-ous that works fine. In the Do Until objRecordSet.EOF i list all the ous in an excel-sheet and now in this do until-loop i want to get all the users in this ou. So, i have created the objCommandUsers and the objRecordSetUsers i want to get the list of the users. But this does not work? Why? Doesn anyone have any idea? Thanks Dirk Tag: Upload File to Web Folder via Web Dav Tag: 196200
  - 13
    - How to remove all elements in a combobox using VBscript Hi everybody, I have a HTML Form, which contains a COMBOBOX ( <SELECT ID="... ...>...</SELECT> ). I populate this COMBOBOX in VBscript by using the method .ADD like this : Set objOpt = document.CreateElement("OPTION") objOpt.Value = "value" objOpt.Text = "text" myForm.MyCombo.add objOpt this works fine, but I'd like to remove all elements of this COMBOBOX, somebody could tell me how to do this ? I've tried myForm.MyCombo.Items.Clear (I found it in the Web) but no success. Thanks for your help, Vincent Tag: Upload File to Web Folder via Web Dav Tag: 196186
  - 14
    - Check Services with no WMI Is there a way to check the Startup mode and status of a service without WMI? Thanks!!! Carlos Felipe França da Fonseca Tag: Upload File to Web Folder via Web Dav Tag: 196176
  - 15
    - RUNAS inside of .vbs I need to run this under a user account that has administrative rights Can I put in a username and password in clear text inside the .vbs script? set WshShell = CreateObject("WScript.Shell") On Error Resume Next WshShell.RegDelete "HKEY_LOCAL_MACHINE\SOFTWARE\FLEXlm License Manager\ADSKFLEX_LICENSE_FILE" set oEnv=WshShell.Environment("System") oEnv("ADSKFLEX_LICENSE_FILE") = "@server" wscript.echo "DONE Importing VARIABLES" -- Dave Tag: Upload File to Web Folder via Web Dav Tag: 196168
  - 16
    - ObjUser.putex gives me "unspecified error" When I run the following command in my script, I get "Unspecified Error" Const ADS_PROPERTY_APPEND=3 Set objUser = GetObject("LDAP://" & userDN) 'User DN is correct as I can verify it using the message box below. MsgBox "Writing to " & objUser.DistinguishedName objUser.putex ADS_PROPERTY_APPEND,"proxyAddresses","/o=Org" objUser.SetInfo Thank you! Tag: Upload File to Web Folder via Web Dav Tag: 196167
  - 17
    - Network Adapter Protocols and Binding Order I am trying to script the following: 1. Determine the Network Connection Binding order on a machine that has multiple Network Adapters. 2. Enumerate the list of Protocols associated with a particular network Adapter. I already have a script that would enumerate all Protocols installed on a machine. I would prefer to go the WMI way, if possible. However, I can live with reading registry values for now. Any help is appreciated. Thanks in advance, ganesh Tag: Upload File to Web Folder via Web Dav Tag: 196166
  - 18
    - How do I grab IP address from a connection? I'm not sure where to start - say I have a connectoid "VPNFOOBAR". I connect to it and then I need to add a route, like "route add 10.0.4.0 mask 255.255.255.0 <assigned address from VPNFOOBAR>". I can script the connection, but I can't figure out how to grab the assigned IP address. Can anyone help? Thanks in advance! Tag: Upload File to Web Folder via Web Dav Tag: 196162
  - 19
    - RMTShare/Permissions I'm needing to get a list of shares from specified servers and the permissions on said shares. Not being too good at VBScript, I ran across RMTShare. My problem is, by simply running "rmtshare \\server" I get a list of shares on the server, but not their permissions. For this I'd need to run "rmtshare \\server\share". The problem is that I need to automate the process. Does anyone know how I could do this with or without rmtshare? Is there some way to store the share list in a file (i.e. "rmtshare \\server > file.txt") and then have a VBScript access the file's data as an array to fill in "rmtshare \\server\share"? TIA. Tag: Upload File to Web Folder via Web Dav Tag: 196158
  - 20
    - Is the syntax correct? Hi, Need help to check is the syntax correct: WshShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\ActiveDesktop" "NoDeletingComponents"=dword:00000001 "NoEditingComponents"=dword:00000001 "NoCloseDragDropBands"=dword:00000001 "NoMovingBands"=dword:00000001 Set WSHShell = CreateObject("WScript.Shell") WSHShell.Run "RUNDLL32.EXE Shell32.dll,SHExitWindowsEx 0" WScript.quit Is it OK? Tag: Upload File to Web Folder via Web Dav Tag: 196155
  - 21
    - EXE from ASP w/db connection I have an exe (VB) that performs updating and table inserts. Currently, a user would simply double click the exe to execute. Now I want to call this from ASP. When I do so, my log file (which is created w/in the exe) says that 'Login failed for user '(null)'. Reason: Not associated with a trusted SQL Server connection.' Now my db connection string in the exe is set to use Integrated Security. Within IIS, I'm using anonymous access with 'WebUser' as my username. I granted this user full control under security for the exe. Again, if I simply double click the exe and run it, all is well. But calling it from the asp page gives me the login failed response. Tag: Upload File to Web Folder via Web Dav Tag: 196154
  - 22
    - How to enable NTFS inheritance flag? I need a script that given a folder path,set its NTFS inheritance flag.I need it to be able to also interprete UNC paths and work in the current user security context,without requiring WMI permissions on the hosting system(the problem I actually have when using xcacls.vbs;because the running user needs to have full permission on both issuing and hosting nodes' WMI namespace;which I don't want to mess with;specially when the hosting fileserver is also my domain controller). Tag: Upload File to Web Folder via Web Dav Tag: 196149
  - 23
    - Runas I am new to scripting. I am trying to find out how I can preset the username and password of an admin account so that 2 pieces of software can be installed on our users devices with the Administrators needing to walk to every desk. Tag: Upload File to Web Folder via Web Dav Tag: 196145
  - 24
    - Run script on remote computer We have 10 Windows 2003 domains (1 root, 8 children, 1 grandchild) and 28 Windows 2003 Domain Controllers. company.com (2 DCs) childA.company.com (2 DCs) grandchildA.childA.company.com (4 DCs) childB.company.com (4 DCs) childC.company.com (4 DCs) childD.company.com (3 DCs) childE.company.com (3 DCs) childF.company.com (2 DCs) childG.company.com (2 DCs) childH.company.com (2 DCs) At the end of this message is a script called MasterScript. MasterScript causes each and every Domain Controller in the forest to locally run its own local copy of a second script called SlaveScript. I run MasterScript from my workstation, which is a member of ChildA.company.com, and I run it using Enterprise Admin credentials from the root domain (company.com). Everything works just fine except that in exactly 2 of the child domains (child C and child F) none of the 6 Domain Controllers will locally run their local copy of SlaveScript. When I locally log into each of the 6 problem Domain Controllers using the same Enterprise Admin credentials, I can manually run the local copy of SlaveScript and it works fine. So it seems that the childC and childF domains (or at least their DCs) are set to not allow remote script execution. What am I missing? ----------- MasterScript ------------------------- str_exeToRunRemotely = "WScript.exe " & Chr(34) & "C:\Program Files\EventLogArchive\SlaveScript" & Chr(34) For int_counterI = 1 To 28 ' Connect to WMI set obj_WMIService = GetObject("winmgmts://" & ary_str_DCs(int_counterI) & "/root/cimv2") ' Obtain the Win32_Process class of object. Set obj_process = obj_WMIService.Get("Win32_Process") Set obj_program = obj_process.Methods_("Create").InParameters.SpawnInstance_ obj_program.CommandLine = str_exeToRunRemotely ' Execute the program now at the command line. Set obj_shell = obj_WMIService.ExecMethod("Win32_Process", "Create", obj_program) Next ----------- MasterScript ------------------------- Tag: Upload File to Web Folder via Web Dav Tag: 196143
  - 25
    - find dile owned by user Hello I have a problem....on a file server I have to find all the file owned by user and put the list in a file, for example in a excel spreadsheet. I can use only a vbscript, I can't install software to do this task. But I'm a beginner on VBscript, so please can some one help me ? Thanks Luca Tag: Upload File to Web Folder via Web Dav Tag: 196133
- Next
  - 1
    - Datediff Hello, I have a problem implementing datediff function in script with the input from txt file, where the data is in the followingformat: 10:00 08:01 I need to subtruct the timelast-timeprev, where the timelast is the first line in the file and timeprev is the second line in the file. Here is the script: Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.OpenTextFile("c:\timerun.txt", 1) timeLast = objFile.Read(6) 'wscript.echo timeLast timePrev = objFile.Read(10) ' wscript.echo timePrev timeDiff= Round((DateDiff("n", timeprev, timelast)/60),2) 'timeDiff= (DateDiff("n", timeprev, timelast)/60) timeDiff2= DateDiff("n", timeprev, timelast) 'wscript.echo timeDiff If timeDiff2 < 60 then mytime =timediff2 InfoMB=MsgBox ("result:"&Space(1) &mytime &Space(1) &"minutid",vbInformation + vbOKCancel, "test") wscript.echo "result:" &Space(1) &mytime &Space(1) &"min" Do you have any suggestions? Thanks. Vitali. Tag: Upload File to Web Folder via Web Dav Tag: 196130
  - 2
    - Recycling web application Hi There, Is it possible to restart and application or recycle the application pool from within classic asp. I find the size of the application is becoming too big and cuases a large number of errors before it recycles itself. I do not want to set timed recycles but want to be able to do this from within code. Tag: Upload File to Web Folder via Web Dav Tag: 196127
  - 3
    - executing code on remote PC Hi, How can I execute the below code on a remote PC ? Set objWord = CreateObject("Word.Application") Set colTasks = objWord.Tasks For Each objTask in colTasks If objTask.Visible Then Wscript.Echo objTask.Name End If Next objWord.Quit Tag: Upload File to Web Folder via Web Dav Tag: 196125
  - 4
    - Rename Printers in Server 2000 hello, I have to rename printers . Its working fine on XP but on Windows 2000 Server i am having the error: C:\script\printerrename1.vbs(14, 5) Microsoft VBScript runtime error: Object doesn't support this property or method: 'objPrinter.RenamePrinter'. I have learnt that RenamePrinter is not compatible with Windows 2000 Server. Can you please suggest me some other ways of doing it: Here is the my script that i run strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colPrinters = objWMIService.ExecQuery _ ("Select * From Win32_Printer") For Each objPrinter in colPrinters If Left(objPrinter.DeviceID,22) = "Client\pailles_dom-nns" Then Wscript.Echo objPrinter.DeviceID Wscript.Echo Mid(objPrinter.DeviceID, InStrRev(objPrinter.DeviceID, "\") + 1) varprint= Mid(objPrinter.DeviceID, InStrRev(objPrinter.DeviceID, "\") + 1) objPrinter.RenamePrinter("hp LaserJet 1320 PCL 5e") END IF Next Thanks Nazeedah Tag: Upload File to Web Folder via Web Dav Tag: 196122
  - 5
    - Creating filters over results of an ASP page Hello everyone. i've been learning a lot here in the past few weeks, but unfortunately it's not enough for what i need now... Here it goes: I have an ASP script wich scans a given directory and returns information on the files inside it (name, type, size, date last mod, owner and author). Everything works fine, but now i need a new element on this - a way to filter the results. someone i know has told me something about recordsets, but all the info i can find is about connections with Access databases. so, i'd like to ask if there is a way to sort my problem out, and if you know any links or online documentation to do so. best regards and thanks in advance, ember Tag: Upload File to Web Folder via Web Dav Tag: 196111
  - 6
    - Adding a File menu in HTA I am a beginner with HTA and would like to display a simple html page and give the user 3 choices. Save.. Print Preview... Print... I know how to create the simple page.... can someone explain how I add a regular 'File' menu with the above options. Thanks, Charles W Tag: Upload File to Web Folder via Web Dav Tag: 196101
  - 7
    - Using User32.dll function from VBScript(WSH)!? Is there a way, to use a user32.dll function over Scripting Host in Visual basic Script? Greeting A.Gallus Tag: Upload File to Web Folder via Web Dav Tag: 196099
  - 8
    - Switch proxy (On/Off) I search for vbscript (or small utility) to switch IE proxy (On/Off) for the current connection (modem). Saku. Tag: Upload File to Web Folder via Web Dav Tag: 196098
  - 9
    - Find Replace On a Windows 98 machine I have space delimited files with a data string for each hour of the day. I want to use a vbscript to change the value in the 4th column to 9999 when the time stamp in the 2nd column is 0300 as in the 3rd row here. I'm not a programmer. JO 09030100 * 0.0266 * * * 82 * * * * * * 39 33 * * 5915 JO 09030200 * 0.0374 * * * 82 * * * * * * 81 90 * * 5913 JO 09030300 * 0.1378 * * * 82 * * * * * * 78 157 * * 5914 JO 09030400 * 0.0311 * * * 82 * * * * * * 65 210 * * 5915 Tag: Upload File to Web Folder via Web Dav Tag: 196096
  - 10
    - Raising Message Priority I am using the CDO.Message object to notify me of copy job results. These run every hour and are quite cumbersome to go through each day for 8 copy scenarios. Is there a property I can change to raise the priority of the email using vbScript? I have only been able to find examples of doing this thorugh .NET, which is not applicable for my environment. Thanks. Bart Perrier Tag: Upload File to Web Folder via Web Dav Tag: 196095
  - 11
    - Count items in outlook folders Hi... Is there any way to count items in an outlookfolder with a script. Please show me how. kindly Mariah Tag: Upload File to Web Folder via Web Dav Tag: 196086
  - 12
    - Script to cycle through the open IE windows Below is a vbs script (and also an au3 script) that I use to activate = the most recently active IE window. I run the vbs file with a Winkey = combo. It's a great convenience. I can jump back instantly to the last = IE window without having to reach for the mouse or use Alt+Tab. =20 What I would like to do is have a vbs script that will activate in = sequence all of the open IE windows. Let's say I have 10 windows of all = types open, and five of them are IE windows. Running the vbs file would = first activate one IE window, running it again would activate the next = IE window, and so on. This way I could have instant easy access just to = the IE windows without having to use Alt+Tab or other means that involve = all of the open windows. =20 Is this possible?=20 Thanks, Larry Option Explicit dim w With WScript.CreateObject("WScript.Shell") w =3D .AppActivate("Internet Explorer") End With In case this is not possible with WSH, here is an au3 script that also = activates the most recently activated IE window. Perhaps it could be = modified to do what I want. =20 AutoItSetOption ("WinTitleMatchMode", 2) If WinExists("Internet Explorer") Then WinActivate ("Internet Explorer", "") EndIf Tag: Upload File to Web Folder via Web Dav Tag: 196079
  - 13
    - how to wait for a objShell.Exec finish executing a command? I am creating a shell object to zip a file, then delete the source file, but the objFSO.DeleteFile(objFileName) is executing before the zip is done, and deleting the file before it can be zip; so i think. I am checking the error code for anything other than zero, and it looks like the file is getting zipped but the delete happens so fast i can't be sure where the problem is. Obviously if i comment the DeleteFile method i see the file get zip. Do i need to put some sort of Sleep/Wait variable in my script? B Tag: Upload File to Web Folder via Web Dav Tag: 196076
  - 14
    - Scanning VBScript for Unused Variables Is there an easy/free way to scan a large VBScript for unused variables? Visual Studio 2005 is supposed to have an autocorrect feature, but I can't find how to turn it on. Either that, or its always on and it just doesn't display anything for scripts. Thanks! -- Joseph Morales Tag: Upload File to Web Folder via Web Dav Tag: 196067
  - 15
    - vbscript delete files in a directory older than 30 days with 3 different extensions I'm sorta new to vbscript but am looking for a vbscript that will: 1.)Delete files in a single directory(and any subfolders below that which contain) 3 specific extensions and only delete these specific files that are 30 days or older. I've seen some that do either do all files in a directory and older than 30 days but not the criteria below. I would appreciate any help. Thanks Tag: Upload File to Web Folder via Web Dav Tag: 196066
  - 16
    - Split folder with a huge amount of files I have a folder with a huge amount of files. So i'd like to split this folder in several new folders with approximately 2000 files each (moving the files). Can i do this with a vbscript ? Robertico Tag: Upload File to Web Folder via Web Dav Tag: 196064
  - 17
    - running multiple instances of CSCRIPT to go through list of computers. Hello All, I have been searching far and wide for a solution to my problem. I'm not sure if I am using the proper terms here. I am fairly familiar with VBS. Here is the question. I would like my VBscript to start multiple instances of itself and go through a list of computers I provide. Basically something similar to this (http://www.mousetrax.com/Downloads.html "Domain Report Manager ") , but much simpler. I have spent the past couple of weeks breaking down his code and connecting bits and pieces, but I am pretty overwhelmed. I read through the documentation he put together, but it only elaborated on tracking the number of instances... not how to create them. I am sure it is something simple, I just can't see it. The script I have pieced together gathers the computer accounts from the domain... Pings them.. Then runs PSEXEC against the ones that are up. I just want to speed up the process. run like 15 threads at once.. I really appreciate any info you can give me or any resources you can point me too. I really want to learn how this works. Many Thanks, Ian Tag: Upload File to Web Folder via Web Dav Tag: 196060
  - 18
    - trouble in connecting with wmi accross NAT Dear all, this is my scenario I need to manage some servers in the remote offices. I have a cisco pix-firewall and also the remote networks have it. A remote server ( I will call it MYSERVER ) is reachabled with the Public address 81.81.81.43 (eg.) , on the inside lan MYSERVER adress is 192.x.x.x. ( ie a private address) so a Static NAT translates the ip to private and viceversa. my computer is in the inside lan with a private address and goes out with a public address like 82.83.84.56 (eg). the server is in the same domain as the mine. I'm an Enterprise Admin. If i try to connect to this server with a wmi script, for example using the ScriptomaticV2 tool, I can't get the data. But if I add to MYSERVER the ip alias 81.81.81.43 ( the same address with it is pubblished) i can get all data, but that's a terrible workaround!!! Wich is the best solution to avoid this kind of problem? Many thanks, Sergio Tag: Upload File to Web Folder via Web Dav Tag: 196055
  - 19
    - Binary Write method not working I have moved over some data from 2000 to SQL 2005. The data is the same, but now some existing working code is not working with the BinaryWrite method of Response.BinaryWrite. In a field in a table that is ntext. It contains HTML data tags. ie. <P><B>this is</B> etc... etc.. </P> Before moving to 2005 the following code worked (recordset setup correctly): dim mFieldSize, mBytes mFieldSize = rs.Fields("keywords").ActualSize mBytes = rs.Fields("keywords").GetChunk(mFieldSize) Response.BinaryWrite mBytes now with the data in 2005 I get this error: Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another. Is this a coding error, or a type error problem that I have to do differently with 2005? If anyone knows of the solution to this problem please let me know. Thanks *** Sent via Developersdex http://www.developersdex.com *** Tag: Upload File to Web Folder via Web Dav Tag: 196054
  - 20
    - bypassing 'File Open' dialog when calling an external program Group, I'm running the following command multiple times from a script while using Terminal Services on a series of Windows 2003 servers: objShell.Run "Robocopy \\Server1\3rdPartyApps E:\3rdParty *.* /e", 2, True The VB Script and Robocopy.exe files are located on a remote server. In 90% of the servers I'm prompted by a 'File Download' window asking if I want to 'Open' the Robocopy.exe file located on the remote server. If I select 'Open' the script runs without issue and the necessary files are copied. My question concerns a way to bypass or avoid being prompted each time I need to run this command. I assume this is a GPO or security setting? If so, is there a way to temporarily change this setting at the start of the script and change it back at the end? Any help would be appreciated. Tag: Upload File to Web Folder via Web Dav Tag: 196053
  - 21
    - Object variable or With block variable not set Hi I have a problem with following code: Set pProject = CreateObject ("SAAuto8SP1.ISWiProject") ' Dim pProject ' Set pProject = New SAAuto8SP1.ISWiProject When i run it i get : "Object variable or With block variable not set" I have found it is a bug on http://support.microsoft.com/?kbid=316478 but when i change this script and uncomment lines under it I get: Microsoft VBScript compilation error: Microsoft VBScript runtime error: Class not defined : 'SAAuto8SP1' Thanks for your help Tag: Upload File to Web Folder via Web Dav Tag: 196050
  - 22
    - Forum Hi, I want to create a forum with VB Script but i don't know how to save data to the Hosting server, can you help me ????? OMAR ABID Tag: Upload File to Web Folder via Web Dav Tag: 196046
  - 23
    - Single Application shell for windows Hi all, My vbscript is the following: strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2:Win32_Process") errResult = objWMIService.Create("C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe", "C:\Program Files\Adobe\Acrobat 7.0\Reader\", null) set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colProcesses = objWMIService.ExecNotificationQuery _ ("Select * FROM _InstancedeletionEvent " _ & "Within 1 Where TargetInstance ISA 'Win32_Process'") Do Until False = True Set objProcess = colProcesses.NextEvent If objProcess.TargetInstance.ProcessID = intPosID Then Exit Do End If Loop All I want to do is display Acorbat Reader as the shell instead of Explorer.exe which works fine. My problem is that I want the user to log off when he terminates Acrobat Reader. This script produces an error on line: 5 char: 1 Error: Not found. As is Acrobat Reader starts as the shell but the rest of the script doesn't work. Can anyone help me with this pls? Tag: Upload File to Web Folder via Web Dav Tag: 196045
  - 24
    - iNCLUDE LEADING ZEROS Hi all, How do I include the leading zeros in the date? YEAR(NOW) & MONTH(NOW) & DAY(NOW) & ".xls" Thanks gv Tag: Upload File to Web Folder via Web Dav Tag: 196034
  - 25
    - WMI to get the size of physical drive 0 I'm booting off of a WINPE CD and I need to find out the size of drive 0 before I format and restore my image to it. Anyone have anything that can accomplish this? Thanks Tag: Upload File to Web Folder via Web Dav Tag: 196027

Hi experts,

I' ve got a file which i have to upload to a Web Folder via https.
In Windows Explorer it's no problem to Drag drop a file to an
network storage but is it possible to realize this within an vbscript.

Thanks for any effort.

Top