20. juli 2001 - 13:56Der er
7 kommentarer og 1 løsning
Type mismatch: \'UBOUND\'
Microsoft VBScript runtime error \'800a000d\'
Type mismatch: \'UBOUND\'
/admin.asp, line 7
Får jeg når dette script kører:
<% Dim strUserAllowed, arrUserAllowed, userName, found found = false strUserAllowed = \"enBruger,toBruger,treBruger,fireBruger\" arrUseAllowed = SPLIT( strUserAllowed, \",\" ) userName = Request.Cookies(\"MyCookie\")(\"userName\") for i=0 to UBOUND( arrUserAllowed ) if ( arrUserAllowed(i) = userName ) then found = true exit for end if next if NOT found then response.redirect \"login.asp\" end if %>
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.
jeg har ikke prøvet det, men jeg kan ikke se hvorfor det her ikke skal virke..
<% Dim strUserAllowed, arrUserAllowed, userName, found found = false strUserAllowed = \"enBruger,toBruger,treBruger,fireBruger\" arrUseAllowed = Split(strUserAllowed,\",\") userName = Request.Cookies(\"MyCookie\")(\"userName\") for i=LBound(arrUserAllowed) To UBound(arrUserAllowed) if arrUserAllowed(i) = userName then found = true exit for end if next if NOT found then response.redirect \"login.asp\" end if %>
<% Dim strUserAllowed, arrUserAllowed, userName, found found = false strUserAllowed = \"enBruger,toBruger,treBruger,fireBruger\" arrUseAllowed = Split(strUserAllowed,\",\") userName = Request.Cookies(\"MyCookie\")(\"userName\") for i=LBound(arrUseAllowed) To UBound(arrUseAllowed) if arrUseAllowed(i) = userName then found = true exit for end if next if NOT found then response.redirect \"login.asp\" end if %>
zeth: Hvor ikke bare bruge arrUserAllowed som erklæret i dim sætningen..?
Synes godt om
Ny brugerNybegynder
Din løsning...
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.
