Brug af AI afslører de svagheder, virksomheder allerede har opbygget gennem års cloud-transformation, nye SaaS-løsninger og fragmenterede sikkerhedssystemer.
Dim ObjConn, strSQL, objRS Set objConn = Server.CreateObject("ADODB.Connection") ObjConn.ConnectionString="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath ObjConn.Open
strSQL = "Select COUNT([id]) AS antal FROM album WHERE datolink ='" & Request.Querystring("dato") &"'" set objRS = objConn.execute(strSQL) response.write objRS("antal")
<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../database/dsj.mdb") sqlstr = "Select COUNT(id) AS antal FROM album WHERE datolink ='" & Request.Querystring("dato") set rs = conn.execute strTal = "0" Do strTal = strTal + 1 rs.movenext loop while not rs.eof Conn.Execute(sqlstr) Response.write "<br>SQL:"& antal response.end %>
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.