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.
moonduck > jeg får fejl: Microsoft OLE DB Provider for ODBC Drivers error \'80040e14\'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression \'godkendt=1 brugernavn LIKE \'q%\' OR brugernavn LIKE \'a%\' OR brugernavn LIKE \'z%\' OR brugernavn LIKE \'w%\' OR brugernavn LIKE \'s%\' OR brugernavn LIKE \'x%\' OR brugernavn LIKE \'e%\' OR brugernavn LIKE \'d%\' OR brugernavn LIKE \'c%\' OR brugernavn LIKE \'r%\' OR brugern\'.
minijensen > med dit får jeg også det samme fejl, og jeps, feltet er Ja/Nej felt !
Udfra stumpen kan jeg se du mangler et AND sådan her:
SELECT * FROM bruger WHERE godkendt=1 AND brugernavn LIKE \'q%\' OR brugernavn LIKE \'a%\' OR brugernavn LIKE \'z%\' OR brugernavn LIKE \'w%\' OR brugernavn LIKE \'s%\' OR brugernavn LIKE \'x%\' OR brugernavn LIKE \'e%\' OR brugernavn LIKE \'d%\' OR brugernavn LIKE \'c%\' OR brugernavn LIKE \'r%\' OR brugern\'
sorry, her er den :O) <% str_alfa = LCase(Request.QueryString.Item(\"alfa\")) & UCase(Request.QueryString.Item(\"alfa\")) str_sql2 = \"SELECT * FROM bruger where godkendt=\'true\'\" If Len(str_alfa) < 1 Then str_alfa = \"ABCDabcd\" End if for i = 1 to Len(str_alfa) If i <> 1 Then str_sql2 = str_sql2 & \" OR\" End If str_sql2 = str_sql2 & \" brugernavn LIKE \'\" & Mid(str_alfa,i,1) & \"%\'\" next
str_sql2 = str_sql2 & \" ORDER BY brugernavn\"
Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"database.mdb\") Set rs = Conn.Execute (str_sql2) %> <% if rs.EOF then %>
<% str_alfa = LCase(Request.QueryString.Item(\"alfa\")) & UCase(Request.QueryString.Item(\"alfa\")) str_sql2 = \"SELECT * FROM bruger where godkendt=\'true\' AND (\" If Len(str_alfa) < 1 Then str_alfa = \"ABCDabcd\" End if for i = 1 to Len(str_alfa) If i <> 1 Then str_sql2 = str_sql2 & \" OR\" End If str_sql2 = str_sql2 & \" brugernavn LIKE \'\" & Mid(str_alfa,i,1) & \"%\'\" next
str_sql2 = str_sql2 & \") ORDER BY brugernavn\"
Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"database.mdb\") Set rs = Conn.Execute (str_sql2) %> <% if rs.EOF then %>
Okay nu kan det godt være at jeg lyder lidt negativ men man bliver altså nødt til at lære at bruge værktøjet før man kan lave noget fornuftigt. Det virker ikke som om du har gidet at gennemgå de mange ressourcer der er om VBScript, ASP og SQL. Du kan ikke forvente en færdig løsning fra folk her på eksperten eller sagt på en anden måde:
Jeg har siddet og teste og teste og tjekke og tjekke hvorfor den viser de ugodkendte bruger...
og til sidste tjekkede jeg database, og var alle brugerne godkendT !!
sorry moonduck Min fejl :(
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.