/ Forside / Teknologi / Udvikling / Java Scripts / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Java Scripts
#NavnPoint
molokyle 5410
Klaudi 2799
smorch 2439
kim 1360
Harlekin 1134
bentjuul 984
gibson 800
severino 695
Random 675
10  konsulent.. 626
Formvalidering med vbscript
Fra : Lars Klingenberg


Dato : 09-04-01 15:59

Halløj,

Tager man sig også af vbscript spørgsmål her?

Jeg har et lille problem med en formvalidering (se herunder)

Et af felterne (ID) SKAL være et tal og det sikrer jeg mig delvist med If
Not IsNumeric(), men hvis der indskrives et mellemrum (chr(32)) i formen
fanger IsNumeric ikke dette og der returneres et mellemrum med mit tal - og
det duer ikke.

Jeg har forsøgt mig lidt med Val() og Replace(), men jeg har ikke kunnet få
det til at fungere. Er der nogen der har en go' idé?
--
Med venlig hilsen
Lars Klingenberg
[lklingenberg@ifi.ku.dk]


<script language="vbscript">
Sub btnSubmit_OnClick()
If Not IsNumeric(frmAdd.ID.value) Then
Alert "Du skal indtaste et tal!"
frmAdd.ID.focus
Exit Sub
ElseIf Len(frmAdd.dato.value) = 0 Then
Alert "Du skal indskrive en dato!"
frmAdd.dato.focus
Exit Sub
ElseIf Not IsDate(frmAdd.dato.value) Then
Alert "Datoen skal være på formen dd-mm-yy!"
frmAdd.dato.focus
Exit Sub
End if
Call frmAdd.submit()
End Sub
</script>


--
Med venlig hilsen
Lars Klingenberg
[lklingenberg@ifi.ku.dk]




 
 
Lars Hoffmann (09-04-2001)
Kommentar
Fra : Lars Hoffmann


Dato : 09-04-01 16:12

Lars Klingenberg wrote:
>
> Halløj,
>
> Tager man sig også af vbscript spørgsmål her?

Jeps.

> Jeg har et lille problem med en formvalidering (se herunder)
>
> Et af felterne (ID) SKAL være et tal og det sikrer jeg mig delvist med If
> Not IsNumeric(), men hvis der indskrives et mellemrum (chr(32)) i formen
> fanger IsNumeric ikke dette og der returneres et mellemrum med mit tal - og
> det duer ikke.

kan du ikke lave en while-løkke og løbe alle tegnene igennem i feltet,
og så advare hvis der på en af pladserne er et mellemrum. Jeg kender
ikke vbscript, men i visual basic ser det nogenlunde således ud:

dim i as integer
dim gaaUd as boolean

i = 1
gaaUd = False

do while i <= len(frmAdd.ID.value) and not gaaUd
if mid(frmAdd.ID.value,i,1) = " " then
Alert "Der er intastet et mellemrum"
gaaUd = True
end if

i= i + 1
loop


Det kan du sikkert rimelig nemt oversætte til vbscript.

--
/Lars

HTML software gratis: <http://go.to/HTMLEasyColors>
A computer scientist is someone who, when told to 'Go to Hell',
sees the 'go to', rather than the destination, as harmful.

Søg
Reklame
Statistik
Spørgsmål : 177560
Tips : 31968
Nyheder : 719565
Indlæg : 6408946
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste