---
title: "Blind för End if:et!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/102135-blind-för-end-if-et"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "crisse6"
published: "2004-04-22T18:44:25.000Z"
updated: "2004-04-23T06:30:33.000Z"
replies: 16
views: 334
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/102135-blind-för-end-if-et"
---

# Blind för End if:et!

## #1 — crisse6, 2004-04-22T18:44Z

Tjaaaa!

Kolla bara på koden... den påstår att jag inte satt End IF, "End förväntas..."

```
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open("Driver=MySQL ODBC 3.51 Driver;server=localhost;database=annonser;uid=root;pwd=")

strVal = request.querystring("val")

If strVal = "visa_alla" then
	strSQL = "Select * From t_annonser ORDER by datum DESC"
Else IF strVal = "saljes" then
	strSQL = "Select * From t_annonser Where kategori = 'Säljes' ORDER BY datum DESC"
Else IF strVal = "kopes" then
	strSQL = "Select * From t_annonser Where kategori = 'Köpes' ORDER BY datum DESC"
Else IF strVal = "uthyres" then
	strSQL = "Select * From t_annonser Where kategori = 'Uthyres' ORDER BY datum DESC"
Else IF strVal = "onskas_uthyrning" then
	strSQL = "Select * From t_annonser Where kategori = 'Önskas uthyrning' ORDER BY datum DESC"
Else
	strSQL = "Select * From t_annonser ORDER by datum DESC"
End IF

set objRS = Connect.execute(strSQL)

IF objRS.EOF then
	response.write "<hr size=""1"" color=""black""><i>Inga annonser...</i><hr size=""1"" color=""black"">"
Else

	Do Until objRS.eof
	response.write "<table width=""500""><tr><td width=""70""><b>Namn:</b></td><td>"& objRS("namn") &"</td></tr></table>"
	
	objRS.movenext
	loop
END IF
%>
```

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

## #2 — LarsG, 2004-04-22T18:45Z

Else IF --\> ElseIf

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

## #3 — crisse6, 2004-04-22T18:48Z

nääää. fan !

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

## #4 — crisse6, 2004-04-22T18:51Z

nu får man ju det roliga.... usch!
har ju odbc 3.51 installerat!

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
\[Microsoft\]\[ODBC Driver Manager\] Datakällan hittades inte och ingen standarddrivrutin är angiven

```
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open("mysql;server=localhost;database=annonser;uid=root;pwd=")
```

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

## #5 — cyprys, 2004-04-22T18:54Z

<http://www.connectionstrings.com/>

Du har ju inte ens angivit någon driver.

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

## #6 — crisse6, 2004-04-22T18:57Z

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open("Driver={mysql};server=localhost;Option=16834;database=annonser;")

Funkar ju inte heller.......

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

## #7 — crisse6, 2004-04-22T20:14Z

Ingen som vet!?

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

## #8 — Peeer, 2004-04-22T20:17Z

```
connect.open "driver={MySQL ODBC 3.51 Driver};SERVER=servername; DB=dbname;PORT=3306;UID=username;PWD=password;"
```

Körde jag med när jag pysslade med asp/mysql

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

## #9 — crisse6, 2004-04-22T20:20Z

Samma felmes..... Det med drivrutiner... :S

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

## #10 — Poffe, 2004-04-22T20:38Z

Har du installerat MyODBC på din server då?

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

## #11 — crisse6, 2004-04-22T20:39Z

Ja.. har ju kört den, 3.51 !

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

## #12 — Poffe, 2004-04-22T20:42Z

I så fall ska denna funka:

```
dbcon = "Driver={MySQL ODBC 3.51 Driver};Server="& dbsrv &";Database="& dbname &";UID="& dbuser &";PWD=" & dbpwd
```

Den kör jag med iallafall..

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

## #13 — crisse6, 2004-04-22T20:45Z

men du, "& dbsrv &", vad ska jag skriva där? bara localhost då?!

kör ju med denna nu som inte funkar.....

```
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.open("driver=myodbc3-test;server=localhost;user=root;password=;database=annonser;")
```

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

## #14 — Josef, 2004-04-22T20:52Z

Provat att ominstallera MYODBC?

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

## #15 — crisse6, 2004-04-22T20:53Z

jupp

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

## #16 — Poffe, 2004-04-22T21:14Z

> **crisse6 skrev:**
>
> men du, "& dbsrv &", vad ska jag skriva där? bara localhost då?!

Ja precis, blir ju så här:

```
Driver={MySQL ODBC 3.51 Driver};Server=loclahost;Database=databas;UID=användarnamn;PWD=lösenord
```

Jag har allt sånt i en settings-fil och la in alla uppgifter i variablar men blir ju samma sak i slutändan :)

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

## #17 — crisse6, 2004-04-23T06:30Z

Vad e det för lösenord på localhost då? och användarnamn? root?

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/102135-blind-för-end-if-et