01. september 2002 - 19:11Der er
16 kommentarer og 1 løsning
Siden er blank
Jeg har hentet en gæstebog i asp fra en download side, men når jeg vil se siden er den blank, men i frontpage kan jeg se siden og rette i den?? er der nogen der kan hjælpe.
Function ValidateLogin( sId, sPwd ) ' For you to validate ID and PASSWORD ' Maybe against a database ' Here we have hardcoded some OK id:s and passwords ' ValidateLogin = False
If sId = "admin" AND sPwd="admin" Then ValidateLogin = True End If End Function
Dim sText, fBack
fBack = False If Request.Form("dologin") = "yes" Then 'Try to login If ValidateLogin( Request.Form("id"),Request.Form("pwd") ) = True Then 'It is OK!!! 'We are logged in so lets go back to the file that included us fBack = True Session("logonid") = Request.Form("id") Else sText = "Wrong password or user id" End If Else 'We are not trying to login... If Session("logonid") <> "" Then ' fBack = True 'We are logged in so lets go back to the file that included us Else sText = "Please login" End If End If
Function ValidateLogin( sId, sPwd ) ' For you to validate ID and PASSWORD ' Maybe against a database ' Here we have hardcoded some OK id:s and passwords ' ValidateLogin = False
If sId = "admin" AND sPwd="admin" Then ValidateLogin = True End If End Function
Dim sText, fBack
fBack = False If Request.Form("dologin") = "yes" Then 'Try to login If ValidateLogin( Request.Form("id"),Request.Form("pwd") ) = True Then 'It is OK!!! 'We are logged in so lets go back to the file that included us fBack = True Session("logonid") = Request.Form("id") Else sText = "Wrong password or user id" End If Else 'We are not trying to login... If Session("logonid") <> "" Then ' fBack = True 'We are logged in so lets go back to the file that included us Else sText = "Please login" End If End If
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.