win32_print* on clusters

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
    - detect occurrence of two words in a text with regexp Hi, I'm searching for a pattern allowing to detect if a text has occurrence of two words (say word1 and word2), consecutive or not. I don't want a logical OR where (word1)|(word2) would be the solution. I want the two words being simultaneously in the text. So the text could be "some words word1 some other words word2 or word1word2 or word1 word2" I accept to not detect word2 being before word1 like word1...word2...word2...word1 I almost found a pattern with : re.global=true (word1)\s*(word2)|(word1)(\s+\w+)+\s+(word2) and why not be more complex with testing word1 and word2 being at the beginning of words like word1abc and word2xyz so the pattern will be (word1\w*)\s*(word2\w*)|(word1\w*)(\s+\w+)+\s+(word2\w*) If I dump the matchcol, I find each word1 and word2 listed but the matchcol.count doesn't give the right number of (word1, word2) pair occurrence. That's because the expression word1 words word2 words word1 words word2 is counted for one single occurrence as if it was : word1 (all words including word1 and word2 ignored) word2 Only the first word1 and the last word2 are taken into account. But the returned submatch content is word1 words word2 words word1 words word2 so any word1 and word2 is catched. I get also the same result with : (word1)(\s\w+)*\s*(word2) So I'm happy to know the two words are in the text but I can't use the result for replacing the words because I don't know where they are. Since I want to change the color of word1 and word2 in red, I must know the exact location. Is there any other way? or I must use the following process : - detect the presence of the two words (wherever they are) - do a re.replace(text, "word1", "<font fontcolor=red>word1<font> - do the same with word2 Thanks for any help Tag: win32_print* on clusters Tag: 139834
  - 2
    - Using queried date to serach for data I'm having a problem with my asp pages. I have the first page set up to search for data by date and shift. The dates are retrieved by a query of all dates that are in the database, meaning that if a date has no data, then that date will not show up in the select box. The shift is a simple select box with three options in it. When I hit submit, if there's a date that has the same shift as another date, the date and the data from that date that posted first will show up, even if I selected another date. Here's the code below and do you all have any ideas how this might be happening and ways to correct it. Thanks for any help I can get. First Page <% 'Sets up the connection between the page and the database Set Connection = Server.CreateObject("ADODB.Connection") Connection.Mode = 3 dbDir = Server.MapPath("fpdb/sacshifttest.mdb") Connection.Open "DBQ=" & dbDir &"; Driver={Microsoft Access Driver (*.mdb)}; DriverID=25;FIL=MS Access;" 'Queries for the data from that day SQLStmt = "SELECT DISTINCT dateRecord FROM SacShiftTest " Set RS = Connection.Execute(SQLStmt) %> .. <td><select name="dateRecord"> <% do while not RS.EOF daDate = RS.Fields("dateRecord").Value%> <option value="dateRecord"><% = daDate %> <% RS.MoveNext Loop %> <% Connection.close %> Next Page: <% dateRecord = Replace(Request("dateRecord"), "'", "''") sacShift = Replace(Request("sacShift"), "'", "''") 'Sets up the connection to the database Set Connection = Server.CreateObject("ADODB.Connection") Connection.Mode = 3 dbDir = Server.MapPath("fpdb/sacshifttest.mdb") Connection.Open "DBQ=" & dbDir &"; Driver={Microsoft Access Driver (*.mdb)}; DriverID=25;FIL=MS Access;" SQLStmt1 = "SELECT * FROM SacShiftTest WHERE dateRecord = " & dateRecord & " AND sacShift='" & sacShift & "' AND testnum='1' " Set RS1 = Connection.Execute(SQLStmt1) %> -- Posted via http://dbforums.com Tag: win32_print* on clusters Tag: 139827
  - 3
    - nt 4 user list I need to generate a list of every user in their domain, and the home directory listed for each user. This is a (large) Windows NT 4.0 domain. Thanks, Jay Tag: win32_print* on clusters Tag: 139824
  - 4
    - Formatting or inserting breaks into Textarea using innerHTML AAAAARRRGGGHHHHHHH!!!!!!!!!!!!!!!! Sorry, but thats how much I was frustrated when I could not get a simple thing to work on a static html page using javascript. I just wanted to insert a line break into the textarea dynamically. Here is the piece of code that will not work... but will give you a "unknown runtime error". If you remove the "<br>"s, it will work. <html> <head> <script language="JavaScript"> function writeText() { document.all.myTextArea.innerHTML = "Hello<br>" + "sometext" + "<br>Hello"; //THIS WONT WORK EITHER: //document.all.myTextArea.innerHTML = // "Hello\n" + "sometext" + "\nHello"; } </script> </head> <body> <table> <tr><td id="mytd"><textarea id="myTextArea"></textarea></td></tr> <tr><td><input type="submit" name="submit" value="submit" onClick="writeText();"/></td></tr> </table> </body> </html> But Internet Explorer did not like it. I visited a lot of newsgroups and tried different things. I've tried replacing line breaks ("\n") with <br>s and what not... but we wont go into it. What I am trying to say here is that I could not find a way to format the text inside a text area. After hours of research, I just ended up doing something like this... which by the way occured to me when I was finishing up my Dominos pineapple pizza. The workaround was to include the whole textarea inside the javascript and write them into the TD using the innerHTML of the TD at runtime. I sincerely hope that this will help someone solve a similar issue and save them a lot of trouble. ========= SOLUTION: ========= Here is the code that I came up with to work around this situation... //THIS IS THE WORKAROUND: (result is the id of TD, so you are basically inserting html that CONTAINS the textarea into the TD instead of writing text to the textarea. i.e., you are writing the whole textarea into the TD at runtime) <html> <head> <script language="JavaScript"> function writeText() { var rslt; rslt = "<textarea id=\"myTextArea\">"; rslt += "Hello\n" + "sometext" + "\nHello"; document.all.mytd.innerHTML = rslt + "</textarea>"; } </script> </head> <body> <table> <tr><td id="mytd"> <textarea id="myTextArea"></textarea> </td></tr> <tr><td><input type="submit" name="submit" value="submit" onClick="writeText();"/></td></tr> </table> </body> </html> GOOD LUCK!!! You are welcome. Jawad Shaik Mohammed Stryker Instruments Kalamazoo, MI Ph: (269) 323-7700 x3500 Tag: win32_print* on clusters Tag: 139812
  - 5
    - georgian date I need to generate a georgian(julian ) date. How do I do this? Tag: win32_print* on clusters Tag: 139802
  - 6
    - Learnig VB Script Hello, I´am a good VB 6 programer and now I will learn differences between VB and VBS. Has somebody a good tip for a book or internet based learning? THX Thomas mailto:twohlgemuth@hilcom-online.de Tag: win32_print* on clusters Tag: 139800
  - 7
    - rename active directory user account Hi, how can I rename an active directory user account with vbscript? Thanks Rolf Tag: win32_print* on clusters Tag: 139799
  - 8
    - Looking for resources/archives of vb scripts? Hello, Could someone direct me to some comprehensive vb archives on the web? Just trolling for some scripts that may be of use:-) TIA Tag: win32_print* on clusters Tag: 139798
  - 9
    - Newbie question: GetObject & CreateObject hi, i want to execute this wmi code on an html page: Set objComputerSystem = GetObject("winmgmts:{impersonationLevel=impersonate}!root/cimv2").ExecQuery( "select * from Win32_ComputerSystem") For Each instanceComputerSystem In objComputerSystem Manufacturer = Trim(instanceComputerSystem.Manufacturer) Model = Trim(instanceComputerSystem.Model) ComputerName = Trim(instanceComputerSystem.Caption) RAM = CLng(((instanceComputerSystem.TotalPhysicalMemory) / 1024) / 1024) User = instanceComputerSystem.UserName User = Mid(User, InStr(1, User, "\") + 1, Len(User)) Next Set objComputerSystem = Nothing but of course i got an error (activeX component can not get an object) i tried with createobject, i changed security parameters but with no results. any idea please ? Javier Tag: win32_print* on clusters Tag: 139794
  - 10
    - How to manage the "system" user Hi guys, I need to move the system user to a custom xp local group. I tried the normal method that applies to any ordinary local users but it does not seems to work. I had a look at MS technet site but found nothing regarding this issue. Does anybody know how to deal with this user ? Any help is appreciated ! Thanx Bar Tag: win32_print* on clusters Tag: 139788
  - 11
    - Split domain from email add Hi, I need to extract the domain from any email address entered into my form. e.g. for someone@somewhere.com i want to be able to take the string and extract only the somewhere.com part to pass into a function. Can anyone please advise me of the best way to do this. Thanks in advance, Nev. Tag: win32_print* on clusters Tag: 139779
  - 12
    - newbie question I have a task that is due soon. My question is: i have to copy certain files from nt 4 wks to a network share, then copy them back from the network share to the new workstation that will be xp. is there anything i need to worry about or be considered about? thanks for you help Thomas Tag: win32_print* on clusters Tag: 139776
  - 13
    - trouble with process wscript.exe Hi, I have a big problem when i run my vbs script on several server (not all server). My script is automaticaly run every 1 hour. When i m looking in task manager, the process wscript.exe appear around 300 times ! So sometime the server crashs if i don't kill any process 'wscript.exe'. I enable the option "kill the script" about 600 second elapsed. Why this problem appear ? Please have you an idea ? Thanks in advance Arnaud Tag: win32_print* on clusters Tag: 139775
  - 14
    - starting executable in login script I want to run an executable from a .vbs login script that starts up our virusscanner installation/update. What is the correct syntax to run an executable from this script? Thx. Tag: win32_print* on clusters Tag: 139774
  - 15
    - Dazed and Confused.... Hi. I'm using an Access 2002 DB and ASP. For the purposes of this post, the simplied SQL statement in question is: UPDATE dbtable SET status=" & xstat (xstat is yes/no) The exact same code works just fine on at least a dozen different servers in the US. It's part of a common function I use all the time. I have a client in Brazil . When they run this code their server throws an error... Microsoft JET Database Engine erro '80040e10' Nenhum valor foi fornecido para um ou mais parâmetros necessários. (No value given for one or more necessary parameters) BUT, I'm 100% certain that the field names and types are correct, and as I said above, this code works fine on many servers in the US If I hardcode: UPDATE dbtable SET status=True... it works fine. If I hardcode: xstat=True SQLx="UPDATE dbtable SET status=" & xstat response.write SQLx The code fails with the error I mentioned... and the SQLx string looks like: UPDATE dbtable SET status =Verdadeiro (which means True in Brazilian) Go figure. Any ideas what I must do to have the Engine/database recognize the foreign language equivalent of True? Tim -- Posted via http://dbforums.com Tag: win32_print* on clusters Tag: 139763
  - 16
    - Delete A File Using VBScript? I have a script (that I got from this group, thank you for this) that creats an Excel file from my an SQL statement. The problem is if the file already exists, it errors off. I would like to do just a 'blind' delete of the file so the Create doesn't error off. Is there a way delete a file in VBScript? Thanks Chris Tag: win32_print* on clusters Tag: 139757
  - 17
    - Multithreading with script control? Hi all, I am developing a multi-threaded server-application in VB. (How this? I am using a C++ service that is instantiating VB-Objects on different threads...) I need to add scripting to my application. I am currently using the Script Control. Are there any issues running this control (which is not placed on a form but only created as an object instead) on several threads? Is it possible to implement the IActiveScriptSite interface in VB? I could not find a type library where this is defined. Thanks very much for your help! Matthias Moetje Tag: win32_print* on clusters Tag: 139756
  - 18
    - Insert a line into a Txt file I want to be able to read a text file and find the line that reads: "Domain"="" Once found, I want to insert a line below it that reads: MTU=800 How do you write this in VB? Tag: win32_print* on clusters Tag: 139746
  - 19
    - Scripts for explorer and desktop settings? Hello, Does anyone know where i can find a script to set Windows Explorer>Tools>Folder Options> General Tab & View Tab to select the following boxes: General>Active Desktop>Use Windows classic desktop General>Web View>Use Windows classic folders General>Browse Folders>Open each folder in same window General>Click Items as Follows>Single-click to open an item/underline icon titles consistent with my browser View>Files and Folders> * Display compressed files and folders with alternate color * Display the full path in the address bar * Display the full path in title bar * Show Hidden files and folders * Launch folder windows in a seperate process * Show file attributes in detail view In addition I'm looking for a script to set * the auto arrange desktop icons option on/off * "Show small icons in start menu" ? * set the screen resolution to 800x600 with "True Color" 32bit * display large font sizes from the display properties>advanced tab TIA -- \\||// (@@) Pardon the intrusion... __ooO_()_Ooo_____________________________ _|_____|_____|_____|_____|_____|_____|___ ___|_____|_____|_____|_____|_____|_____|_ _|_____|_____|_____|_____|_____|_____|___ .oooO Oooo. ( ) ( ) \ ( ) / \_) (_/ Tag: win32_print* on clusters Tag: 139745
  - 20
    - Corporate Disclaimer I started out trying to follow through a Microsoft Knowledge Base article 317680 "How To: Add a disclaiamer to Outgoing SMTP Message in Visual Bacic Script I got it to work sending a test disclaimer. But I don't know how to write a "Sample disclaimer added in VBScript." This is from: <SCRIPT LANGUAGE="VBScript"> Sub ISMTPOnArrival_OnArrival(ByVal Msg, EventStatus) TextDisclaimer = vbCrLf & "DISCLAIMER:" & vbCrLf & "Sample Disclaimer added in a VBScript." HTMLDisclaimer = "<p></p><p>DISCLAIMER:<br>Sample Disclaimer added in a VBScript." If Msg.HTMLBody <> "" Then 'Search for the "</body>" tag and insert our discliamer before that tag. pos = InStr(1, Msg.HTMLBody, "</body>", vbTextCompare) szPartI = Left(Msg.HTMLBody, pos - 1) szPartII = Right(Msg.HTMLBody, Len(Msg.HTMLBody) - (pos - 1)) Msg.HTMLBody = szPartI + HTMLDisclaimer + szPartII Msg.TextBody = Msg.TextBody & vbCrLf & TextDisclaimer & vbCrLf Else Msg.TextBody = Msg.TextBody & vbCrLf & TextDisclaimer & vbCrLf End If 'Commit the content changes to the transport ADO Stream object. Msg.DataSource.Save ' Commit the changes into the transport Stream pEventStatus = cdoRunNextSink End Sub </SCRIPT> I've started reading up on WSH and cscript but not making any specific progress. Just a lot of error messages. Any help or maybe the name of a good beginner book would be great. Tag: win32_print* on clusters Tag: 139736
  - 21
    - validate what option is selected How do u retrieve (for clientside validation)what option is selected in a drop down list. I have spent all week trying to find out. Why are all the code examples in my script editor in jscript? Can i get a version that gives its examples in vbscript? Could you also tell me the best place to get axamples for vbscript because there arent any at ms site.(If there is they didnt want anyone to find them.) Tag: win32_print* on clusters Tag: 139730
  - 22
    - What was selected ? <h5>The reason I've spent all weekend trying to find out how to store what someone selects in this form is:</h5> <select size="1" name="Reason" id="HelpMe" onchange = "HelpMePlease"> <option>The code examples in the help files are not in vbscript</option> <option>Someone up there hates me</option> <option>I really need to get a life</option> </select> <script language = "vbscript">  </script> Tag: win32_print* on clusters Tag: 139729
  - 23
    - Reading serial of CDROM remotely Hi, I am moving a cataloging application currently in VB6 to a web based ASP.NET application. The first problem that I have though is how do I read the serial number of the currently loaded CD remotely? Any help would be appreciated. Thanks, John Tag: win32_print* on clusters Tag: 139726
  - 24
    - Loop Hi, When iterating through database, which loop statement is the best?Because if i use "while...wend" it will give me error when it reaches EOF and terminates with giving error even if i use "While rs.eof=false" at the top of the loop...any other better way... "if...then..else" also doesnt help much... TIA Tag: win32_print* on clusters Tag: 139723
  - 25
    - A script for formating hard drive Is anyone knows the script for formating hard disk??? if it is, is that can be run on Win2k Pro. and Win2k Ser. ???? Tag: win32_print* on clusters Tag: 139715
- Next
  - 1
    - Newbie ASP db question Hi All, I am learning database connectivity within ASP. I have the following code but keep getting the error shown below. --------------<snip>------------------- Set dcnDB = Server.CreateObject("ADODB.Connection") dcnDB.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDatabaseLocation dcnDB.Open strSQL = "SELECT * FROM Current ORDER BY NewsItem" Set rsQuery = dcnDB.Execute(strSQL) Do While Not rsQuery.EOF response.write rsQuery("NewsItem") & "<br>" & rsQuery("Source") & "<br><br>" Loop --------------<end snip>---------------- Error Type: (0x80004005) Unspecified error The error is with 'Set rsQuery = dcnDB.Execute(strSQL)'. The database is a very simple Access 2000 file. It has 4 tables; Current, Hold, National and International. Each table has 2 fields. NewsItem and Source. All the manuals I have say that it is right. Is there something special I have to do with the Access database file in Access to make it compatible or something? Any help would be muchly appreciated. Cheers, Bill. Tag: win32_print* on clusters Tag: 139710
  - 2
    - Deleting table rows at runtime Hi, I have a table that looks much like an inbox on most sites with the first column having a checkbox and other columns containing data. I want to delete those rows where the checkbox is checked at the client-side itself. I've tried looping through the table body elements to check the state of each checkbox but haven't been able to make it work. Anybody has any suggestions how this would work? Thanks, Saranjit Tag: win32_print* on clusters Tag: 139699
  - 3
    - change select style Hi I need to change a <select style to multiple. I know how to change it's style (document.FormName.SElectName.style=) but I dont know how to change it to multiple . Thanks Tag: win32_print* on clusters Tag: 139693
  - 4
    - error on Windows NT 4.0 server I receive this error when trying to run a script on an NT 4.0 server: ActiveX component can't create object: 'CDO.Message' Is there an update I need to download and install on the server? Here's my code: sArgument = WScript.Arguments(0) Set objEmail = CreateObject("CDO.Message") objEmail.From = server@domain.com objEmail.To = uuser@domain.com objEmail.Subject = "my subject " & now() objEmail.Textbody = "my text " & sArgument & " on " & now() & "." objEmail.Configuration.Fields.Item _ ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objEmail.Configuration.Fields.Item _ ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _ "nafepncsebe6.nr.ad.newellco.com" objEmail.Configuration.Fields.Item _ ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 objEmail.Configuration.Fields.Update objEmail.Send Any help would be appreciated. -- Posted 'as is'. If there are any spelling and/or grammar mistakes, they were a direct result of my fingers and brain not being synchronized or my lack of caffeine. Mike Tag: win32_print* on clusters Tag: 139657
  - 5
    - adrpt.vbs,adexport.vbs,adlogconvert.vbs I need to get these sample scripts, supposed to be in site server package however I cannot open any part of site server to find these scripts. Any help would be appreciated! Tag: win32_print* on clusters Tag: 139655
  - 6
    - Creating Exchange 5.5 Mailboxes via VBScript I have this script that I will use to create mailboxes and so far it works really well. The only problem I have is adding attributes like City, State, Zip etc. Where can I find what Exchange directory calls them? For example the LDAP attribute for Address field is actually postalAddress. I have full access to the Exchange 5.5 server. Another question is now when we create mailboxes through the Admin program it creates an NS record for us. But the script does not do that. Any ideas on how to do that through this script? Here is the script: 'createmailbox.vbs Const ADS_RIGHT_EXCH_MODIFY_USER_ATT = 2 Const ADS_RIGHT_EXCH_MAIL_SEND_AS = 8 Const ADS_RIGHT_EXCH_MAIL_RECEIVE_AS = 16 Const ADS_SID_WINNT_PATH = 5 Const ADS_SID_HEXSTRING = 1 Dim objMailbox, objContainer, strServer Dim strAlias, strMTA, strMDB, strSMTPAddr, strDisplayName Dim objSid, strSidHex, strComputer, strSite, strOrg Dim objComputer, strUserID, strDomain Dim objSec, objSD, objDACL, objAce strServer = "SERVER" strSite = "Site" strDomain = "Domain" strDisplayName = "Username" strSMTPAddr = "user@rfsamericas.com" strAlias = "Alias" strUserID = "UserID" 'NT UserName strAddress = "Address" strCity = "City" Set objComputer = GetObject("LDAP://" & strServer) 'get the organization strOrg = objComputer.o 'get the recipients container for the site Set objContainer = GetObject("LDAP://" & strServer & "/CN=Recipients,OU=" & strSite & ",o=" & strOrg) 'get the SID for the account to be associated with the new mailbox Set objSid = CreateObject("ADsSID") objSid.SetAs ADS_SID_WINNT_PATH, "WinNT://" & strDomain & "/" & strUserID strSidHex = objSid.GetAs(ADS_SID_HEXSTRING) 'create a new MailBox Set objMailbox = objContainer.create("organizationalPerson", "cn=" & strAlias) 'set display name and alias objMailbox.Put "postalAddress", strAddress objMailbox.Put "mailPreferenceOption", 0 objMailbox.Put "cn", strDisplayName objMailbox.Put "uid", strAlias objMailbox.Put "Home-MTA", _ "cn=Microsoft MTA,cn=" & strServer & ",cn=Servers,cn=Configuration,ou=" _ & strSite & ",o=" & strOrg objMailbox.Put "Home-MDB", _ "cn=Microsoft Private MDB,cn=" & strServer & _ ",cn=Servers,cn=Configuration,ou=" _ & strSite & ",o=" & strOrg objMailbox.Put "MAPI-Recipient", True 'objMailbox.Put "rfc822Mailbox", strSMTPAddr objMailbox.rfc822Mailbox = strSMTPAddr objMailbox.Put "textEncodedORaddress", _ "c=US;a= ;p=" & strSite & ";o=" & strOrg & ";s=" & strAlias objMailbox.textEncodedORaddress = _ "c=US;a= ;p=" & strSite & ";o=" & strOrg & ";s=" & strAlias objMailbox.Put "Assoc-NT-Account", strSidHex objMailbox.SetInfo 'create security objects Set objSec = CreateObject("ADsSecurity") Set objAce = CreateObject("AccessControlEntry") Set objSD = objSec.GetSecurityDescriptor("LDAP://" & strServer & _ "/CN=Recipients,OU=" & strSite & ",o=" & strOrg) Set objDACL = objSD.DiscretionaryAcl objAce.Trustee = strDomain & "\" & strUserID objAce.AccessMask = ADS_RIGHT_EXCH_MODIFY_USER_ATT Or _ ADS_RIGHT_EXCH_MAIL_SEND_AS Or _ ADS_RIGHT_EXCH_MAIL_RECEIVE_AS objAce.AceType = ADS_ACETYPE_ACCESS_ALLOWED objDACL.AddAce objAce objSD.DiscretionaryAcl = objDACL objSec.SetSecurityDescriptor objSD Tag: win32_print* on clusters Tag: 139654
  - 7
    - Better / Difference JavaScript, VBScript - OT Discussion and observation Is there just some things that JavaScript can do that VBScript cannot do ? Vice versa? Or are there some things that one is just flat out better for than the other ? And within one web page, or asp page, can both be used and mixed or must a page/asp page be one or the other. I really dont want to take the time to learn both, since I am coding for myself only, and I can usually tell by looking at code from either whats going on. Just wondering if one is better than the other, and if one will be "unsupported" in any future time. Thanks! Jim Tag: win32_print* on clusters Tag: 139647
  - 8
    - how to pass a variable from closing WIndow When one window is closing to opening another, such as; herf.location = "next.htm" how to pass a variable to the next page from closing one. Thanks in advance. ----------------------------------------- Osamu Terao Email: hag83950@ams.odn.ne.jp ----------------------------------------- Tag: win32_print* on clusters Tag: 139635
  - 9
    - Querying SSL expiry dates Hi All, Does anyone know a way of querying the certicate store to return a list of expiry dates for the SSL certifcates held within it? I am attempting to come up with a way of e- mailing a warning a couple of weeks before a cert expires but as yet have found little or no info on getting this information. I have found the blob entries in the registry for the certs and when looking at the right column of the key you can see the expiry dates listed, however how would you convert a binary key from the registry to process the info...... It's all a blurr.... Any help would be appreciated. Many thanks, Aaron Tag: win32_print* on clusters Tag: 139624
  - 10
    - How do I do "For Each ... " minus one ? How would you go about doing a For Each loop but only for all the items in the array minus one ? ie. (arrBasket is "Apple, Banana, Pear, Peach") For Each varFruit In arrBasket Msgbox varFruit Next So I want all the fruit apart from the Peach at the end... cheers, Steve PS. I'm not doing a grocery script :¬) Tag: win32_print* on clusters Tag: 139621
  - 11
    - OE Newsgroups writing script question This is a multi-part message in MIME format. ------=_NextPart_000_0026_01C3529B.532E0800 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Okay, maybe I really should be asking here and should be in an OE group = or such. But I figure it makes the most sense since if anyone would = know if would be fellow scripters. When I type a script in OE for the newsgroups, when I type the = following: ("\\servername\sharename"), OE automatically changes it to = (\\servername\sharename) so then I have to readd the beginning and end quote. Why is it doing = that. How do I stop it. Sometimes I miss that it does it and it = obviously messes up the script. It also does it when I do LDAP: etc. = Any thought.=20 --=20 --=20 Regardless of whether my signature is long or short, I still welcome = e-mails if you know my address but won't post it. But on the positive = side, I don't try and impress by quoting others. --=20 ------=_NextPart_000_0026_01C3529B.532E0800 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <META content=3D"MSHTML 6.00.2800.1106" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>Okay, maybe I really should be asking = here and=20 should be in an OE group or such.  But I figure it makes the most = sense=20 since if anyone would know if would be fellow scripters.</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>When I type a script in OE for the = newsgroups, when=20 I type the following:</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>("<A=20 href=3D"file://\\servername\sharename">\\servername\sharename</A>"), OE=20 automatically changes it to (<A=20 href=3D"file://\\servername\sharename">\\servername\sharename</A>)</FONT>= </DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>so then I have to readd the beginning = and end=20 quote.  Why is it doing that.  How do I stop it.  = Sometimes I=20 miss that it does it and it obviously messes up the script.  = It also=20 does it when I do LDAP: etc.  Any thought.</FONT> </DIV> <DIV><FONT face=3DArial size=3D2><BR>-- <BR>-- <BR>Regardless of whether = my=20 signature is long or short,  I still welcome e-mails if you know my = address=20 but won't post it.  But on the positive side, I don't try and = impress by=20 quoting others.<BR>-- <BR></FONT></DIV></BODY></HTML> ------=_NextPart_000_0026_01C3529B.532E0800-- Tag: win32_print* on clusters Tag: 139615
  - 12
    - pass a variable I know it's possible and probably very simple, but I'm not sure how to do it. I want to call a vbs file from a batch (.bat or .cmd) file and pass it a simple 4 digit number to be used when setting the subject line of an e-mail that the vbs file will send. How do I go about doing this? -- Posted 'as is'. If there are any spelling and/or grammar mistakes, they were a direct result of my fingers and brain not being synchronized or my lack of caffeine. Mike Tag: win32_print* on clusters Tag: 139604
  - 13
    - Copying Hi, I need a script, which you can copy a folder and subfolders and files from the server to a client user everytime, when he connect to the network or log on or log off. Could you please help? Thank you very much!!!!! Luciano Tag: win32_print* on clusters Tag: 139595
  - 14
    - Determine Printer Port Description I have a server that has IP printers installed on it, along with LPT, serial etc. I would like a programmatic to determine what the port type each printer is using. For example, if I open up the printer properties of a printer and click on the ports tab, I see all installed ports with a port description. I was wondering if there was a programmatic way to determine that description. Tag: win32_print* on clusters Tag: 139593
  - 15
    - Table Hi, I am reading data frm database and looking fw to display them in a table(not in html <table>) but sth like grid..so that i could identify the column header uniquly to insert the data to the "location" tht i want... i idea?or excellent resource that i can refer to? TIA Tag: win32_print* on clusters Tag: 139587
  - 16
    - Howto: Run startup script once Hi How do I run a startup script just one time. If I use the RunOnce registry key I'm required to login (which I'm not interested in). Is there another reg key that I can use ? Regards, Jesper Tag: win32_print* on clusters Tag: 139584
  - 17
    - Internet / Intranet Hello, We are creating a favourites list for users of our INTRANET. In this regard we should be able to distinguish if anyone is adding an intranet / internet site since we cannot monitor internet sites. Does anyone have any ideas how we can find out if a URL from IE is an intranet address or an Internet address without using any configuration files ? Any help is appreciated. regards, Pratibha Tag: win32_print* on clusters Tag: 139576
  - 18
    - Formatting columns in spreadsheet object Formatting columns in spreadsheet object Hi, Appended is a simple spreadsheet object I am creating in classic asp. I would like to make the spreadsheet appear more attractive on the we page. Now, I'm sure I can format the columns to make the spreadsheet look pretty but I am having great difficulty finding documentation that I can understand*. What I am looking for is instruction on how to do simple things lik emake column "I" appear as a date, how to make the spreadsheet autosize itself when the page loads so that the user does not have to drag the spreadsheet's corner, how to make column "D" appear as currency, how to make the columns align right, left, or center. Simple things like that. Can someone point me in the right direction? Thanks, --Terry *** <html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:x="urn:schemas-microsoft-com:office:excel" xmlns="-//W3C//DTD HTML 4.0//EN"> <body onload="fnLoadData()"> <object id="Spreadsheet1" classid="CLSID:0002E510-0000- 0000-C000-000000000046"> </object> </body> <script language=VBScript> Sub fnLoadData() With Spreadsheet1 .Cells.Clear .TitleBar.Caption = "Filter Inventory View" .DataType = "HTMLURL" .HTMLURL = "FilterInventoryResultSet.asp?RoomID=<% =intRoomID%>" .Range("A:K").AutoFitColumns .Range("A:K").AutoFilter .Range("A1:K1").Font.Bold = True End With End Sub </script> </html> *For instance, I have been plowing through msdn articles (like http://msdn.microsoft.com/library/default.asp? url=/library/en-us/vbaxl10/html/xlprofiltermode.asp ) and going around in circles never finding just what I need. To reply directly replace msdn . com with msn .com. Tag: win32_print* on clusters Tag: 139573
  - 19
    - Having trouble either writing to a file or opening file. I created this script. Before I had a problem assigning the variable gpgcmd but someone on this board helped me with this. Now I get the right value in my variable but my program (gpg) is having a problem writing to the file outfile with the filename being tempname2. Any help wold be appreciated. Below is a sample of my script. ' create a unique temp file name Set tempFso = CreateObject("Scripting.FileSystemObject") tempname = tempFso.GetTempName Set tempFso = Nothing Set temp2Fso = CreateObject("Scripting.FileSystemObject") tempname2 = temp2Fso.GetTempName Set temp2Fso = Nothing 'Create Text File and give it temp name SET objFso = CreateObject ("Scripting.FileSystemObject") set infile = objFso.CreateTextFile(tempname, 8, true) 'Create Text File and give it temp name SET obj2Fso = CreateObject ("Scripting.FileSystemObject") set outfile = obj2Fso.CreateTextFile(tempname2, 8, true) infile.write "Place Text Here" infile.close gpgcmd = "c:\\gnupg\\gpg -a -r UserName --encrypt -o " & tempname2 & " " & tempname set wshShell = CreateObject("WScript.Shell") wshShell.Run gpgcmd ,1,false set wshShell=Nothing Tag: win32_print* on clusters Tag: 139555
  - 20
    - FSO I am tring to rename a file using FSO, but i do not see any command to do this. Can someone help? Thanks Frank Tag: win32_print* on clusters Tag: 139546
  - 21
    - Add rows of data to existing Word table? I have a template document, with the beginnings of a table in it (just the headers). I now need to read data from a textfile and add that as rows to the existing table. I have figured out how to create a new table, using ConvertToTable, but since the table is already there, I was hoping there was something that might work almost as easily with this need. So, I can get the data out of the tab delimted textfile and into an internal variable use the FileSystemObject.File.ReadAll method. Now that it's there, how can I add those row(s) to the table? Thanks for any thoughts, suggestions or directions. Larry Tag: win32_print* on clusters Tag: 139536
  - 22
    - Sub Vs. Function Still new (but learning): I understand the explained difference but, is there a conventional wisdom regarding their use? I tend to use only functions whether or not I need a return value ......... -- Ratty Tag: win32_print* on clusters Tag: 139533
  - 23
    - mouseover i dont know if im in the right place with this question. if not then let me know which forum i should go to. id like to write a script based on a mouseover command which allows the user to hover over a picture on a webpage and a small box pops up over the pic stating certain information gotten from a database. the user can either click or hover and that box should pop up. ive tried this in access, but it only supports 40 queries. i have about 100 - 200 different boxes iwant to pop up and this isn't supported by access. can i achieve this through vbscript? -- Posted via http://dbforums.com Tag: win32_print* on clusters Tag: 139531
  - 24
    - Alias for User Profile Directory Is there an alias for the Documents and Settings folder in Win2k? In our logon scripts we want to copy a folder to the local user's profile but some users have machines that were upgraded from NT4 so their profile is stored in \Winnt\Profiles where as the Win2k machines are in \Documents and Settings\. I'm looking for an alias like %USERNAME% that I can use in a batch file. Is there such an alias? Mike Tag: win32_print* on clusters Tag: 139519
  - 25
    - Deleting old files only? Hello, Can someone help me on how to write a script that will delete all files of a given type in a given folder older than a given date. Any help would be greatly appreciated! Thanks in advance. Tag: win32_print* on clusters Tag: 139516

Hi there,

It seems that the win32_printer and win32_printjob classes are not directly
available on clusters. So what approach should be used in enumerating those
instances on clustered printservers?

Thanks,

--
SLE

Top