---
title: "namn blir länk"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/96540-namn-blir-länk"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Siluett"
published: "2004-02-04T10:00:54.000Z"
updated: "2004-02-05T17:38:35.000Z"
replies: 4
views: 326
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/96540-namn-blir-länk"
---

# namn blir länk

## #1 — Siluett, 2004-02-04T10:00Z

"e" finns i min tabell som ett namn. Om "e" har ett id i samma tabell så vill jag att det ska bli en länk till "e", annars ska det bara skriva ut namnet på "e". 

såhär ser min "nydörjarkod" ut

   \<% 		  
   
  Dim e
  
  If Not RecSet.EOF Then 
  e = "" & RecSet("e")
  Else
 
  Do until RecSet.EOF
  
  Set RecSet = Conn.Execute("Select \* From hingstar")
  
  If Not isnull (RecSet("e")) Then 
  e = "" & RecSet("e")
  e = Replace(e, RecSet("e"), "\<a href=""" & RecSet("id") & """\>" & RecSet("e") & "\</a\>")
  End If
  
  
  RecSet.MoveNext
  Loop
  Else
  Response.Write RecSet("e")
  End If
  %\>

och då får jag syntax error på det sista
  RecSet.MoveNext
  Loop
  Else
  Response.Write RecSet("e")
  End If

hjälp?

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

## #2 — Jesper T, 2004-02-04T11:56Z

Det kändes så rörigt, är det något liknande du menar?

```
'Connection osv.

Set RecSet = Conn.Execute("Select e,id From hingstar")

If Not RecSet.EOF Then
        Do until RecSet.EOF 

            if RecSet("e")<>"" then  
                Response.write "<a href="& RecSet("id") &">"& RecSet("e") &"</a>"
            else
                Response.write RecSet("e")
            end if

        RecSet.MoveNext
        Loop
else
    Response.write "Inga poster"
end if
```

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

## #3 — solbulle, 2004-02-04T22:18Z

Jesper:

Ska det inte stå:

if RecSet("id")\<\>"" then  

?

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

## #4 — Jesper T, 2004-02-04T22:20Z

Säkert. ;)

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

## #5 — Siluett, 2004-02-05T17:38Z

Såhär menar jag:

			    		   \<% 		
   Set RecSet = Conn.Execute("Select \* From hingstar Where e='" & trim(Request.Querystring("namn")) & "'")
     
     Dim e
     
  If Not RecSet.EOF Then 
  e = RecSet("e")
  Else
  e = ""
  End If
  
  Set RecSet = Conn.Execute("Select \* From hingstar")
 
  e = Replace(e, RecSet("namn"), "\<a href=?do=visa&id=" & RecSet("id") & "\>" & RecSet("e") & "\</a\>")

  Else
  Response.Write RecSet("e")
  RecSet.Close
	Set RecSet = Nothing
  End If
  %\>

MEN problemet är att det nu inte blir en länk av det... men inga felmedd dyker upp (phu!). namnet visas, men det länkar inte till namnets id.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/96540-namn-blir-länk