I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Sub validerLogin(brugernavn,pw) Set ObjFysisk=New Fysisk Set ObjCon=ObjFysisk.DBConnect Set objFysisk=nothing Sql=\"Select [password], brugernavn from medlemmer where brugernavn=\'\" & brugernavn & \"\'\" Set RS=ObjCon.Execute(SQL) If RS.bof and RS.eof then Response.Redirect (\"main.asp?funktion=loginform&status=fejl\") Else While not RS.eof If (RS(\"password\"))=(pw) then Set objFysisk=new Fysisk objFysisk.setUser(Cstr(RS(\"brugernavn\"))) Set objFysisk=Nothing
Response.Redirect (\"main.asp\") Else Response.Redirect (\"main.asp?funktion=loginform&status=fejl\") End if RS.MoveNext Wend End If ObjCon.Close Set ObjCon=Nothing End Sub
Har jo lige sagt at det ikke kan lade sig gøre serverside.
If RS.bof and RS.eof then Response.Redirect (\"main.asp?funktion=loginform&status=fejl\") Else While not RS.eof If (RS(\"password\"))=(pw) then Set objFysisk=new Fysisk objFysisk.setUser(Cstr(RS(\"brugernavn\"))) Set objFysisk=Nothing %> <SCRIPT LANGUAGE=\"Javascript\"> perant.rammenavn.location.reload(); location.href = \'main.asp\'; </SCRIPT> <% Else Response.Redirect (\"main.asp?funktion=loginform&status=fejl\") End if RS.MoveNext Wend End If
If RS.bof and RS.eof then Response.Redirect (\"main.asp?funktion=loginform&status=fejl\") Else While not RS.eof If (RS(\"password\"))=(pw) then Set objFysisk=new Fysisk objFysisk.setUser(Cstr(RS(\"brugernavn\"))) Set objFysisk=Nothing %> <SCRIPT LANGUAGE=\"Javascript\"> parent.rammenavn.location.reload(); location.href = \'main.asp\'; </SCRIPT> <% Else Response.Redirect (\"main.asp?funktion=loginform&status=fejl\") End if RS.MoveNext Wend 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.