Emptying a global security group
Hi there
I've a global security group (win2k server) containing users, I want to
empty it, the problem is that I don't know what users belong to this
group, I could try to remove each user of the ad but I've more than 1200
users and it could last for a long time to do it.
Any idea?
Thanks in advance
Phil Tag: web based ftp? Tag: 165384
Stopping USB Mass Media device via script
I need to stop a USB mass media device (USB Key to be exact) as part
of a data backup script - can it be done? If so, how? Lets assume it
is assigned drive letter E:...
Thanks
dcc Tag: web based ftp? Tag: 165374
VBScript and opening html page
How can I open html webpage from VBScript?
My script is checking permissions and when see, that i have permission to
see other page, then give me result.
I want to open other page when i have permission for it.
I have three possibilities by permissions.
My question is:
How open other pages by VBScript? In frame?
For example:
If I have 1 level VBScript open for me page1
If I have 2 level VBScript open for me page2
If I have 3 level VBScript open for me page3 Tag: web based ftp? Tag: 165371
How can vbscript start an application like Excel with parameter?
Hi
Please excuse I'm not a native speaker.
I know the following vbs-code starts Excel:
dim app
set app= createobject("Excel.Application")
app.visible=true
Now i want the following vba-code insert in my vbs-code, so this happend:
the user clicks a button on my website, vbscript starts Excel ,open the file
Ergebnisse.txt and make the formatsettings i want(Import the textfile etc.)
vba-code:
Workbooks.OpenText Filename:="C:\Ergebnisse.txt", Origin:=xlMSDOS, _
StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=False, Tab:=False, Semicolon:=True,
Comma:=False _
, Space:=False, Other:=False, FieldInfo:=Array(Array(1, 2), Array(2,
2), _
Array(3, 2), Array(4, 2), Array(5, 1)), TrailingMinusNumbers:=True
Any Hints? Thanks Tag: web based ftp? Tag: 165367
"Twistie" control
Hi,
Does anyone know of any controls that can be used to expand/collapse
sections on a web page. I have a SQL DB and need to build a web based front
end. I would like the forms to allow for various sections to be expanded and
collapsed, so a user can get to where they need quickly and easily. I call
them "twisties" - no idea what they are really called. For an example of
what I am after, see the BMW website - if you search for a car, it displays
the results. If you click on one of the results, it displays info about that
car, with nice sections that are expandable/collapsable so you can read what
you need/want.
Copy the link below to see an example - then choose a car from the results
and you will see the "twisties" that I am refering to on the right of the
page.
http://www.bmw.co.uk/apm/bmw_auc_profile/0,4200,1260___ns-y,00.html?seriesId=5&bodyId=LI&toPrice=70000&postcode=b9+4aa&searchtype=q
--
Many thanks in advance for any assistance Tag: web based ftp? Tag: 165366
QUERY Question
Is it possible to quesry a database from an HTML document without ASP,
Internet Server and ODBC?
In other words, can I just create a document with a script that querys a
table in my Access database on a workstation.
If so, can anyone point me in a direction on the Internet that could help me
with such a task?
Thank you all in advance. Tag: web based ftp? Tag: 165356
Display different image between dates using ASP
Hello -- I would like to display a different logo on my website for
different seasons of the month.
I currently have a logo for Halloween, Thanksgiving, and December.
Can someone tell me what VBScript/ASP code I need to display an HTML image.
Basically:
1) any date from 10/01 thru 10/31 I would like to display the Halloween.
2) any date between 11/01 - 11/30, I would like to display Thanksgiven.
3) any date between 12/01 - 12/31, I would like to display the Christmas.
Any help would be appreciated. Tag: web based ftp? Tag: 165346
Script to monitor services running
Hello all....
A complete VBScript newbie here. Pardon any stupid questions that may
follow, but I am hoping to learn something new.
I am tasked with monitoring several services on a server on a daily basis. I
was thinking about a .vbs script that could be called from a batch file ( if
that is even possible ). I would like for this script to create a simple
text file list of all services that are running on the server including the
status of the service ( stopped, started, etc... ).
If this possible, any hints as to how to go about writing this script would
be greatly appreciated.
Thank you,
Mike Minor Tag: web based ftp? Tag: 165343
Scripting.FileSystemObject's stopped working
Hi everyone,
What´s wrong with my test-enviroment (W2K + IIS 5.0 + ASP-pages ) on my
homepc.
All Scripting.FileSystemObject objects stopped working suddenly? For example
following simple script seems running & running without timeout? Nothing also
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.CreateTextFile("c:\test.txt",true)
f.WriteLine("Hello World!")
f.Close
set f=nothing
set fs=nothing
I´m running this script with the http://locahost/test.asp url
Greetings from finland
Ilari Tag: web based ftp? Tag: 165340
How to get e-mail address attribute from AD
Using vbscript, what is a simpliar to retrieve the value for the e-mail
address attribute for an AD user?
The following will get the desired value, but I am curious as to why I have
to do so much to get the value. I guess my main question is why do I have
to perform the steps below the nametranslate comment and then having to
convert results? Is there no simpliar way to get e-mail address for a
username? If so would someone post the code?
Thank you.
Code snippet:
strNTName = "xusername"
' Determine DNS domain name from RootDSE object.
Set objRootDSE = GetObject("LDAP://RootDSE")
strDNSDomain = objRootDSE.Get("rootDomainNamingContext")
wscript.echo strdnsdomain
' Use NameTranslate to find the NetBIOS domain name
' from the DNS domain name.
Set objTrans = CreateObject("NameTranslate")
objTrans.Init 3, strDNSDomain
objTrans.Set 1, strDNSDomain
strNetBIOSDomain = objTrans.Get(3)
wscript.echo strnetbiosdomain
' Use NameTranslate to convert the NT user name to the
' Distinguished Name required for the LDAP provider.
objTrans.Init 1, Left(strNetBIOSDomain, _
Len(strNetBIOSDomain) - 1)
objTrans.Set 3, strNetBIOSDomain & strNTName
strUserDN = objTrans.Get(1)
wscript.echo struserdn
' Bind to the user object in AD
Set objUser = GetObject("LDAP://" & strUserDN)
Wscript.Echo "SMTP Address: " & objUser.mail Tag: web based ftp? Tag: 165337
Setting the value of an input field
I have the following code in an HTA file:
<input type="text" size="50" name="Username" value="Username">
I would like to set the value for this input to be generated based
upon the value stored in a file. There is VBScript that runs in this
HTA that stores off this type of information and reads the file when
the form loads.
TIA Tag: web based ftp? Tag: 165331
Memory problem with Wscript when it is closing
Hi,
I have two problems with Wscript (WSH and VBScript), I execute a
script which will create another script on a remote machine, then the
remote script will execute.
Every thing is fine, But sometime, I got run-time error that Wscript
try to read some thing from somewhere in memory that it can not be
read. And Sometime when my script finishes its execution, when
Wscript is closing, Wscript try to write some thing to somewhere that
it can not be written. In both case I got a popup to tell me that
Wscript is not working.
I use to the "Option Explicit" to force the variable declaration., And
the script will keep running until I tell it to stop (via
configuration file) it may run more than 5 or 6 hours.
If anyone have any idea?
Thanks you very much Tag: web based ftp? Tag: 165330
Extract phone list to web?
Does anyone have some sample code I can see that will let me pull a
staff phone list from AD and display it on a web page?
Thanks! Tag: web based ftp? Tag: 165327
ANN: Admin Script Editor
iTripoli, Inc. is pleased to announce the ultimate script editor for
Windows administrators. Admin Script Editor (ASE) offers
administrators a targeted solution to scripting with several features
found nowhere else. ASE supports VBScript, KiXtart, AutoIt and Batch
scripting languages?
* Script Packager ? Create secure executable packages from script with
the ability to run with alternate credentials. You may include support
files, dictate several security options, specify an optional system
tray icon and tool tip to display during execution, and more.
* WMI Code Wizard ? Provides sample data for properties so you can
choose which properties you wish to use. Extensive customization
options allow full control over generated script code.
* ScriptSense ? See the syntax for functions appear as you type. As
you type each parameter for the function, that parameter is
highlighted to help you keep your place. Further, nesting is supported
so you can even get this support when writing functions within other
functions.
* Integrated Keyword Help ? ASE uses its own database of syntax,
samples and more to provide keyword help for all supported languages
right within the editor!
* Collapsible code ? Organize your script and make it more readable
with the ability to collapse regions of code.
Flash movies are provided for all of these features, or download the
45 day trial version. For more details visit:
http://www.adminscripteditor.com/editor/index.asp Tag: web based ftp? Tag: 165326
Looking for partners interested in beginning a "cut above the rest script website"
I don't want to give any ideas away, but interested people:
Should have mcse/a
I pay for site (or you can help pay for it, if you want)
We need to setup some kind of contract if this thing goes big.
mail me for more details.
jkoorts@myrealbox.com Tag: web based ftp? Tag: 165317
Sharing Folder using VBS
Hi,
I would like to run a script that will change a drives Sharing properties
from "Do not share this folder" to "Share this folder" and set the required
Shared Name.
Any help would be appreciated. Tag: web based ftp? Tag: 165316
Registry: Read all values from certain key?
Hi,
I am writing an vbscript and I have to access the windows registry.
To read and write a key works fine, i.e.:
Set WSHShell = WScript.CreateObject("WScript.Shell")
RegLocate = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet
Explorer\Version"
MyVersion = WSHShell.RegRead(RegLocate)
But how do I read all values from a certain key and I don´t know the names
of the value.
Is there a way like
for each MyEntry in key
msgbox MyEntry.type
msgbox MyEntry.caption
msgbox MyEntry.value
Next
The script has to run on W2K and XP.
Thanks a lot
J.Steinblock from germany Tag: web based ftp? Tag: 165314
Cookie problem from ASP on XP SP2
Hi
The following code has been working fine for our site as part of the
authentication process right up until the SP2 upgrade. Now on SP2 PCs
the cookie isn't written even though the referer is www.abc.com. Works
fine on other Windows combinations. Can anyone help?
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
If instr(Request.ServerVariables("HTTP_REFERER"), "www.abc.com") > 0
Then
'response.cookies("abcresource") = "ok"
'response.cookies("abcresource").expires = date + 1
Response.Cookies("abcresource")("Passed") = "OK"
Response.Cookies("abcresource").Expires = DateAdd("d",1,Date)
Response.Cookies("abcresource").Path = "/"
Response.Cookies("abcresource").Domain = "www.abc2.com"
End If
%>
<%
If Len(Request.Cookies("abcresource")("Passed")) = 0 Then
Session("abcresourcepage") = Request.ServerVariables("PATH_INFO")
Response.Redirect("/login.asp")
End If
%>
Thanks
W Tag: web based ftp? Tag: 165310
RegRead
Hi,
I am trying to read a reg key from the registry. the problem is that if the
key doesn't exist, the script jumps to "If Err.Number <> 0 Then", or cause
runtime error, if i don't use "On Error Resume Next"
I wanted to use it in the following way:
Set RegistryOBJ = WScript.CreateObject("WScript.Shell")
'returns the path of my app writen in the registry
Get_ETS_PathInRegistry = RegistryOBJ.RegRead(ETS_RegistryLocation)
If ETS_UnInstallPath = False Then
'if the key doesn't exist, we can install the app
Install_ETS(ETS_InstallPath)
Else
'if the key exists, we should uninstall it and then install the new
version(might be in new path)
UnInstall_ETS(ETS_UnInstallPath)
'ETS_InstallPath is being obtained from user.
Install_ETS(ETS_InstallPath)
End If
The problem is that it doesn;t go to the "If ETS_UnInstallPath = False Then"
but as i described above, go to the end of the script and then ends the
script.
in this way, i will need to add in "If Err.Number <> 0 Then"
"Install_ETS(ETS_InstallPath)
" command.
Isn't there an elegant way to do so, or i should consider doing it using VC? Tag: web based ftp? Tag: 165305
Where Do I Look for File Locks Using WMI ?
Hi everyone,
I ma trying to write a VB Script checking if a particular file is locked by
other process, that is, if the handle exists.
I have tried using WMI cim_datafile and Win32_Process files but I did not
found anything useful.
The only example I found uses .Net Framework
ManagementBaseObject.GetRelated() method which does not seem to have an
equivalent available from VB Script.
Tom Tag: web based ftp? Tag: 165304
vbscript, asp, sockets responses not received
Howdy People,
I guess this might be more of an IIS architectural question, but there is
some vbscript content, so I'll post it here.
Grateful for any help people might have on this problem.
I have an asp page running some vbscript. The vbscript instances a COM dll.
The COM dll sends a UDP message to a process running on another server
somewhere, then blocks waiting for the response. My problem is that the
response is never received by the dll. I've tried running a sniffer on the
web server, and it shows that the response is coming back as expected,
coming to the correct port number and everything, but the dll just sits
there and receives nothing.
Any clues what's going on?
MIKE Tag: web based ftp? Tag: 165300
WMI - User problem
I'm completely new to scripting.
I would like to write to file:
name, path, target and creation date for all shortcuts on my system.
I composed this script from two scripts from the Script Repository:
'------------------------------shortcuts.vbs--------------------------
Const ForAppending = 8
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile _
("C:\Scripts\Shortcuts.tsv", ForAppending, True)
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer _
& "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from _
Win32_ShortcutFile")
For Each objItem in colItems
strCreationDate = WMIDateStringToDate(objItem.CreationDate)
objTextFile.WriteLine _
(objItem.FileName & vbTab & _
objItem.Drive & objItem.Path & vbTab & _
objItem.Target & vbTab & _
strCreationDate)
Next
objTextFile.Close
Wscript.Echo "Finished!"
Function WMIDateStringToDate(dtmDate)
WMIDateStringToDate = CDate(Mid(dtmDate, 5, 2) & "/" & _
Mid(dtmDate, 7, 2) & "/" & Left(dtmDate, 4) _
& " " & Mid (dtmDate, 9, 2) & ":" & _
Mid(dtmDate, 11, 2) & ":" & Mid(dtmDate, _
13, 2))
End Function
'---------------------------------------------------------------------
On my XP Home system, with only one user, this seems to work for all
shortcuts, eg the shortcuts from the *All Users* Desktop and Start Menu,
but not for eg the shortcuts from the *User* Desktop and Start Menu.
Can anyone help, please?
TIA
--
Cheers,
S.F. Tag: web based ftp? Tag: 165294
HTML DOM
Hi All,
I am attempting to automate a job which requires navigating through a
website with internet explorer. I don't wish to use the
InternetExplorer.Application object as I have found flaws with it. I am
using SendKeys and WScript and the MICROSOFT.XMLHTTP object to obtain the
contents of the pages as I go. In a former script I was able to obtain
textbox & button objects on a page with the InternetExplorer.Application
object.
eg.
set itms = ie.Document.All
itms.username.value = user
How can I acheive the same result with other objects? I have the
MICROSOFT.XMLHTTP object for the page.
Thanks,
Jesse Tag: web based ftp? Tag: 165288
MAC Address
IS it possible to get the MAC address of the user ? Any tips would be
greatly appreciated.
Thanks in advance. Tag: web based ftp? Tag: 165287
Enumerating Groups in ASP with IIS 6.0
I am having an issue enumerating a given users groups with the following ASP
script:
Sub GetGroups()
Dim sDomain
sDomain = "bsd-dean"
UserGroups = ""
if instr(1,Request.ServerVariables("LOGON_USER"),"\") > 0 then
sUser = replace(Request.ServerVariables("LOGON_USER"),"\","/")
else
sUser = sDomain & "/" & Request.ServerVariables("LOGON_USER")
end if
Set oUser = GetObject("WinNT://" & sUser)
For Each oGroup In oUser.Groups
if UserGroups <> "" then UserGroups = UserGroups & "," end if
UserGroups = UserGroups & oGroup.Name
Next
Response.Write UserGroups
Response.Write "<br>"
'Response.Write oUser.get("name")
if UserGroups<>"" then UserGroups=split(UserGroups,",")
set oUser = Nothing
set oGroup = Nothing
end sub
The script works fine on my 2000 server machine and also works for the
administrator on the 2003 machine. I get the user logon infor including the
domain, but I get an access denied error when it tries to read the groups
that the users are in. Anybody know how to get this to work? Tag: web based ftp? Tag: 165283
Vbscript and WEB
Can anyone point me to the right resource?
I am trying to hvae a web interface for maintaining Active Directory. I want
to be able to do simple functions such as changing password - listing a
user's memberships, searching,etc.
I have created *.vbs scritps before to run some tasks - just not sure how to
integrate that onto a web form
Any help will be appreciated
thanks
-JPierre Tag: web based ftp? Tag: 165282
How to connect to an access DB using vbscript
Plz, how i connect to my access db (c:/mydb.mdb),retrieve information from it
to a form on a web page and update it Tag: web based ftp? Tag: 165274
Registry key with spaces not reading correctly
The code below seems to work unless the Registry key has spaces like RAM
Structural System v8.2 in the key. If I use a key that does not have spaces
it works fine. Do I need to put additional quotes or something ?
Thanks in advance
Steve
If
RegKeyExists("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\RAM
Structural System v8.2") Then
WScript.Echo "Ram 8.2 Installed"
End if
Function RegKeyExists(ByVal sRegKey)
' Returns True or False based on the existence of a registry key.
Dim sDescription, oShell
Set oShell = CreateObject("WScript.Shell")
RegKeyExists = True
sRegKey = Trim (sRegKey)
If Not Right(sRegKey, 1) = "\" Then
sRegKey = sRegKey & "\"
End If
On Error Resume Next
oShell.RegRead "HKEYNotAKey\"
sDescription = Replace(Err.Description, "HKEYNotAKey\", "")
Err.Clear
oShell.RegRead sRegKey
RegKeyExists = sDescription <> Replace(Err.Description, sRegKey, "")
On Error Goto 0
End Function Tag: web based ftp? Tag: 165268
Save a file in internet explorer
I use the following script to navigate to a site
set objexplorer = createobject("InternetExplorer.Application")
objexplorer.navigate http://10.3.1.48/devadmin/sys_adm.dhtml
I would like to use vbscript to save the page to a file. Any one know the
syntax
thank you Tag: web based ftp? Tag: 165266
Script has stopped transfering files
I have been using a script to transfer files from several remote servers on
a daily basis. Up till now the script has been functioning as it should,
however I noticed this morning that my script was generating the "Job
Finished" echo way too quickly so I checked the contents of the mapped
shares and found that the files were still there. After commenting out the
"On Error Resume Next" the following error popped up:
Error: File already exist.
Code: 800A003A
Source: Microsoft VBScript runtime error
The line that is referenced is the 'objFileSystemObject.CopyFile' portion
of Sub Transfer. While there are files in that New Directory that might have
the same name, why didn't the OverWriteFiles option ignore this?
Dim objWshNetwork, objWshShell
' On Error Resume Next
Set objWshNetwork = WScript.CreateObject("WScript.Network")
objWshNetwork.RemoveNetworkDrive "m:"
objWshNetwork.MapNetworkDrive "m:", "\\server\share"
Call Transfer
objWshNetwork.RemoveNetworkDrive "m:"
WScript.Echo "Test Finished!"
' Sub routine for moving Audit results from the local DC
Sub Transfer
Dim objFileSystemObject
Set objFileSystemObject = WScript.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFileSystemObject.GetFolder ("m:\Data")
If objFolder.Files.Count > 0 Then
objFileSystemObject.CopyFile "m:\Data\*.xml",
"T:\New Directory\Data", OverWriteFiles
objFileSystemObject.DeleteFile "m:\Data\*.xml",
Force
End If
End Sub Tag: web based ftp? Tag: 165265
mouse control
is there script that may simulate all user's action:
a) keyboard press, letters as well special win keys like alt+enter
b) mouse moving [pointer moving accross the screen] and click and double
click
the idea is to have recorded [i'll rather say programaticaly "constructed"]
all keyboard and mouse activities and than making "replay"
i suppose to have some control data file like:
<mouse_to> x1,y1
<wait> 1 second
<mouse_click>
<mouse_drag_to> x2,y2
<mouse_click>
etc...
script is reading that control file and performing action [moving mouse]
accros the screen.
this could allow me to controll some other win program, exactly as user
sitting in front of display.
is it possible? is there some script or com object or whatever? Tag: web based ftp? Tag: 165264
Remove Security Groups
How can I, or what would be an efficient method to remove all but the
default security groups from a 1000+ user accounts. Can I just move all of
the accounts to a specific container and apply a policy that will do this or
is there another method that is recommended? Tag: web based ftp? Tag: 165260
Problem inserting record into MS Access
Hi
I use the following VBScript to insert records into a MS Access db located
on our company server:
cn.Mode=adModeReadWrite
If Request.QueryString("Option")="ADD" Then
cn.Execute "INSERT INTO RPTFAVORITES (RPTFK, UID) " & _
"VALUES(" & Request.QueryString("ReportID") & _ ",'" &
Request.QueryString("User") & "')"
End If
I have set up the DB on my client and when I run the app on my "localhost"
it works perfectly. However when I run the app on the server I get the
following error
Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] Operation must use an updateable
query.
I suspect this has something to do with permissions. I have assigned the
default group account "users" to all tables. The users account has all
permissions set to TRUE. Are there any other permissions to be set?
Any ideas?
PO Tag: web based ftp? Tag: 165252
Script connection to SQL Server db
Hi NG,
from within a script, I want to connect to a SQL Server database using a
dedicated user account that has 'INSERT' rights for a special table within
this db. As this table contains sensitive data, we want to use an account
with just this right so that anybody who guesses the password cannot read the
data.
The SQL server uses Windows NT authentication ONLY (no mixed security). How
must I construct the ADO connection to use the dedicated user account for the
connection? So far, I have scripts that authenticate an ADO connection using
a SQL server account (with SQL server in mixed security), but I cannot figure
out how to use a different domain user when connecting to a SQL server with
Windows NT authentication. Is this even possible??? Tag: web based ftp? Tag: 165251
Attaching A Dos Window
I would like to run a script and have it open a Command/DOS window and send
all its outputs to the window. Is there a easy way to do this?
Thanks,
Ken Tag: web based ftp? Tag: 165250
A Single Task Question
Hi Everyone:
I have a single task. I need to update some of the file properties fields
of about 300 image files for a wedding I just completed. I want to update
the 'Author' and 'Copyright' fields, but I don't want to have to right-
click, open the properties sheet, etc etc etc.
Can I do this in VB Script? I've been scanning the docs on Microsoft.com
and it's not readily apparent. I'm a SQL person primarily, so VB is kinda
alien. Any suggestions or pointers or doc references will be appreciated.
TIA,
Mike Tag: web based ftp? Tag: 165247
Go to linenumber
Hi,
What is the syntax for going to a particular line number to start
processing. I want to stop reading at one point in the script and then start
processing at say line number 20 is there a way in VBScript,WMI etc
xor Tag: web based ftp? Tag: 165237
how to change static DNS configuration to automaticaly DNS
Hi!
I'm trying to write a script that should change from static IP and DNS to
automaticaly obtain the IP address and DNS too.
I've already made the first point that is:
static IP ---> automatically IP
But the second point no...
static DNS ---> automatically DNS
Can somenone help me?...
Thanks
Nuno
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
Set colNetCards = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
For Each objNetAdapter In colNetAdapters
errEnable = objNetAdapter.EnableDHCP()
errEnable = objNetAdapter.SetDynamicDNSRegistration()
Next
For Each objNetCard in colNetCards
objNetCard.SetDynamicDNSRegistration True, True
Next Tag: web based ftp? Tag: 165234
server-side editing of HTML via vbscript
I have a series of pages that are assembled dynamically from various
sources. Before the page is returned to the client, I want to find an
anchor matching a URL that's stored in a var. Then I will change the
class of that anchor.
It's easy enough to do this client-side, but I would much rather do
this server-side. I'm pretty new to ASP scripting, but I'm inclined
to think there's some way to use the DOM to get what I want.
I'd searched this group repeatedly and can't find anything on this
point. I'd sure appreciate any approach to this.
Jeff Tag: web based ftp? Tag: 165233
The most powerfull group for account?
Hello!
How to obtain the most powerfull account for the group?
If account is in:
users
domain users
administrators
domain administrators
I want to take only domain administrators.
Anyone can help me? Tag: web based ftp? Tag: 165232
VBscript to install & run app
I need a script that will push a utility to all the client PC's on our
network and start that utility's installation. I am testing it on my
machine first (XP with SP2), and I'm having some problems even running it.
Here's the script so far:
Dim oShell
Set oShell = WScript.CreateObject("WScript.Shell")
oShell.Run "C:\FxBeagle.exe"
oShell.SendKeys "{Tab2}"
oShell.SendKeys "{Enter2}"
Set oShell = Nothing
This is only to run the app. The app opens fine, however, the script stops
running due to the SP2 security prompt. Can anyone help with this script?
Thanks in advance. Tag: web based ftp? Tag: 165230
Permission denied: 'CreateObject' ... all of the sudden
I haven't changed anything on my XP SP1 PC since last week - now all of the
sudden, I cannot create any IE instances via VBScript.
Even with this simple script:
Set s = CreateObject("InternetExplorer.application")
s.Visible = True
' Change the following line to the Internet site you want to open.
s.Navigate "http://www.microsoft.com"
I get :
Line: 1
Char: 7
Error: Permission denied: 'CreateObject'
Code: 800A0046
Source: Microsoft VBScript runtime error
I have various scripts that depend on the IE interface (I use it as a status
update)...what the heck can I do about this? Tag: web based ftp? Tag: 165225
Using a vArg from the comand line for strComputer
I have this as part of a overall script...
Sub ParseCommandLine()
Dim vArgs
set vArgs = WScript.Arguments
if vArgs.Count <> 2 then
DisplayUsage()
Else
host = vArgs(0)
EventID = vArgs(1)
End if
End Sub
I want to use the host variable in the strcomputer = "." line in my script
(obviously replacing the . with the variable name) I have tried "'&host&'",
&host& and every other combonation... What is the correct syntax to get the
command line variable host (or) vArgs(0) for the strcomputer = line?
Thanks
-david Tag: web based ftp? Tag: 165223
cant read event logs with code that should work (I think!)
Hi all. Keep getting the following error on WinXP boxes as well as my
Win2000 servers whenever I try to use vbs to read the event log: "
ActiveX component can't create object: 'GetObject'"
Heres the code I am using:
<html>
<head>
<title>OpLets v1.0</title>
</head>
<body>
<script type="text/vbscript">
<!-- event log -->
function eventlog
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer &
"\root\cimv2")
Set colLoggedEvents = objWMIService.ExecQuery _
("Select * from Win32_NTLogEvent Where Logfile = 'Application'")
For Each objEvent in colLoggedEvents
Wscript.Echo "Category: " & objEvent.Category
Wscript.Echo "Computer Name: " & objEvent.ComputerName
Wscript.Echo "Event Code: " & objEvent.EventCode
Wscript.Echo "Message: " & objEvent.Message
Wscript.Echo "Record Number: " & objEvent.RecordNumber
Wscript.Echo "Source Name: " & objEvent.SourceName
Wscript.Echo "Time Written: " & objEvent.TimeWritten
Wscript.Echo "Event Type: " & objEvent.Type
Wscript.Echo "User: " & objEvent.User
Next
end function
</script>
<p><a href="vbscript:eventlog">Check Event Logs</a> </p>
<hr>
<nobr Id=Results></nobr>
</body>
</html> Tag: web based ftp? Tag: 165220
Defrag Report
Is there any way of pulling up a defrag report for a machine?
I've seen a lot scripts that will automate the defrag but that's not what I'm after. Tag: web based ftp? Tag: 165213
Problem with variable scope
Hello all,
I have the following script:
Test = "hello"
If Test = "hello" then
MyVar = "ok"
end if
MsgBox MyVar
I would expect that variable MyVar would hold "ok" but it does not.
Is the scope of this variable limited to the if - end if construct ?
How can I workaround this ?
Thanks
Bar Tag: web based ftp? Tag: 165212
Messagebox which is only 3 seconds active
Hi
Is there a possibility to show a messagebox only for seconds? I just want to
give some infos to the user and let the box automaticly remove an continuing
the code?
I think it is not a msgbox but is there a way?
Thanks for every help!
Nijazi Halimaji Tag: web based ftp? Tag: 165210
How to create a simple web service and consume it from VB Script
Hello All
Can you kindly share how to create a simple web service in VB Script
if not possible in VB Script please provide a simple sample in VB and
how to compile it and then how to consume this web service form VB
Script.
Thanks
Karen Tag: web based ftp? Tag: 165207
Hi,
I desperately need a free web-based ftp script/application. Any tips will be
highly appriciated
"MAQ" <maq@nosp.am> wrote in message
news:e6M914owEHA.3012@TK2MSFTNGP10.phx.gbl...
> Hi,
>
> I desperately need a free web-based ftp script/application. Any tips will
> be
> highly appriciated
>
> /Mali
>
>