---
title: "If?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/12215-if"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "tronez"
published: "2001-10-20T12:18:00.000Z"
updated: "2001-10-22T05:37:00.000Z"
replies: 3
views: 189
page: 1
pages: 1
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/12215-if"
---

# If?

## #1 — tronez, 2001-10-20T12:18Z

om jag har en första sida, där man länkar avändare från en databas.
admin ska kunna gå in i databasen och skriva "Ja/Nej" i ett tabellnamn.

om han skriver "Ja" i tabellen, så ska en bild komma upp bredvid länken.

Hur gör jag ?
tabellen heter "betalt"

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

## #2 — tronez, 2001-10-20T12:19Z

koden set ut så här

```
<%

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

SQL = "SELECT TOP 50 * FROM tabell ORDER BY nick DESC"
Set RecSet = Connect.Execute(SQL)

If RecSet.EOF Then
Response.Write "Inga anmälda än så länge."

Else
Do Until RecSet.EOF

Response.Write "<a href=namn.asp?ID="& RecSet("ID") &">"& RecSet("nick") &"</a><br><br>"

RecSet.MoveNext
Loop

RecSet.Close
Connect.Close

Set RecSet = Nothing
Set Connect = Nothing

%>
```

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

## #3 — OveRRidE, 2001-10-21T23:03Z

I cant seem to understand.. :q

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

## #4 — icaaq, 2001-10-22T05:37Z

om jag har en första sida, där man länkar avändare från en databas.
admin ska kunna gå in i databasen och skriva "Ja/Nej" i ett tabellnamn.

Du får väl lägga till ett fält i tabellen(t.ex F_boolean) där default-värdet är nej.

om han skriver "Ja" i tabellen, så ska en bild komma upp bredvid länken.

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

SQL = "SELECT TOP 50 * FROM tabell ORDER BY nick DESC"
Set RecSet = Connect.Execute(SQL)

If RecSet.EOF Then
Response.Write "Inga anmälda än så länge."

Else
Do Until RecSet.EOF

Response.Write "<a href=namn.asp?ID="& RecSet("ID") &">"& RecSet("nick") &"</a>" & vbcrLf
If RecSet("F_Boolean") = "Ja" Then
Response.Write "<img src=""bild.jpg""><br><br>" &vbCrLf
Else
Response.Write "<br><br>" &vbCrLf
End If

RecSet.MoveNext
Loop

RecSet.Close
Connect.Close

Set RecSet = Nothing
Set Connect = Nothing

%>
```

om jag fattat dig rätt :l

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/12215-if