SELFHTML Forum
SELFHTML Forumsarchiv
2006
Juli
 |
SELFHTML Forumsarchiv |
 |
|
 |
|
Die folgende Nachricht zum Thema stammt von: berlinermg, 31. 07. 2006, 13:33
Hallo leute,
Ich bin ein absoluter Neuling und muss mich jetzt in HTML und vbscripting einarbeiten *grml*
Hab jetzt ein Problem, wo ich schon stunden suche.
ich habe ein Formular und möchte die Eingabe überprüfen mit einem VBscript.
hier das beispiel:
.
.
.
<body bgcolor="#FFFFFF">
<p><font size="5">Neuer Nutzer:</font></p>
<form method="POST" name="Nutzerform">
<table border="1" cellpadding="6" cellspacing="4"
bgcolor="#C0C0C0">
<tr>
<th align="left">Vorname des Users: </th>
<th align="left" colspan="2">
<input type="text" size="15" name = "vname"
</tr>
<tr>
<th align="left">Nachname des Users:</th>
<th align="left" colspan="2"><input type="text"
size="15" name="nachname" ONCHANGE ="pruefen(vname, nachname);">
</tr>
<script language="VBScript">
<!--
public sub pruefen(vname, nachname)
Dim MyShell
Set MyShell = CreateObject("WScript.Shell")
MsgBox vname
namen = left(name, 6) 'nach dem 6. Buchstabe wird der Nachnamen abgeschnitten'
vornamen = left(vorname, 2) 'nach dem 2. Buchstabe wird der Vornamen abgeschnitten'
userid = namen &vornamen 'Userid wird übergeben dass heißt 1-6 Nachname und 2 Buchstaben vom Vornamen
'Das Activ Directory wird geöffnet zum Suchen ob userid schon vorhanden ist'
dtStart = TimeValue(Now())
Set objConnection = CreateObject("ADODB.Connection")
objConnection.Open "Provider=ADsDSOObject;"
Set objCommand = CreateObject("ADODB.Command")
objCommand.ActiveConnection = objConnection
objCommand.CommandText = "<LDAP://dc=domäne,dc=com>;(&(objectCategory=User)" _
& "(samAccountName=" & userid & "));samAccountName;subtree"
Set objRecordSet = objCommand.Execute
If objRecordset.RecordCount < 1 Then
Number = 1
else
msgstr = userid & " existiert schon"
Msgbox(msgstr)
End if
objConnection.Close
end sub
kann mir mal jemand sagen, wie ich die variable vorname überprüfen kann bzw. die variable an vbscript weitergeben kann? Wäre echt dankbar.
Bitte daran denken.. ich bin in html NOCH ein DAU!
Gruß
Marco
Die folgende Nachricht zum Thema stammt von: H-P Ortner, 31. 07. 2006, 13:48
Hallo Marco!
»» Ich bin ein absoluter Neuling und muss mich jetzt in HTML und vbscripting einarbeiten *grml*
...
»» ich habe ein Formular und möchte die Eingabe überprüfen mit einem VBscript.
VBScript verhält sich da wie Javascript: http://de.selfhtml.org/javascript/beispiele/formulareingaben.htm
Viele Grüße
H-P Ortner
© 1998-2006 
Impressum, Software: Classic Forum
(HTML)