Do not support HTML in textarea - on server-side

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
    - Help Splitting a String Can anyone help me please. I am trying to split a users homedrive which I input using the following code, the problem is I get an error when trying to split the name. I basically want to get the servername and the home drive share name as two seperate values so I can then use them seperatly. The Home drive is displayed as "\\Servername\Sharename$" username = "HJSimpson" Const ADS_PROPERTY_DELETE = 4 Const ADS_PROPERTY_APPEND = 3 'Open connection to AD using LDAP Set objCommand = CreateObject("ADODB.Command") Set objConnection = CreateObject("ADODB.Connection") objConnection.Provider = "ADsDSOObject" objConnection.Open "Active Directory Provider" objCommand.ActiveConnection = objConnection strBase = "<LDAP://dc=name,dc=name>" strFilter = "(&(objectCategory=person)(sAMAccountName=" & username & "))" strAttributes = "sAMAccountName,AdsPath,distinguishedName" strQuery = strBase & ";" & strFilter & ";" & strAttributes objCommand.CommandText = strQuery Set ADSIRecordSet = objCommand.Execute strName = ADSIRecordSet.Fields("sAMAccountName").Value errorNum = err.number errorDesc = err.description strAdsPath = ADSIRecordSet.Fields("AdsPath").Value strDN = ADSIRecordSet.Fields("distinguishedName").Value Set objUser = GetObject("LDAP://" & strDN) strDisplayName = objUser.displayname strDescription = objUser.description err.number = "0" Set usr = GetObject(strAdsPath) homedir = usr.homedirectory MsgBox homedir - This bit is OK a=Split(homedir,"\",-1,1) - This bit is not OK. If InStr(a, "\\") Then newservername = len(a,3) Else 'Do Nothing End If MsgBox newservername WScript.Quit: Please help. Thanks Tag: Do not support HTML in textarea - on server-side Tag: 211389
  - 2
    - Error 800A0046 with Shell.Run, but .Exec works Hello, I use VBScript to execute an application on a network drive. The script looks like this: <----------------- const cFolder = "S:\Apps\MyProg" const cPrg = "prg.exe" set oShell = CreateObject("WScript.Shell") with oShell .CurrentDirectory = cFolder call .Run(cFolder & "\" & cPrg) end with <----------------- With some users, this script fails executing "call .Run()" with error 800A0046 - Permission denied. If I replace "call .Run()" with "call .Exec()" using exact the same parameter, the same user can run the script without any problems. What is the difference between .Exec and .Run? Why does .Run fail sometimes? Thank you very much, Josef Tag: Do not support HTML in textarea - on server-side Tag: 211385
  - 3
    - Edit a txt file Dear All, Pls help, I have a text file which I need to edit. The script should search for a particular text using readline and then append a certain text to that line. The text file looks like blah blah blah blha blah happyb'day=gaurav blah blah It should look like this after modification blah blah blah blha blah happyb'day=gaurav,thanks blah blah P.S - The line # where "Happy'bday=gaurav" is not fixed. Pls help, I need to get going on this and even a little insight will be very helpful. Thanks in advance Gaurav Tag: Do not support HTML in textarea - on server-side Tag: 211380
  - 4
    - MS Office 2003 Author change Is there a way to change the author of documents created by word, excel, etc, so that it reflects the user that is logged in and not the organization? I would like to create a script so this is done automatically but it seems that UserInfo in the registry is encrypted. Is there a way around this or an additional key that can be entered? This is to prevent students from copying other student's work in an Office class. Tag: Do not support HTML in textarea - on server-side Tag: 211379
  - 5
    - Win2k3 > SP2 - Anything that can/will affect LDAP queries? Hi, Is there anything in SP2 for Windows Server 2003 that could affect LDAP queries that we currently have in place that anyone knows of? Thanks in advance. Tag: Do not support HTML in textarea - on server-side Tag: 211377
  - 6
    - Reading the + in Querystring Hi All, I have a querystring that contains the + sign as a separator, I need to read these values individually in a select statement, for example. &text=Single+205 where single is the type of room somebody wants and 205 is the user ID in the Customer table. Please help. Regards Simon Tag: Do not support HTML in textarea - on server-side Tag: 211373
  - 7
    - netobj.GetSystemInfo() in ASP/VBScript I am looking to find the IP address, MAC address, Windows Version etc. and ideally I want to know if some specific components are installed such as our plugin to WM Player. Is this possible in ASP? I know it is in .Net and in Javascript there is this function netobj.GetSystemInfo() How would I do this in plain ASP and/or ASP with vbscript? Thanx, -- Anil Gupte www.keeninc.net www.icinema.com Tag: Do not support HTML in textarea - on server-side Tag: 211372
  - 8
    - Change value of "Logon script" for all users to nothing Hi, I'm relatively new to VBScript. I have successfully written a couple of logon scripts for my company, with half-decent validation & program flow. I now need to deploy this, and remove the old batch logon script from users' account objects in AD. Having read some posts, I've seen suggestions ranging from: selecting multiple users in AD & selecting "Properties", then making the change (this doesn't work on either WinXP SP2 or Win 2000) to using LDIFDE to export the desired information, make the change, then re-import this data to update the schema. However, LDIFDE looks extremely complex & bug-prone - see http://support.microsoft.com/kb/555634. For example, this document suggests that blank values can't be used to set attributes, which ruins my plans. It also contains lots of caveats - by default, accounts are disabled, passwords set to NULL, "user must change password at next logon", etc, making for a very complex series of switches & arguements for performing any import. Is there no way of simply using VBScript to build a collection of user objects and loop through them, setting the desired value? Any suggestions would be greatly appreciated. Many thanks, Stevie "Normal is as normal does..." Tag: Do not support HTML in textarea - on server-side Tag: 211371
  - 9
    - passing a WMI collection value as a property Hi, Please Help ! I am trying to write a script that loads some counter details from a SQL table, executes a WMI query and then writes the results back to a SQL table. The script will loop through the counters that it loads. My problem is I run my WMI query set colsettings = objWMIService.ExecQuery("SELECT PercentProcessorTime FROM Win32_PerFormattedData_PerfOS_Processor where name = '_Total'). The actual query contains references to the recordsets returned from SQL server containing the counter details. For example "PercentProcessorTime" above is replaced with objCounterRecordSet.Fields.Item("WMIProperty") and also the WMI Class is replaced with a reference to the recordeset. I now have one element in the reurned collection which I have to loop through. For testing I am only trying to retrieve the value. For each objItem in colsettings wscript.echo objitem.PercentProcessorTime Next. The problem is I have several counters in my SQL table and am looping through them so I need to replace "PercentProcessorTime" above with which ever WMIClass parameter I happen to be working with and I cannot get this to work. I guess what I am trying to do is use the value in a recordset as a property for an object. Anybody got any ideas or am i trying to do something that cannot be achieved. Tag: Do not support HTML in textarea - on server-side Tag: 211369
  - 10
    - Problems creating an exchange mailbox and setting permissions Hi All, I hope someone can help. I am having problems accessing the Security Descriptor when creating a New User. It errors telling me an object is required with error 424. I have this working on other infrastructures the same as it is in this code and therefore can not understand why it is not working. The bit of the code which is failing is the Function to Create The Exchange Mailbox the rest is working fine. Here is the code --------------------------------------------------------------------------------------------------------------------------------------------------------------------- <HTML> <HEAD> <TITLE>New User Creation Utility</TITLE> <HTA:APPLICATION ID="oCreateAccount" APPLICATIONNAME="AccountCreationScript" BORDER="thin" CAPTION="yes" ICON="SETUP.ICO" SHOWINTASKBAR="yes" SINGLEINSTANCE="yes" SCROLL="NO" SYSMENU="yes" WINDOWSTATE="normal" MAXIMIZEBUTTON="no" MINIMIZEBUTTON="yes"> </HEAD> <style> BODY { background-color: "#E4EAF6"; font-family: Helvetica; font-size: 14pt; color: "#000080"; margin-top: 5%; margin-left: 5%; margin-right: 5%; margin-bottom: 5%; } </STYLE> <SCRIPT LANGUAGE="VBScript">  </SCRIPT> <BODY> <P ALIGN = center> <img src="C4.jpg" alt="C4"></P> <BR> <P ALIGN = center><STRONG>Welcome to the Account Creation Script</ STRONG></P> <table width="100%" border="0"> <tr><td><table width="100%" border="0"> <tr><th COLSPAN=2><hr>Users Details<hr></th></tr> <tr><td>First Name:</td><td><input type="text" id="txtFirstname" size="30"></td></tr> <tr><td>Middlename:</td><td><input type="text" id="txtMiddlename" size="30"></td></tr> <tr><td>Lastname:</td><td><input type="text" id="txtLastname" size="30"></td></tr> <tr><td>Reference Number:</td><td><input type="text" id="txtRefnumber" size="30"></td></tr> <tr><td>Requestor:</td><td><input type="text" id="txtRequestor" size="30"></td></tr> <tr><td>Please select the Account Type for this user account:</ td><td> <select name = "ListAccType"> <option value="AccTypeStart">Please Select</option> <option value="Standard User Account">Standard</option> <option value="Fixed Term Contract User Account">Fixed Term Contract</option> <option value="Non-Person User Account">Non-Person Account</ option> </select> </td></tr> </table> </td></tr> <tr><td> </td><td> </td></tr> <tr><td><P ALIGN = center><input type="button" id="btnRunScript" value="Create Account" onclick="btnRunScript_click"><input type="button" id="btnReset" value="Reset" onclick="btnReset_Click"><input type="button" id="btnClose" value="Close" onclick="window_close"></P></td></tr> <tr><td></tr></td> </table> </BODY> </HTML> --------------------------------------------------------------------------------------------------------------------------------------------------------------------- Many Thanks In Advance Tag: Do not support HTML in textarea - on server-side Tag: 211368
  - 11
    - kill process (I don't know the ID) hello ng how I can kill a process with a script. I don't know the ID. I know the name of the program: ttermpro.exe thanks Tag: Do not support HTML in textarea - on server-side Tag: 211366
  - 12
    - VBS for reading Message Table in dll file Hi Scripting Guys! I query the eventlog with the MS Log Parser. The output contains constants like %%2048. These constants stands for entries in the responding message table. For example the msobjs.dll contains the message table for the security eventlog. Does anyone has an example how to get the messages from the table with a vbscript? Thx! Marco Tag: Do not support HTML in textarea - on server-side Tag: 211365
  - 13
    - Language Bar Hello everybody, If anybody can point me to a piece of documentation regarding scripting language bar management (I need to add two languages (EN(Canada) and FR(Canada) and remove EN(US) and change French keyboard layout). Thanks in advance! -Alex Tag: Do not support HTML in textarea - on server-side Tag: 211361
  - 14
    - Script this - Configure ASP.NET to use specific version of .Net Fr I was reading the IIS documentation and I noticed it's possible to configure a website to use a specific version of the .Net framework. For example I have websites that use .Net 2.0 and 1.1 However I want to upgrade the 1.1 websites to 2.0 but I would like to do it via WMI or ADSI but I don't see any examples in the documentation, only a reference to using Aspnet_regiis.exe If anyone knows where I can find an example or if you would like to provide an example feel free to do so. Thanks in advance I am using Win2K3 servers Tag: Do not support HTML in textarea - on server-side Tag: 211358
  - 15
    - Disable DLL has been successfully registered? I am running a script to register a DLL and I was wondering if anyone knew a way to disable the message that the DLL has been registered successfully... does anyone know if there is a way to do that? Thanks Gavin... Tag: Do not support HTML in textarea - on server-side Tag: 211357
  - 16
    - resize IFrames How I can that? I use the following script: function adjustFrame(){ window.frames.IFrame1.scrollBy(0,250); currTop = window.frames.IFrame1.document.body.scrollHeight; if (currTop > 0) { currHeight = document.getElementById('dynFrame').getAttribute('height'); currHeight++; document.getElementById('dynFrame').setAttribute('height',currHeight); adjustFrame(); } } but the IE show error "Access Denied".... Tag: Do not support HTML in textarea - on server-side Tag: 211354
  - 17
    - Remove CRLF while using writeline Hi all, >From other posts I've got the code below to delete lines beginning with xyz (I've actually got about 5 different types so I loop it) and I've added the line to remove carrigage return and line feeds. However I can't remove the line feeds. Does write line always produce a CR so I need another method? Thanks, Ed strCheckForString5 = UCase("xyz") 'Remove line if begins with xyz Set objFS = CreateObject("Scripting.FileSystemObject") Set objTS = objFS.OpenTextFile(strFileName,1) strContents = objTS.ReadAll objTS.Close arrLines = Split(strContents, vbNewLine) Set objTS = objFS.OpenTextFile(strFileName,2) For Each strLine In arrLines If Not(Left(UCase(LTrim(strLine)),Len(strCheckForString1)) = strCheckForString1) Then strline = Replace(strline, vbCrLf, " ") objTS.WriteLine strLine End If Next Tag: Do not support HTML in textarea - on server-side Tag: 211353
  - 18
    - LDAP Question I am trying to create a script that will pull the logon user name then perform a LDAP query to find users homedrive and other attribut information. For example: Set objNet = CreateObject("WScript.NetWork") struser = ucase(objNet.username) Set objUser = GetObject("LDAP://CN=" & struser & ",OU=Users,DC=test,DC=com") strhdir = objUser.HomeDirectory msgbox(strhdir) But this does not work because the logon username is "JDDoe", but in order to get this to work I have to use "Doe\, John" in the cn to get this to work. Is there any way to automaticall convert the logon username to the cn name. Mike Tag: Do not support HTML in textarea - on server-side Tag: 211352
  - 19
    - Remotely shutting down a Vista PC. Is there a way to remotely shut down a Vista PC through a script? I have two PCs on my network. I run Windows Small Business Server 2003 on one PC and Vista Ultimate 64-bit on the other and the Vista PC is part of the SBS domain. I have a UPS that's managed by SBS. When the UPS is about to shutdown SBS when it's battery is low, the UPS management software has the option to run a batch file on SBS. I would like to invoke a script from the batch file to forcefully shutdown the Vista PC. How do I do this? Thanks. Tag: Do not support HTML in textarea - on server-side Tag: 211347
  - 20
    - File Copy with FSO I am doing a file copy using the FSO and have recently started seeing a condition being met. The copy job copies DB logfiles from one server to another but checks for the LastModifiedDate and if it is the same as well as the size of the file is the same, the script goes onto the next file. If the sourcefile is newer than the target file, it copies the sourcefile to the target location, overwriting the targetfile. However, I am also catching if the targetfile is newer than the sourcefile and this is where my problem is. I am finding a number of files where the targetFile's LastModifiedDate is more recent by 1 second. The Month, Day and Year are all the same, and not recent, but the time is 1 second newer. If targetFile is being modified by my script, I would expect the modified date to be more recent than it is -- the time of the copy. This exact script is running on a number of log files copy processes but this is the only one I am having this issue with. Has anyone seen this issue happen when doing file copies? Bart Perrier Tag: Do not support HTML in textarea - on server-side Tag: 211346
  - 21
    - EML file parser script does someone know how to make vbscript that will parse EML files stored in one folder: just search for specific sender name in 'From:' field and store this email separately. Regards, Santander Tag: Do not support HTML in textarea - on server-side Tag: 211343
  - 22
    - Disabled Account - [WP] I am looking for a vbscript. When we run that script it should disable the AD user account and remove the mailbox from it and if possible move the removed mailbox to a specific Storage Group? Any ideas. Thank you. Tag: Do not support HTML in textarea - on server-side Tag: 211342
  - 23
    - objComputer.UserName value is empty When running this script the objComputer.UserName value is empty Option Explicit Dim objWMIService, objComputer, colComputer, strComputer strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" _ & strComputer & "\root\cimv2") Set colComputer = objWMIService.ExecQuery _ ("Select * from Win32_ComputerSystem") For Each objComputer in colComputer Wscript.Echo objComputer.UserName & " is logged on" Next Tag: Do not support HTML in textarea - on server-side Tag: 211341
  - 24
    - Error when creating user with mailbox in script Hope someone can help here, and this is the right group :-) I have a periodic problem when creating mail-enabled users using a VBscript: -2147467259 - There is no Connection Agreement configured to export this recipient to the Exchange 5.5 server. I'm creating using Microsoft best practicies, descriped in this article: http://support.microsoft.com/kb/327079 If I try running the script several times it completes with sucess, but this is not a valid solution. The enviroment: Windows Server 2003 AD Exchange 2003 standard, SP2 Looking forward to hear from you, as this i a very critical issue for our solution. Best wishes Bo Berggreen Tag: Do not support HTML in textarea - on server-side Tag: 211339
  - 25
    - Why error 2147217904 expects parameter when parm is supplied? I'm at a loss why my code supplies the input parm and yet upon execution it complains about my first input parm called @AuditItem is not supplied. Please throw some light. Thanks Error: ado error 2147217904 expects parameter My stored proc PROCEDURE [dbo].[usp_Thresholds_GetStatus] ( @AuditItem varchar(50), @Variable varchar(250), @ServerValue varchar(250), @FoundFlag varchar(10) output , @OutputStatusCode varchar(2) output, @OutputPrecedingMessage varchar(250) output, @OutputMessage varchar(250) output ) My vbs code: Set objCon = CreateObject("ADODB.Connection") Set objCom = CreateObject("ADODB.Command") strConnection = "Provider=SQLOLEDB.1;Password=password@1;Persist Security Info=false;User ID=xxxtReader;Initial Catalog=mydbt;Data Source=mysqlserver" On Error resume next objCon.Open strConnection If Err.Number <> 0 Then Wscript.Echo " Attempt to open connection to database failed" Wscript.Echo Err.Number & " " & Err.Description Err.Clear End If 'assigning the command object parameters Set objCom.ActiveConnection = objCon objCom.CommandText = "usp_Thresholds_GetStatus" objCom.CommandType = adCmdStoredProc 'Create in/out parameters Set objInputAuditItemParm = objCom.CreateParameter("@AuditItem", adVarChar, adParamInput, 50, trim(InputAuditItem)) Set objInputVariableParm = objCom.CreateParameter("@variable", adVarChar, adParamInput, 250, trim(InputVariable)) Set objInputServerValue = objCom.CreateParameter("@ServerValue", adVarChar, adParamInput, 250, trim(InputServerValue)) Set objOutputFoundFlag = objCom.CreateParameter("@FoundFlag", adVarChar, adParamOutput, 10) Set objOutputStatusCode = objCom.CreateParameter("@OutputStatusCode", advarChar, adParamOutput, 2) Set objOutputPrecedingMessage = objCom.CreateParameter("@OutputPrecedingMessage", adVarChar, adParamOutput, 250) Set objOutputMessage = objCom.CreateParameter("@OutputMessage", adVarChar, adParamOutput, 250) 'Append the parameters to command object objCom.Parameters.Append objInputAuditItemParm objCom.Parameters.Append objInputVariableParm objCom.Parameters.Append objInputServerValue objCom.Parameters.Append objOutputFoundFlag objCom.Parameters.Append objOutputStatusCode objCom.Parameters.Append objOutputPrecedingMessage objCom.Parameters.Append objOutputMessage on error resume next objCom.Execute if err <> 0 then Wscript.Echo "Attempt to execute stored proc usp_Thresholds_GetStatus failed" Wscript.Echo Err.Number & " " & Err.Description Err.Clear end if 'retrieve the Output parameters values WScript.Echo "Output Found flag: " & objOutputFoundFlag.value WScript.Echo "Output Message... " WScript.Echo objOutputMessage.value WScript.Echo objOutputStatusCode.value Tag: Do not support HTML in textarea - on server-side Tag: 211324
- Next
  - 1
    - I need a script (pref VB) to change permissions on a folder in multiple folders. I need a script (pref VB) to change permissions on a folder in multiple folders. Example, imagine users home directory, so a folder contains all the users. Each user has a folder inside their home directory called 'examples'. I need a script to search for that folder inside each users home directory and change the permissions to 'read, list folder contents' Can this be done? This is not being done on users home directories but this was the best example I could give. Or imagine their are 10 folders named 1 to 10. inside each folder are 5 folders named A,B,C,D and E. I want a script to search for the folder named 'D' and change the permission on that folder only. Tag: Do not support HTML in textarea - on server-side Tag: 211319
  - 2
    - UserAccounts.CommonDialog alternative for Vista? I sell an application that supports vbscript in it's forms, and on some I use UserAccounts.CommonDialog to display a File Open dialog so a user can select a filename. On Vista, this functionality is not available. My question: is there an alternative for Vista that does not require distributing any additional controls? Some background info: My searches so far revealed that the following alternatives are available, none of them are very appealing -Using MSComDlg.CommonDialog, which requires installing the Common Dialog control, which is subject to licensing -Using SAFRCFileDlg.FileSave, which also requires installing an additional control, and which is deprecated and not originally intended for use in scripting in the first place. -Using Choose File HTML File Control Object, a workaround that (ab)uses IE, that I find inventive but very ugly.. tia, arno Tag: Do not support HTML in textarea - on server-side Tag: 211315
  - 3
    - inverse line fichier hello J want to inverse the line of a fichier do you know, how do this please thank you Tag: Do not support HTML in textarea - on server-side Tag: 211314
  - 4
    - Troubleshooting an attempt to open connection I need some help with troubleshooting. When I execute my vbs script in a DOS environment it runs OK. But when it is called by an asp calling client, it does not work and does not indicate why. I put some tracing statements to find out where it errored and it echoes Point1 and Point2 but never reaches Point 2A. So I guess the open connection must have failed. 1. What should I do to handle a connection error? On error resume next seems strange... 2. Is my connection open statement incorrect? What should it be? 3. Again I'm confused when all players are vbs scripts, it runs OK. When an asp client calls it, it simply does not work. Thanks Set objTHoldCon = CreateObject("ADODB.Connection") Set objTHoldCom = CreateObject("ADODB.Command") WScript.Echo "Point1" 'Opening the connection objTHoldCon.Open "audit","sa","password" WScript.Echo "Point2" 'assigning the command object parameters Set objTHoldCom.ActiveConnection = objTHoldCon objTHoldCom.CommandText = "usp_Thresholds_GetStatus" objTHoldCom.CommandType = adCmdStoredProc WScript.Echo "StatusHelper Point2a" Tag: Do not support HTML in textarea - on server-side Tag: 211301
  - 5
    - I am looking for an HTA exit code function like wscript.quit() I have moved to using HTA scripts but I can't figure out how to send an exit code back to the calling app. In vbscript I was able to do this with wscript. quit(code). This function will not work in HTA. Is there a way to pass the exit code back from an HTA? Thanks Tag: Do not support HTML in textarea - on server-side Tag: 211298
  - 6
    - What VBScript interpreters are available? ... If I create some simple VBScripts that only do file I/O and manipulation in a text editor, what do I need to execute them? Is there some kind of simple interpreter or run-time environment I can download from Microsoft? Thanks again! Chris http://amateureconblog.blogspot.com/ Tag: Do not support HTML in textarea - on server-side Tag: 211286
  - 7
    - Newbie needs some recommendations ... Hello everyone, I'm new to this group. ;-) I used a bit of VB "back in the day" (VB 3, 4, and 6), but I'm somewhat out of practice. ;-) I'm beginning to use a testing tool that has VBScript as its built-in scripting language. Can you recommend a good VBScript book or web site(s)? Are there any good tutorials or language references available as PDFs? All advice appreciated ... Thanks very much in advance! Chris http://amateureconblog.blogspot.com/ Tag: Do not support HTML in textarea - on server-side Tag: 211285
  - 8
    - RegEx question I have a problem parsing "first.lastnamer@calif.usa.mycompany.com" into seperate domain parts. I've tried using "\w*(?x)" but it generates an error in VB. I need the domain parts for the logic in my script, can someone help with this? Thanks, Scott Tag: Do not support HTML in textarea - on server-side Tag: 211282
  - 9
    - HTA Exit Code Hello, I have been using the wscript.Exit() in my vbscripts for some time to return the status of my scripts to the calling app. I have started using HTA and I can not figure out how to get the same funtionality. With out a return code to my calling app my HTA app is of no use to me. I have done some searching and found that the object used for Wscript.exit can't be used in HTA but there has to be a way to set an exit code. Please help :( Thanks in advance. Tag: Do not support HTML in textarea - on server-side Tag: 211272
  - 10
    - HP Desktop for sale! Hi, I have an unused HP Pavilion with the fallowing specs: # Processor: AMD Athlon 64 X2 4000+ (2.1GHz, 2000MT/s System Bus) # Memory: 2048MB PC2-5300 DDR2 SDRAM memory (2x1GB) (expandable to 8 GB (4 x 2 GB) (64-bit OS)/ 4 GB (4 x 1 GB) (32-bit OS)) # Hard Drive:320GB 7200RPM SATA 3G (3.0 Gb/sec) hard drive # Optical Drive: 16X DVD(+/-)R/RW 12X RAM (+/-)R DL LightScribe SATA drive # Expandable Drive Bay: HP Pocket Media Drive bay # Video Graphics: Integrated graphics # Network Interface: Integrated 10/100BaseT network interface # Sound: High Definition 8-channel audio # Fax/Modem: 56K bps data/fax modem # Operating System: Genuine Windows Vista® Home Premium This is "used" but basically brand new (it has literally been on for no more than 6 total hours..) is only 1 month old.. PRICE: $425 OBO Email- pbdude911@yahoo.com Tag: Do not support HTML in textarea - on server-side Tag: 211268
  - 11
    - Watch NFL Games Online Watch NFL Games Online! For every one who wants to watch the games online because they dont live in the teams town or are at work i found a site that has basically every game covered. Its perfect if you have afford a monthly $70 direct tv nfl access subscription. they got a bunch of channels The sites http://nflonline.wizhoo.com Tag: Do not support HTML in textarea - on server-side Tag: 211267
  - 12
    - Fatloss computer program I have been using this computer program for a couple weeks now and i am very pleased with the results so far. its a software fatloss program, if your looking for a diet/weightloss plan i reccomend you check this place out first: http://fatloss9.50webs.com Tag: Do not support HTML in textarea - on server-side Tag: 211266
  - 13
    - scheduled tasks Hi All, I have a vbscript that has 2 command line parameters It runs fine from the shortcut or "Run" with the command line myscript.vbs para1 para2 However, when I put it in the Scheduled Tasks, it does not work. To make it work I have to put "...\wscript.exe ..\myscript.vbs para1 para2 Is there any way to avoid having to use "wscript" ? Thanks al Tag: Do not support HTML in textarea - on server-side Tag: 211261
  - 14
    - Error while using impersonation to manage a service remotely This script worked last week, and now it doesn't. I don't know what has changed, but I know the script hasn't changed. The portion that's failing can be run alone: -=-=-=- Set oService = GetObject("WinMgmts:{impersonationLevel=impersonate}!\ \SERVERNAME\root\cimv2:Win32_Service.Name='SERVICENAME") oService.stopService -=-=-=- I'm running it as privileged admin, the same way I ran it last week when it worked. Now it gives me a dialog box titled "Windows Script Host" with this data: Script: [path to script] Line: 3 Char: 1 Error: A security package specific error occured. Code: 80070721 Source: (null) Tag: Do not support HTML in textarea - on server-side Tag: 211257
  - 15
    - change file type... hey, guys and gals. i'm in the process of compiling a script that pulls some info on users in active directory, change the resulting logfile from a csv to an xls spreadsheet, and then mine more data using a different search method based on the results of the first query. i have the query parts working, but it craps out when i try to change the file type. did i mention that i know just enough vb to annoy you experts? thanks in advance. early on in the script, i define the logfile: ' Determine local path. strScriptPath = Wscript.ScriptFullName strScriptName = Wscript.ScriptName strScriptFolder = Left(strScriptPath, Len(strScriptPath) _ - Len(strScriptName) - 1) ' Log file name. strLogFile = strScriptFolder & "\ContractorsLastLogons" _ & Right("0" & Month(Now), 2) & Right("0" & Day(Now), 2) & ".csv" ' Setup log file. Set objFSO = CreateObject("Scripting.FileSystemObject") Set TextFile = objFSO.OpenTextFile(strLogFile, 8, True, 0) then here's my attempt to change the file: ' Change file extension from csv to xls strComputer = "." Path = strScriptFolder Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root \cimv2") Set colFiles = objWMIService.ExecQuery _ ("ASSOCIATORS OF {Win32_Directory.Name= & strScriptFolder &} Where " _ & "ResultClass = CIM_DataFile") For Each objFile In colFiles strExtension = strLogFile.Extension strExtension = Replace(strExtension, "csv", "xls") strNewName = strScriptFolder & strLogFile.FileName & "." & strExtension errResult = strLogFile.Rename(strNewName) Next Tag: Do not support HTML in textarea - on server-side Tag: 211251
  - 16
    - Secure FTP We have vbscript to download files from FTP site and it works well. What different code I should use to download files from Secure FTP site? Thanks. Tag: Do not support HTML in textarea - on server-side Tag: 211242
  - 17
    - AD Attributes and their usage I am trying to determine how each of the following four Active Directory user attributes (Listed below) are used and any possible negative consequnces on such a change. I have an Oracle to HR Sync program I have written and we are now passing the display name to AD and obviously it isn't that simple. I have had some success going through MSDN but I'm hoping someone might have a complete definition of each of their uses. Right now I don't see an issue of syncing the four attributes up so they all are equivalent. Anybody who is familiar with these attributes please provide any and all feedback. displayName displayNamePrintable cn name Thanks for your time -- Paul Bergson MVP - Directory Services MCT, MCSE, MCSA, Security+, BS CSci 2003, 2000 (Early Achiever), NT http://www.pbbergs.com Please no e-mails, any questions should be posted in the NewsGroup This posting is provided "AS IS" with no warranties, and confers no rights. Tag: Do not support HTML in textarea - on server-side Tag: 211235
  - 18
    - Windows explorer folder options I have a list of file extensions that I need to enable the "confirm open after download" & "always show extension" options on. the list is about 50 extensions and I need to set this on approx 100 W2k3 servers in the domain (2 are standalone). this is a labor intensive task perform manually in the in the folder options > file types > extension > advanced(edit file type) dialog. I have tried locating the info in the registry and have not had much luck. any idaes on how to script this to run on a standalone machine and in a domain? Tag: Do not support HTML in textarea - on server-side Tag: 211233
  - 19
    - WMI objects, objects properties, functions and methods Hi all I apologize for my ignorance but I am fairly new to using WMI in scripts (or VBA). I was just wondering if I could find a list of the WMI objects available, their properties, functions and methods. I have some basic info from lrnwmi.chm but need far more to get on. Any ideas as to where I could find such information? Thanks in advance for your help Cordially Pascal Tag: Do not support HTML in textarea - on server-side Tag: 211230
  - 20
    - API's not WebServices?? Hello All, I wanted to send sales order created by my website to my client's ERP system which is Desktop application. My client is going to provide API's for that but I would like to know how these two will communicate as their is no use of web services. Or anybody tell me how API's communicate in such situtation's or tell me what is internal architecture of API's(is their any protocol??). Thanks, Tag: Do not support HTML in textarea - on server-side Tag: 211229
  - 21
    - How to Update PDF file properties in the window systems using VBSc How to update the PDF file properties using vbscript with the PDF writer? I have a large number of PDF documents with incorrect Author, Title, subject and keywords. I would like to update it using VBScript, with or without a pdf writer installed. Tag: Do not support HTML in textarea - on server-side Tag: 211227
  - 22
    - Encapsulating Objects in Objects? I have an AppHandler class that I want to encapsulate other handler classes (GuiHandler, WmiHandler, etc.) as public properties of the object, so they can be used like this: Set oApp = new AppHandler oApp.NetworkHandler.PingIp sIp AppHandler, when created, would dynamically load and create the encapsulated objects. The concept works fine when applied to something like the native FileSystemObject: Dim oApp: Set oApp = new AppHandler If ( oApp.FileHandler.FileExists("network_handler.class.vbs") ) Then MsgBox("It works!") End If where FileHandler above is a public variable set in the Class_Initialize method: Set FileHandler = CreateObject ("Scripting.FileSystemObject") But in trying to extend this concept to my own classes, I'm running into problems. The following works (add_module dynamically loads the file using ExecuteGlobal): Dim oApp: Set oApp = new AppHandler oApp.add_module("network_handler.class.vbs") Set oApp.NetworkHandler = new NetworkHandler But if I try to internalize this within a public Load method that calls this private method: Private Sub m_load_network_handler add_module(m_nh_path) Set NetworkHandler = New NetworkHandler NetworkHandler.debug = debug NetworkHandler.print_d("NetworkHandler child object loaded") End Sub I get an error: "Class Not Defined: NetworkHandler". I've tried a few workarounds, but nothing has succeeded yet and they tend to lead me away from my original concept. Can someone point out my error to me? Is there a scoping issue with ExecuteGlobal being used inside a private method? Thanks, Tom Tag: Do not support HTML in textarea - on server-side Tag: 211224
  - 23
    - How To Update File properties How can I update the file properties under the window file systems? I can find the method GetDetailsof under Shell.Application.Namespace to retrieve the file properties, but I can't find the method to update it. Tag: Do not support HTML in textarea - on server-side Tag: 211222
  - 24
    - ACLing the MSMQ Hi all, I wrote a script that creates a private Message Queue but I am having a problem giving an individual user full access permissions to this Queue. I looked it up online and I haven't had much success as far as non C++ and C# exists (http://msdn2.microsoft.com/en-us/library/ms706138.aspx) Does anyone know how I can do this? I am somewhat new to scripting but I can kind of understand code by looking at it and I am pretty good at working "Cut and Paste Magic" Thanks in advance! Jim Tag: Do not support HTML in textarea - on server-side Tag: 211213
  - 25
    - vbscript, how to define font I have a script that sends an e-mail upon completion. I was hoping to define different font values (color, bold etc...) and quite frankly don't know how. Can anyone point me in the right direction? A tutorial site or something? Thanks, Jeff Tag: Do not support HTML in textarea - on server-side Tag: 211211

Hi,
I have a textarea and I would like to prevent users from inserting
HTML tags. Only plain text is supported.
Which server-side vbscript regular expression is best for this?
Thanks, Gabi

Top

Re: Do not support HTML in textarea - on server-side by Anthony

Anthony
Wed Oct 24 07:52:43 PDT 2007

"Gabriella" <frohlinger@yahoo.com> wrote in message
news:1193223722.942106.287890@q3g2000prf.googlegroups.com...
> Hi,
> I have a textarea and I would like to prevent users from inserting
> HTML tags. Only plain text is supported.
> Which server-side vbscript regular expression is best for this?
> Thanks, Gabi
>

Do you allow them to enter an ampersand (&)?

Personally I prefer to protect the outgoing mechanism. Never include user
entered data in generated HTML without using Server.HTMLEncode. That way if
the user enters "<script>code to delete all your files</script>" then thats
what they end up seeing.

--
Anthony Jones - MVP ASP/ASP.NET

Top