typer = request.querystring("SPIL") If typer = "All" or typer="" Then Sql = "SELECT * FROM psx order by Titel asc;" ElseIf typer <> "All" Then Sql = "SELECT * FROM psx WHERE typer='"&typer&"' order by Titel asc;" End If Set hent = conn.execute(sql)
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.
og det samme gør det med denne Set Conn = Server.CreateObject("ADODB.Connection") str = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=""" & Server.MapPath("./db/psx.mdb")
Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\Inetpub\wwwroot\psx\db\psx.mdb"
typer = request.querystring("SPIL") If typer = "All" or typer="" Then Sql = "SELECT * FROM psx order by Titel asc;" ElseIf typer <> "All" Then Sql = "SELECT * FROM psx WHERE typer='"&typer&"' order by Titel asc;" End If Set hent = conn.execute(sql)
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/psx.mdb") Så skal der ikke være nogen / før DB, da det er en undermappe tilden aktuelle
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.