Code Check

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
    - Drill Down Fields on a table Hi I have a table, which is bound to a database, how would I go about, making fields in one column, so that I can drill down on them. For example, I have a column of Groups, and I wish to click on a group and see the members in that group. Any ideas would be much appreciated. -- Kind Regards Rikesh (V.InterDev6.0-SP5/W2K-SP4/SQL2K-SP3) Tag: Code Check Tag: 158626
  - 2
    - rename a folder Hi, I try to rename a folder and I can't. on error resume next dim fso dim fldr set fso=createobject("scripting.filesystemObject") Set fldr = fso.GetFolder("C:\test") fldr.Name = "C:\test1" it's not work! If I put this after the line: fldr.Name = "C:\test1" if err.number > 0 then msgbox "error" end if the msgbox appear. The name of the folder don't change. Why doesn't work? an another way to rename a folder? thank Dany Tag: Code Check Tag: 158621
  - 3
    - Tech Forums www.technutz.com It is new and free so post it up Tag: Code Check Tag: 158618
  - 4
    - read o.s. and Office version I would find a script in order to achieve the o.s. version and the MS Office programs and version installed. How can I do? Thanks Sandrobi Tag: Code Check Tag: 158617
  - 5
    - Simple question Hi I want to add a wait/delay wihtin a loop for 30 sec, i know how you do this in windows scripting with wscript.sleep but how do you do in VB6 ?? /PE Tag: Code Check Tag: 158615
  - 6
    - Running WMI scripts asynchrnously Hey all, I'm running a simple WMI query (straight out of scriptomatic!!)against the network which outputs to excel. Everything works great for the most part, First problem: some machines are still having issues with permissions and or connectivity (network path not found, but I can ping it). But that's not the problem, when my script hits one of those machines even with On Error Resume Next the script freezes. Also for more info...if I run an independent script against these boxes it freezes also when trying to connect to WMI Any suggestions?? Second problem is that we currently have over 3000 machines and running this script takes almost 3-4 hours. Can anyone point me in the right direction to learn how to run this script asynchrnously. Thanks in advance for the assist. Larry Tag: Code Check Tag: 158614
  - 7
    - Error: 8007045d when using CDONTS Hi there I am getting the following error when using the objMail.Send property of CDONTS error '8007045d admin/SendNewsletter.asp, line 28 It is happening to several applications on this server. So far I have not found a resolution. Any help appreciated Tag: Code Check Tag: 158612
  - 8
    - Trying to fill MARQUEE from database Hello! I try to fill my MARQUEE text from one MEMO-record from database. However the 'spaces' in my db-text are converted to 1-space as soon as i put them as text in my ASP page..... Must i make a conversion routine converting these database spaces to ' '? Or is there a simple other way to do all this? Friendly greetings, André Groeneveld Tag: Code Check Tag: 158609
  - 9
    - Can I use a server function and a client funtion in a button click Event? I want use the serverside Function a and client sub Button1_onclick together when the button1 is clicked,can I do this Thank The following is the code <%@ language = vbscript % >< Function dim cn,cmd,rs .................... End functio %><Script language=vbscript sub button1_oncli end su </script><html ....... <input id=button1 type=button name =button1 ....... <Html> Tag: Code Check Tag: 158604
  - 10
    - Listing IE Settings Is there a way to list and modify IE proxy settings? In particular the Automatic Configuration Script Setting I Have found a way to list and set Proxy settings as far as server and port but not the Automatic config script Any help would be greatly appreciated Thanks In Advance for your help. Tag: Code Check Tag: 158601
  - 11
    - Adding to group Hi i need a script to add a domain group to the local admin group cheers ste Tag: Code Check Tag: 158598
  - 12
    - Problem when running a VBScript in a .CMD file Hi all ! I have this strange problem regarding running a VBScript in a .CMD file. The problem does not exist if I run the script on the command line. Here is what I do: --------------------- Option Explicit Dim WSHShell, Args, i, Strng Set WSHShell = CreateObject("WScript.Shell") Set Args = WScript.Arguments For i = 0 to Args.Count - 1 WScript.StdOut.Write Args(i) Next WScript.Quit --------------------- Then i run it with the following command: cscript /nologo /b rawout.vbs "Søren" (as you can see I'm from Denmark). The result is: Søren But when I run it from a .CMD file the result is: S°ren The problem seems to be with the characters æøå ! Does anyone know why ?. And how can I correct this ? I run WinXP English version SP1 Thanks in advance ;-) My regards Søren Tag: Code Check Tag: 158596
  - 13
    - Text Parsing Help Parsing newbie here - I've perused this newsgroup and also msdn and have been unable to piece together a solution. I have a logfile of Servers that looks like this: System information for \\DS02K2: Uptime: 67 days 6 hours 39 minutes 23 seconds Kernel version: Microsoft Windows NT, Uniprocessor Free Product type: Workstation Product version: 4.0 Service pack: 6 Kernel build number: 1381 Registered organization: Org Registered owner: Owner Install date: 12/1/2000, 1:07:12 PM Activation status: Not applicable IE version: 5.0100 System root: C:\WINNT Processors: 1 Processor speed: 600 MHz Processor type: Intel Pentium III Physical memory: 128 MB Video driver: ATI Technologies Inc. 3D RAGE IIC System information for \\DS01K2: Uptime: 6 days 8 hours 16 minutes 44 seconds Kernel version: Microsoft Windows NT, Uniprocessor Free Product type: Server Product version: 4.0 Service pack: 6 Kernel build number: 1381 Registered organization: Org Registered owner: Owner Install date: 5/25/2001, 1:18:09 PM Activation status: Not applicable IE version: 6.0000 System root: C:\WINNT Processors: 1 Processor speed: 865 MHz Processor type: Intel Pentium III Physical memory: 382 MB Video driver: Matrox Graphics Marvel G200 I need to parse this logfile and return Servername and Processor Speed ONLY. I've tried SkipLine in a For Next loop to take me down to the Processor Speed line but haven't been able to get that to function properly. So far I have something like this: Const ForReading = 1 Set objFSO = CreateObject("Scripting.FileSystemObject") Set objTextFile = objFSO.OpenTextFile("c:\log\srvinfolog.txt", _ ForReading) Do strLinetoParse = objTextFile.ReadLine dtmServerName = Mid(strLinetoParse, 26, 15) Wscript.Echo "Server: " & dtmServerName dtmProcessorSpeed = Mid(strLinetoParse, 28, 10) wscript.Echo "Speed: " & dtmProcessorSpeed Loop until objTextFile.atEndofStream objTextFile.Close Thanks for any help you can provide - this will be a valuable learning exercise and answered question that won't be repeated. Tag: Code Check Tag: 158594
  - 14
    - DNS Settings Hi I am trying to enumerate the DNS IP Addresses on a local computer, but am having trouble in do so. I can set new DNS primary or secondary DNS address, but can't get the current setting. Can anyone help with this Thanks Scott Tag: Code Check Tag: 158593
  - 15
    - Swapping Variables (without a temp variable) Normally at work whenever we want to swap the value of two variables, we use code similar to the following: Dim TempVar TempVar = VariableX VariableX = VariableY VariableY = TempVar Is there anything out there that will do this in an elegant, one-line approach? e.g.: Swap(VariableX,VariableY) I realize you could probably build a function easy enough but I don't want to recreate the wheel if I don't have to. Cheers, Scott Tag: Code Check Tag: 158592
  - 16
    - Email attachment problems I have a script to email a backup log once per day. The script runs fine, but the attachment has problems. If there is a period (.) in the body of the attachment, anything after that is screwed up. Any idea why a period would be causing such a problem? And is there a fix? I can always write code to replace the (.) with something else if need be. Here is what the attachment should look like: <--- begin attachment content---> Backup Status Operation: Backup Active backup destination: File Media name: "dans.bkf created 5/26/2004 at 10:55 AM" Backup (via shadow copy) of "C: " Backup set #1 on media #1 Backup description: "Daily" Media name: "dans.bkf created 5/26/2004 at 10:55 AM" Backup Type: Normal Backup started on 5/26/2004 at 10:55 AM. Backup completed on 5/26/2004 at 10:55 AM. Directories: 6 Files: 21 Bytes: 61,855,252 Time: 10 seconds ---------------------- <--- end attachment content---> But here is what I get: <--- begin attachment content---> Backup Status Operation: Backup Active backup destination: File Media name: "dans???? ??????? ????????? ?? ????? ????????????? ???? ?????? ????? ?? ??? ????????? ??? ?? ?? ????? ?????????? ???????????? ?????????????? ????? ????? ?.bkf created 5/26/2004 at 10:55 AM" Backup Type: Normal Backup started on 5/26/2004 at 10:55 AM????????? ????????? ?? ????????? ?? ????? ???. Directories: 6 Files: 21 Bytes: 61,855,252 Time: 10 seconds ---------------------- ? <--- end attachment content---> Here is my code: MAIL_FROM = "user@domain.com" MAIL_TO = "me@domain.com" MAIL_SUBJECT = "Backup for morning of: " & date MAIL_SERVER = "10.1.1.4" LOG_FILE = "C:\NTBackup\logs\backup.txt" Set objEmail = CreateObject("CDO.Message") objEmail.From = MAIL_FROM objEmail.To = MAIL_TO objEmail.Subject = MAIL_SUBJECT objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = MAIL_SERVER objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 objEmail.AddAttachment LOG_FILE objEmail.Configuration.Fields.Update objEmail.Send Thanks, Dan -- __o _-\<, (_)/(_)____ Tag: Code Check Tag: 158591
  - 17
    - Automating Internet Explorer toolbar actions Is it possible to use vbscript to start Internet Explorer and tell it to delete everything in the Temporary Internet Folder? Specifically, I would like to automate "Tools" -> "Internet Options..." -> "Delete Files..." -> "OK". I know how to do: Set objIE = CreateObject( "InternetExplorer.Application" ) objIE.Navigate Do Until objIE.ReadyState = 4 WScript.Sleep 500 Loop But I have no idea how to automatically click on the appropriate menu items and buttons with vbscript. Thanks in advance to all who respond, Leslie Tag: Code Check Tag: 158586
  - 18
    - resize window Hi How can i resize my window ? kind regards Jan Coucke Tag: Code Check Tag: 158580
  - 19
    - link to window hi, on my new website i would like to open a popup which i did with succes. now my question is; is it possible to control the window where i have opened my popup ? for example i open my popup, i click on a link in my popup and the window should go to another link & my popup should close kind regards Jan Coucke Tag: Code Check Tag: 158579
  - 20
    - Printing out of VBS? Hello everybody, is this question stupid? Is it possible to print a .txt File out of VBS? I did not find any method for that purpose nor a description for such a routine. Any ideas? Thanks for reading Ole Tag: Code Check Tag: 158573
  - 21
    - vbscript to produce Word document Does anybody have any experience of providing a web page with a submit button which transfers the contents of an HTML table to a client side VBscript which creates a Word document & populates a Word table? I can do this for Excel, but doing it for Word is proving more problematic. Thanks in advance. Tag: Code Check Tag: 158570
  - 22
    - Right click with vbscript? Hi! I need a script to continuously right click and press "f". Is it possible? Thanks Tag: Code Check Tag: 158566
  - 23
    - Accessing database on Internet Hello friends I do have a web application built on ASP and MS access. htttp://localhost/tisco/ I do have another application on the internet which is a replica of the above whose URL will be say http://www.tisco.co What I want is when a user in the intranet site inserts any record into the db on internet it should get updated on my intranet acess db too. Is it possible first of all Appreciate if you let me know your thoughts..with resources if any. Tag: Code Check Tag: 158565
  - 24
    - scripting runas to pass a password I have been given a task to create a script that will allow a user to register .dll files without being an administrator of the machine. The only way I can think to do this is to use the runas.exe command. My problem is, runas.exe does not allow you to pass the password to it without manually entering the password. We cannot allow the users to have admin rights or to know the password of an administrative account. Does anyone know of a way to do this in a script or another free tool that would allow me to accomplish this task? Please keep in mind, my company does not want to spend any money other than my time to complete this task. Tag: Code Check Tag: 158560
  - 25
    - CDO.Message.1 error '80070020' when using AddAttachment I use to use cdont to send out email from my asp page and had no problem sending out email with an attachment. I have now converted to using cdo to send out mail. I get an error message when I use the AddAttachment. If I don't use the attachment, the email will go through. I get the following error message when using an attachment: CDO.Message.1 error '80070020' The process cannot access the file because it is being used by another process. I have checked the size of the file and it has 2 lines of records. I don't know where else to look. Any suggestions would be greatly appreciated. Code below: Dim objMessage Set objMessage = Server.CreateObject("CDO.Message") With objMessage .To = "MyEmail.com" .From = "MyEmail.com" .Subject = "Testing Email" .TextBody = "testing 123" .AddAttachment "c:\MyDocument\test.txt" .Send End With Set objMessage = Nothing *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! Tag: Code Check Tag: 158551
- Next
  - 1
    - Unable to read registry values Hi all I'm making a logoff script to clear my history. Before i start i want to see the registry values that are there, so i write this little code snippet: set shell = CreateObject("WScript.Shell") WScript.Echo shell.RegRead("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\TypedURLs") but i keep getting an error! Error: Unable to open registry key "the key above" for reading Code: 80070002 Source WshShell.RegRead But with a reg query "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\TypedURLs" /s reads the registry without any trouble... Any suggestions? Thanks for your time Remi Tag: Code Check Tag: 158550
  - 2
    - RUNAS with UNC paths I am having trouble using runas from a batch file running an app from a UNC path, I get an Error 67: the network name cannot be found. It works fine running the same command from the C: drive or running the application from a command prompt using the unc path. Am I missing something? Tag: Code Check Tag: 158547
  - 3
    - Searching a CSV and Totaling Unique Occurrences of Strings within. Heya, I have a small problem i need some help with. I have a directory of CSV files about 250 of them, that i need to search though and and generate some totals from. I can quite easily join all the files together using a 'copy *.csv full-list.csv' so that i need only work on one file rather than work my way though a the directory one by one. The files contain a non unique id (unique to the file, but not the set of files) followed by a name. So it looks like this; a,katie, a,natasha, a,monica, ... etc There are 250 files like this. What i need to do is find all the unique names in the whole set (all the files) and then how many times those names occur. i.e. how many 'katies' occur across all 250 files. This needs to be outputted just as each unique name and a total. kate,15, monica,11, natasha,4, Also if it is possible i'd also like to have the id's that occur with each occurrence of a unique name outputted in some manner. Perhaps as a quoted encapsulated string in a third column. Something like this.... katie,15,"a,b,c,d,e" All seems a tiny bit complicated and a bit much to get my head around. Can anyone have a shot provide code that will provide me with the unique names and the total occurrences? Many thanks in advance, Hardeep. Tag: Code Check Tag: 158545
  - 4
    - Script to parse DL's and groups in AD Hello, Does anyone out there have a script to parse the membership of DL's/Groups in Active Directory? I need it to prompt for the name of the DL/Group and then retrieve the membership and save it to a file (.txt/.csv) Help...please Tag: Code Check Tag: 158543
  - 5
    - What's the best/easiest way to Rename a file using Date/Time Variables? I have a ridiculously simply need. I have a Batch file which performs certain Archiving functions for me. At the end, it Zips everything up into one file. However, the functionality I need is to be able to, at the time of execution, create a new Folder and rename a file(s) using Date and/or Time variables. For example, if I'm running my "Archive.bat" file on 5/25/2004 at 2:46pm, when I'm done I'll end up with a file called "Archive.zip" I need to have a Script that will do the following: 1. Create a Folder using the current Date/Timestamp however I choose. For example, if I specify (either in the Script or via command line parameter) "Archive Folder - MM-DD-YYYY", I want to end up with a folder named "Archive Folder - 05-25-2004" 2. Rename that file also using the current Date/Timestamp however I choose. For example, if I specify (also either in the Script itself, or via command line parameter) - "Archive - MM-DD-YYYY - HH:MM:AP.zip", I want to end up with a file named "Archive - 05-25-2004 - 2:46pm.zip" The format of the date and time doesn't have to be that dynamic for the actual naming of the file/folder. I'm perfectly fine defining the format within a variable (Say, for example, "CurrentDate" and "CurrentTime") and then using those variables for the naming (i.e. "Archive - %CurrentDate - %CurrentTime.zip" ) What is the best way to achieve this goal? I can't imagine it's that difficult, but I'm not terribly familiar with script programming. I'd appreciate whatever help anyone could offer. Thanks! Tag: Code Check Tag: 158539
  - 6
    - Display # of Users on our Web Site I have seen messages showing the number of individuals on a site at one time. Does anyone know how can I do this Thank You id Advanc Tony Tag: Code Check Tag: 158538
  - 7
    - Use VB to update XML I am trying to accomplish the following; I have an XML script that gets uploaded to a server and then imports the fields to a webpage, what I am trying to do is see if it is possible to change the fields in the xml script with VB. I have created an outlook form that the users will fill out and I would like to have the script look at the values in the text box and then change the line in the xml script to read the value. Here is an example of what I would like to do. The outlook form has the following field: Description - Lenders Cover Letter The xml script has this line <Description>XXXXXXXXXXXXX</Description> I would like the script to change the description in the xml code. <Description>Lenders Cover Letter</Description> Is this possible to do? The xml script will be in the body of the message when it is e-mailed to the site. Thanks Gavin... Tag: Code Check Tag: 158532
  - 8
    - Delete Files by date Hello, I need to delete files in a certain folder by current date minus 2. I do not know how to do this - I've searched the archive and the web.... All suggestions will be greatly appreciated. Thanks in advance, Bill Burke Tag: Code Check Tag: 158524
  - 9
    - RunAs Alternatives Hello, We are constructing a script that will be launched from the end of the domain login script in our AD environment. This script will query the registry for the latest critical updates, determine which are missing and install the missing updates. We have it working, except that we have to reference a local Administrator/password when using the RunAs command to install any missing patches. This Admin/Password pair is in plain text in the script, and for security reasons, we only want to have one local administrator per workstation. Is there a way with VBScript to hide (hash) a domain account password, or install a patch locally while logged on as a member of the Local Users group? Basically, the ciritical updates need to be installed by a local administrator, and we need a way to run these updates from a VBScript login as that local administrator while not compromising the seecurity of the system. Any thoughts greatly appreciated...!! Thanks, Chris twinked@seajay.com Tag: Code Check Tag: 158523
  - 10
    - Want more than 1,000 results from AD Query Please help me with the script below. I'm using it to list all the computers from the Servers OU in a specified domain in Active Directory. Unfortunately, the script (which is a modified version of Listing 5.30 in the Microsoft Windows 2000 Scripting guide) only returns the first 1,000 entries. We have more than 1,000 computers in my enterprise. What do I need to do to retrieve all computers and not just the first 1,000? If I can't retrieve an unlimited number of computers, can I turn some setting up to an obscenely high number like 2,000,000 and accomplish the same goal? All help is appreciated -raj -------------------------------------------------------------------------------------------------------------------------------------------- Option Explici On Error Resume Nex '************************************ '* Explicitly Defined Variables '************************************ Dim objConnectio Dim objComman Dim objRecordSe Dim fqd Dim o 'Establish and initialize connection to Active Directory Databas Set objConnection = CreateObject("ADODB.Connection" objConnection.Open "Provider=ADsDSOObject; Set objCommand = CreateObject("ADODB.Command" objCommand.ActiveConnection = objConnectio 'Search command passed to active director objCommand.CommandText = "<LDAP://ou=Servers,dc=my,dc=domain,dc=net>;(objectCategory=computer)" & ";name,operatingSystem;subtree Set objRecordSet = objCommand.Execut While Not objRecordSet.EO fqdn = objRecordSet.Fields("Name" os = objRecordSet.Fields("operatingSystem") Wscript.Echo os & " " & fqd objRecordSet.MoveNex Wen 'Close Active Directory Connectio objConnection.Close Tag: Code Check Tag: 158522
  - 11
    - retrieve computer account in active directory Hi I would like to know how to get a list of computer's account in active directory have you a sample please ? thank balou Tag: Code Check Tag: 158519
  - 12
    - Time Sync Is there a script available to set the time synchronization of XP and 2K workstations to a designated timeserver? Or against the authentication server's time? THanks Tag: Code Check Tag: 158518
  - 13
    - Onunload server side code Hi, There is probably a very simple answer to this, but i can't seem to find it. I have an asp page which moves files on the server. What i need is the server side code which moves the files i.e... If strSelectedpdf <> "" Then ObjFSO.Movefile Oldfile, Newfile End If ...to be run when the user clicks submit and the user is taken to the next page. At the moment it works if the forms action is to the current page beacause the variables have been populated with the user's input and the script is re run when the page is opened again, but i want the code to be run as the page is left so i can direct them to a results page. I imagine it would be something along the lines of Sub window.onunload() If strSelectedpdf <> "" Then ObjFSO.Movefile Oldfile, Newfile End If end sub But this doesnt work. Can anyone suggest an answer?? Luke Tag: Code Check Tag: 158516
  - 14
    - add printerdriver to remote machines problem Hello all, I've got major difficulties to add a printer driver to a remote machine. If I want to add "windows 2000 build-in" drivers, all works fine, but if I want to add I driver which I downloaded from the internet (e.g. HP Business Inkjet 2300 PCL 5c driver) I always get the error message "printer rundll command failed". I use the command line below: rundll32 printui.dll,PrintUIEntry /ia /c\\machine /m "HP Business Inkjet 2300 PCL 5c" /h "Intel" /v "Windows 2000" /f C:\printerdrivers\windows 2000 drivers\HP business inkjet 2300\Drivers\PCL5\Win2k_XP\English\hpw2300b.inf I'm 100% sure that the modelname is correct (I looked it up in the inf file) and also the location of the inf file is correct). It's weird that this works perfectly for the "windows 2000 build-in" drivers (where I use the standard %windir%\inf\ntprint.inf inf file) and not for other printer inf files, or is there something I overlooked? Tips and help are very welcome, thanks in advance, Joeri Tag: Code Check Tag: 158515
  - 15
    - all kind of files Hello, how can I realize to look for all exists files in a directory. Actually I want look for a special word for every founded file . What have I to heed if I'm working in a local net? Many thanks for help Tag: Code Check Tag: 158513
  - 16
    - Reading very large files with VB Script I know it sounds insane but i need to read a 2GB file and then spin it around i.e. put the front at the back and the back at the front. I would like to do this using script. Is this possible? I am trying at the moment but i run out of memory. TIA Pat Long Tag: Code Check Tag: 158512
  - 17
    - view excel file using asp Dear al i wornder if anybody help me. i want to view the excel file in asp pages. i used code as <a href="Test.Xls" target=_blank>Excel File</a but it is giving two option 1) Open from current location 2) Save the file but i just want to view the file in new window. also when i opened the file and if i want to open the file second time, it is giving the error that the file is opend i just want to view the file like how the pdf file displays in asp so please suggest me the soln for the same with regard vaibhav Tag: Code Check Tag: 158507
  - 18
    - TCP/IP settings from vbscript what code does one use to display the tcp/ip settings in a nice window? i wrote a simple script to change tcp/ip setings for my users when they are at home or at work. after the function completes i would like to display the settings in a message box or popup and not goto a command window and run ipconfig from the script thanks Tag: Code Check Tag: 158501
  - 19
    - local computer group membership from an OU of computers? I have been trying get get a script that will get the membership from the local computer's Administrators group by using an OU full of computers. I can return the Administrators group membership from my local computer and a list of computers from an OU, can't quite figure out how to do both with resorting to AD Users & Computers and going from computer to compute Any thoughts Gabe Tag: Code Check Tag: 158499
  - 20
    - excel getobject not working 1. set excel = getobject("test.xls") error: cannot find file- or classname:'getobject' 2. set excel = getobject(,"excel.application") excel.workbooks.open("pathname\test.xls") error: ...xls could not be found 3. set excel = getobject("","excel.application") excel.workbooks.open("pathname\test.xls") error: ...xls could not be found I am trying to dynamically store data from a .hta-file to an excel file, that is already open. With the above results. The .hta-file and the .xls file are in the same directory. Even when i hardcode the path i get the same result. Is this the bug Michael Harris wrote about in a posting from 1999/09/18 (Subject: Open Excel 2000 from htm fails!): "It also fails for Excel 2000, WSH2 beta, and the version 5.0 vbscript engine. The failure isn't when creating the object, only when referencing any property or method. Of course there's not much point in creating it if you can't use it. ...So, when you use CreateObject("Excel.Sheet") and then try to reference it in any way, it fails. If you try the GetObject("","Excel.Sheet") alternative method, it also fails. But if you use WScript.CreateObject or GetObject instead, it works. Of course, this isn't a solution available from (local) html or an hta. So it would appear that there's a bug in the vbscript 5.0 CreateObject/GetObject methods that is not in the wscript versions." Or am i doing something wrong? What can i do to achieve that i can store data from a .hta file in an excel file? I use: - wsh version 5.6 - vbscript v.?? - internet explorer v.6 - windows xp pro - excel 2002 Any help would be appreciated gr Jan Tag: Code Check Tag: 158497
  - 21
    - Is it possible to invoke the browse for user object through vbscript? I've seen this done with 'browse for folder,' but can it be done with 'browse for user?' Thanks folks... Rob Tag: Code Check Tag: 158494
  - 22
    - Current Page's URL? Hi: is a function to get the current page's URL? Thanks Polaris Tag: Code Check Tag: 158490
  - 23
    - Response.Write not writing anything Hi, I have an asp page that imports delimited text files into a database. One of our users has rather large text files. Once all these files are imported the page prints the word "Success" to the screen. This no longer works when importing the large files. If I shorten the number of files imported so it takes just a few minutes the word "Success" appears and all works fine. If I alter the asp back to import all the files (takes about 10 minutes) the browser sits at the page loading screen indefinably. This script creates log files as it goes so I can see that all the files are imported successfully (that's why I know it takes about 10 minutes : ) just that the web page fails to report this. After the last import I use Response.Write "Success". I have tried Response.Flush, Response.End and played with the WriteBlock command. None of these make any difference. Any ideas on how fix this? Thanks Dominic Godin Tag: Code Check Tag: 158485
  - 24
    - how to call CreateProcessWithLogonW from vbscript I am "very" new to vbscript. Is there a way via an object to call CreateProcessWithLogonW from vbscript? thank you for your help johnp Tag: Code Check Tag: 158481
  - 25
    - VBScript error 800A0401 'Expected end of statement' on 'Open ... For Input ...' Hi, I tried this code : FileName = "C:\temp\SC.csv" Open FileName For Input as #1 Do Until EOF #1 Input #1, datastring Loop Close #1 and I get this message : Windows Script Host Error: Expected end of statement Code: 800A0401 Source: Microsoft VBScript compilation error I can't find out where I made a mistake... Can anyone help me ? Thanks Tag: Code Check Tag: 158478

I am attempting to connect to an Access DB in FrontPage using asp pages. Everytime I try to view the page I get an HTTP 500 Internal Server Error message and no page. Could you tell me if my code is correct and maybe there is something wrong with the server. Other asp pages that access SQL server data work fine, I just can't get it to work with my MDB file

Thank

****Code Start******************
<%@ Language=VBScript %><
Option Explici

Dim rsEmpContacts, cnnDB, strD

strDB = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" &
Server.MapPath("/PPOSS/directory.mdb"

Set cnnDB = CreateObject("ADODB.Connection"
cnnDB.Open strD

Set rsEmpContacts = CreateObject("ADODB.Recordset"
rsEmpContacts.open "select * from tblNewEmpContacts order by office", cnnD

%
****Code End**********************

Thanks
Brandon

Top