---
title: "Nu har jag kört fast! Har med querystrings att göra.."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/53826-nu-har-jag-kört-fast-har-med-querystrings-att-göra/page2"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Gardell"
published: "2002-09-20T21:12:11.000Z"
updated: "2003-01-20T16:01:41.000Z"
replies: 28
views: 538
page: 2
pages: 2
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/53826-nu-har-jag-kört-fast-har-med-querystrings-att-göra"
---

# Nu har jag kört fast! Har med querystrings att göra..

_Sida 2 av 2._

## #21 — UlfT, 2002-09-21T12:03Z

Tex så här:

```
<%
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("filmer.mdb")&";" 

If len(Request.QueryString("film")) = 0 Then

Response.Write "frågade inget"

Else

strSQL = "SELECT * FROM film WHERE id = "& Request.QueryString("film")
Set objRS = Connect.Execute(strSQL)

Response.Write objRS("Recension")

End if

%>
```

Permalänk: https://www.webforum.nu/p/793545

## #22 — Ekström, 2002-09-21T12:04Z

```
<%
If len(Request.QueryString("film")) = 0 Then
Response.Write "En text."
Else
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("filmer.mdb")&";" 

strSQL = "SELECT * FROM film WHERE id = "& Request.QueryString("film")

Set objRS = Connect.Execute(strSQL)

Response.Write objRS("Recension")
End if
%>
```

Permalänk: https://www.webforum.nu/p/793546

## #23 — Gardell, 2002-09-21T12:07Z

> **UlfT skrev:**
>
> Tex så här:
> 
>
>
> ```
> <%
> Set Connect = Server.CreateObject("ADODB.Connection") 
> Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("filmer.mdb")&";" 
> 
> If len(Request.QueryString("film")) = 0 Then
> 
> Response.Write "frågade inget"
> 
> Else
> 
> strSQL = "SELECT * FROM film WHERE id = "& Request.QueryString("film")
> Set objRS = Connect.Execute(strSQL)
> 
> Response.Write objRS("Recension")
> 
> End if
> 
> %>
> ```

 :bire  :birp    :e 

Tack m8!

Permalänk: https://www.webforum.nu/p/793548

## #24 — UlfT, 2002-09-21T12:09Z

\-\> Ekström

Du har kvar en "End If" för mycket. Kanske bäst att påpeka det så Gardell vet varför han får felmeddelanden ;)

Permalänk: https://www.webforum.nu/p/793552

## #25 — Ekström, 2002-09-21T12:11Z

Tack UlfT! :)

Har ändrat det nu

Permalänk: https://www.webforum.nu/p/793553

## #26 — Gardell, 2002-09-21T12:32Z

> **UlfT skrev:**
>
> \-\> Ekström
> 
> Du har kvar en "End If" för mycket. Kanske bäst att påpeka det så Gardell vet varför han får felmeddelanden ;)

Något sånt kan jag faktiskt räkna ut själv du!  :x

Permalänk: https://www.webforum.nu/p/793560

## #27 — CatZ, 2002-09-21T12:46Z

Vet inte om det var detta du var ute efter men som jag gjort det kan du använda samma sak till att visa både länkarna och recensionerna...

```
<%
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("filmer.mdb")&";" 

If len(Request.QueryString("film")) = 0 Then

strSQL = "SELECT * FROM film ORDER BY id DESC
Set objRS = Connect.Execute(strSQL)

Do while not objRS.EOF
Response.Write "<a href=film.asp?id=" & objRS("id") & ">" & objRS("[b]filmtite[/b]-byt ut mot fältnamnet i din databas") & "</a>"
objRS.MoveNext
Loop

Else

strSQL = "SELECT * FROM film WHERE id = "& Request.QueryString("film")
Set objRS = Connect.Execute(strSQL)

Response.Write objRS("Recension")

End if

%>
```

Permalänk: https://www.webforum.nu/p/793566

## #28 — udden, 2003-01-20T16:00Z

modifiera recordset?

kan man ta bort en rad i ett recordset?

set rs = conn.execute(strSQL)

if rs("nått") = 1 Then
rs.deleterow

finns det något i denna stilen?

Permalänk: https://www.webforum.nu/p/920039

## #29 — udden, 2003-01-20T16:01Z

nejnejnej...

ber om ursäkt, klickade tydligen på fel knapp.. skulle skapa en ny tråd...

Permalänk: https://www.webforum.nu/p/920040

---

Tråden på webben: https://www.webforum.nu/amne/asp/53826-nu-har-jag-kört-fast-har-med-querystrings-att-göra/page2  
Föregående sida: https://www.webforum.nu/amne/asp/53826-nu-har-jag-kört-fast-har-med-querystrings-att-göra.md