Similar Threads:
1.Sharing variable in between server-side and client-side script
In a html page, somewhat like a dhtml page, with a number of input
boxes...Once a user enters a password, certain input boxes will be
enabled and disabled according...
Initally verifying the password can be done thru' the client-side
script, but since the password is stored in a database. I have to make
a connection to the sql server, but then the password for the
connection to the database can't be written in the html (due to
security reason), so I tried to call a dll by running a server-side
script, which will do the connection and verify the password for the
user (not the database connection)...
However, now comes to a problem...If I use the code below in my htm,
how can I refer to the input box or the list box in my form??? I have
tried Request.form and myform.lst1. Looks like both doesn't work...
<script language="VBScript" runat="server">
Sub VerifyPwd()
dim dllObj, ok
set dllObj = CreateObject("myDll.myCls")
ok = dllObj.CheckPassword(Request.form("txtPwd"))
myform.lst1.disabled = not ok
myform.lst2.disabled = not ok
End Sub
</script>
Please help, or is there any other way I can accomplish this task?
Thanks in advance. Any help would be greatly appreciated.
Wanda
2.script works on W2K Pro but not W2K member servers
Hello,
I have a script which looks for local accounts which have the password
doesn't expire property set and removes it. I don't want any local
accounts on the the boxes where a user never has to change their
password. At any rate, the script pasted below works just find on
workstations loaded with W2K Professional but it fails on member
servers (not DCs) running W2K server. It fails on line 18 (the
.SetInfo junk) with the filename, directory, or volume label syntax is
incorrect. I'm really stumped on this one. TIA for any assistance!
Here is the script:
1. Dim userFlagsValue
2. strMyComputer = "."
3. intCounter = 0
4. Const ADS_UF_DONT_EXPIRE_PASSWD = &H10000
5.
6. Set objLocalComputer = GetObject("WinNT://" & strMyComputer)
7.
8. objLocalComputer.Filter = Array("User")
9.
10. For Each objLocalUser In objLocalComputer
11. usrFlagsValue = objLocalUser.Get("UserFlags")
12.
13. ' Check to see if the bit for password never expire is set;
14. ' The Xor operator toggles any "on"s to "off"s
15. If (usrFlagsValue AND ADS_UF_DONT_EXPIRE_PASSWD) <> 0 Then
16. usrFlagsValue = usrFlagsValue XOR ADS_UF_DONT_EXPIRE_PASSWD
17. objLocalUser.Put "userFlags", usrFlagsValue
18. objLocalUser.SetInfo
19. intCounter = intCounter + 1
20. End If
21.
22. objLocalUser.Put "PasswordExpired", 0
23. objLocalUser.SetInfo
24. Next
25.
26. ' Done
27. WScript.Echo intCounter & " Local Passwords Changed To Expire"
3.Script works on one Win2000 server but not another
I'm trying to troubleshoot a vbs script that runs fine on some Win2000
servers but not others. If I manually run the script it runs fine, but if I
let a tool called Big Brother run it, it doesn't return any data. The Big
Brother tool should be running it using the system account. It previously
returned data until I put a MonthName() requirement in.
All servers are Win2000 SP4 and patched up to Aug patches. I've looked at
wmimgmt.msc and tried to compare settings. I think I see some security
differences there but don't know if I'm even touching this. In comparing a
system that works to one that doesn't they are both using wsh 5.6. They may
be at different mdac levels if that matters.
The script reads a registry setting, separates out the date and compares it
to todays date. It then sends updates based on the results to the Big
Brother tool.
I'm looking for some help in troubleshooting why it will run under my
account and not the system and why it runs fine on 5 out of 8 systems.
4.Scripts Dose not work on new server
I have two Windows 2003 Servers. One is a new build and the other is about 8
months old.
I have written several scripts for the old server which control a Windows
Media Server.
I have copied the scripts onto the new machine but they fail to function.
It seems I am unable to access the 'Publishing Point' object within the
Windows Media Server. The script returns the number of publishing points on
the server but when I try to access the name property, or any other
publishing point property, I get the element not found error
Could anyone point me in a direction to start looking for the problem. I
imported the local security policy to the new server. But this did not help
5.Oracle Package Procedure call works but generates a server side error
I have an Oracle Procedure within a package that I am calling from an
ASP web page. It works fine but the DBA is telling me that it is
generating an error on the back end. I believe it has to do with the
OUT parameter for the cursor since I do not actually create the
parameter in the call since it is returned as a record set. Data
below...
Important to note that this works fine. I believe I got the code
correct from my research. Is there something I can do to make it
cleaner so the error does not occur on the server side?
Thank you!!!!
Karl
Error:
-----------------------------------------------
PLS-00306: wrong number or types of arguments in call to
'GETWEBPAGEROLES'
Package Procedure declaration:
-----------------------------------------------
Type Return_Cursor is ref cursor;
Procedure GetWebpageRoles(personID IN number,
webpageID IN number,
roles OUT Return_Cursor);
Code:
-----------------------------------------------
Function GetWebPageRoles (lpageID)
On Error Resume Next
' Declares
Dim oCmd, oRstLoc, oParm, oDictionary
' Create objects
Set oCmd = Server.CreateObject("ADODB.Command")
Set oRstLoc = Server.CreateObject("ADODB.RecordSet")
Set oParm = Server.CreateObject("ADODB.Parameter")
Set oDictionary = CreateObject("Scripting.Dictionary")
' Setup command
With oCmd
Set .ActiveConnection = moConn
.CommandType = 4
.CommandText = "sa_general.GetWebpageRoles"
Set oParm = .CreateParameter ("personID", 3, 1)
oParm.Value = Session("PERSON_ID")
.Parameters.Append oParm
Set oParm = .CreateParameter ("webpageID", 3, 1)
oParm.Value = lPageID
.Parameters.Append oParm
End With
' Retrieve roles
Set oRstLoc = oCmd.Execute
' Populate dictionary
Do Until oRstLoc.EOF
oDictionary.Add LCase(oRstLoc("name")), oRstLoc("name").Value
oRstLoc.MoveNext
Loop
' Return value
Set GetWebpageRoles = oDictionary
End Function
6. How to call a client-side vbscript from server-side button
7. Read client side value from server side in VB.NEt
8. I want to call a function in server side from the client side