Kirjautuminen
Tehtävät
Kilpailu
Kilpailu on päättynyt.
Heippa taas!
APUA...alkaa pikkuhiljaa lähes v******maan!!!
Here's my story...
Minulla on aspx-sivulla piilossa usercontrol, jonka kaivan esiin 'Login' linkbuttonilla. Usercontrollissa on tekstiboxit username & password sekä nappi. Napin takana on koodi, joka tsekkaa WSDL/WebService-funktion avulla löytyykö tietokannasta käyttäjätunnus/salasana pari. Jos löytyy niin funktio palauttaa true ja kaikki on OK, mutta jos funktio palauttaa false ja haluan ilmoitella asiasta JavaScript alertilla...
'...
Else 'palaute on false
Dim message as String = "Tunnus/Salasana paria ei löydy!"
Dim script As String = _
"<script type=" + Chr(34) + "text/javascript" + Chr(34) + _
">alert("+ Chr(39) + message + Chr(39) + ");<" + "/script>"
Page.RegisterClientScriptBlock("",script)
textuid.Text ="": textpwd.Text ="": textuid.focus
End Ifniin alert toimii, mutta usercontrolli häippäsee näkymättömiin, mikä ei ole tarkoitus tapauksessa, että isketään vahingossa väärin...SIIS MIKÄ NEUVOKSI???
Heippa taas!
...ja päivä taasen paistaa...Trala laa...
...
Else 'jos palaute on false niin...
Dim message as String = "Tunnus/Salasan pari ei täsmää!"
Dim script As String = _
"<script type=" + Chr(34) + "text/javascript" + Chr(34) + _
">alert("+ Chr(39) + message + Chr(39) + ");<" + "/script>"
Page.RegisterClientScriptBlock("clientScript",script)
Dim ctl as Control
For Each ctl In Page.Controls
Try
If ctl.ID = "form1" Then
Dim fctl as Control
For Each fctl in ctl.Controls
Try
If fctl.ID = "uctl1" Then
fctl.visible = True
End if
Catch exx As Exception
End Try
Next
End If
Catch ex As Exception
End Try
Next
textuid.Text ="": textuid.focus
End IfAihe on jo aika vanha, joten et voi enää vastata siihen.