---
title: "skriva om för att passa MySQL istället för access"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/124736-skriva-om-för-att-passa-mysql-istället-för-access"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "WebbisNet"
published: "2005-03-19T22:47:04.000Z"
updated: "2005-03-19T23:36:32.000Z"
replies: 13
views: 365
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/124736-skriva-om-för-att-passa-mysql-istället-för-access"
---

# skriva om för att passa MySQL istället för access

## #1 — WebbisNet, 2005-03-19T22:47Z

Nån som vet hur man får denna kod att visa bilderna istället för att gå till eof

```
Dim oConn ,strSQL ,bilder ,i, j ,Count ,post ,antalBilder ,Found 
     
    Set oConn = Server.CreateObject("ADODB.Connection") 
	oConn.Open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=serveradress;PORT=3306;DATABASE=användarnamn;USER=användarnamn;PASSWORD=lösenord;OPTION=3;"

    strSQL = "SELECT userID, picture, username, visaBild FROM tblUsers "& _ 
             "WHERE not picture='nopic.jpg' and visaBild=1" 

    Set rs = oConn.Execute(strSQL) 
    If rs.EOF Then 
        Response.Write "Det finns inga bilder..." 
    Else 
        Response.Write "<table width=""95%""><tr><td align=""left"">" 
        bilder = rs.GetRows() 
        antalBilder = UBound(bilder, 2) + 1 

        Count = 5 
        If Count > antalBilder Then 
            Count = antalBilder
        End If 
        ReDim Shown(Count) 

        Randomize 

        For i = 1 To Count 
            Do 
                Found = False 
                post = Int(Rnd * antalBilder) 

                For j = 1 To i - 1 
                    If Shown(j) = post Then 
                        Found = True 
                        Exit For 
                    End If 
                Next 
            Loop While Found 
            Shown(i) = post 

            Response.Write "<a target=""_top"" href=""/view.asp?userID="&bilder(0, post)&"""><img border=""0"" height=""100"" width=""80"" src=""/upload/images/users/" & bilder(1, post) & """ alt=""" & bilder(2, post) & """></a>&nbsp;" 
        Next 
        Response.Write "</td></tr></table>" 
    End If 
    rs.Close 
    Set rs = Nothing
```

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

## #2 — Poffe, 2005-03-19T22:49Z

Om det finns några träffat så kommer ju inte EOF att visas. Förstår inte riktigt vad du menar.

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

## #3 — WebbisNet, 2005-03-19T22:53Z

det är samma kod förutom kopplingen som jag hade med access som visar bilderna, med mysql får jag att rs når eof och därmed skriver ut inga bilder

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

## #4 — Poffe, 2005-03-19T22:56Z

Har du laggt över alla poster till mysql-databasen då?

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

## #5 — WebbisNet, 2005-03-19T22:59Z

har kört över hela access databasen till MySQL och alla i bilder i samma mapp till nya platsen

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

## #6 — Poffe, 2005-03-19T23:01Z

"Felet" beror ju iallafall på att det som söks inte hittas. Vad jag ser nu är det ineget fel på sql-satsen men är iofs riktigt trött så det är nog bäst att nån annan kollar på det :)

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

## #7 — WebbisNet, 2005-03-19T23:04Z

> **Poffe skrev:**
>
> "Felet" beror ju iallafall på att det som söks inte hittas. Vad jag ser nu är det ineget fel på sql-satsen men är iofs riktigt trött så det är nog bäst att nån annan kollar på det :)

Egentligen ska inget vara fel eftersom den funkade med access, måste vara nåt speciellt som inte mysql förstår

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

## #8 — Poffe, 2005-03-19T23:10Z

Det är ju inget fel efter som du inte får nått felmeddelande, den hittar bara inga poster som matchar helt enkelt.

Har du verkligen fört över allt korrekt?

Det ända jag kan komma på för att kolla det du vill med lite annan kod just nu är

```
strSQL = "Select userID, picture, username, visaBild From tblUsers "& _ 
             "Where picture <> 'nopic.jpg' And visaBild = 1"
```

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

## #9 — WebbisNet, 2005-03-19T23:14Z

> **Poffe skrev:**
>
> Det är ju inget fel efter som du inte får nått felmeddelande, den hittar bara inga poster som matchar helt enkelt.
> 
> Har du verkligen fört över allt korrekt?
> 
> Det ända jag kan komma på för att kolla det du vill med lite annan kod just nu är
>
> ```
> strSQL = "Select userID, picture, username, visaBild From tblUsers "& _ 
>              "Where picture <> 'nopic.jpg' And visaBild = 1"
> ```

fortfarande rs.eof

har kollat databasen och jag kan se alla bildnamn i den tabellen

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

## #10 — Poffe, 2005-03-19T23:24Z

Och visaBild = 1?

Vilka datatyper är det på fälten?

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

## #11 — WebbisNet, 2005-03-19T23:26Z

visaBild var true i access då det är en checkruta som visar om användaren vil att bilden ska komma med eller inte, i mysql är det bara 0 eller 1

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

## #12 — Poffe, 2005-03-19T23:27Z

Och fältet är av typen Int?

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

## #13 — WebbisNet, 2005-03-19T23:32Z

> **Poffe skrev:**
>
> Och fältet är av typen Int?

Du löste problemet utan att säga det, du fick mig att kolla tabelllen igen och då såg jag att det var -1 och inte 1

tack så mycket

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

## #14 — Poffe, 2005-03-19T23:36Z

Som sagt, den hittade inte det den sökte. Presic som jag sa i börjar ;)

Men ibland måste man kolla flera gånger för att se det, har varit med om det själv :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/124736-skriva-om-för-att-passa-mysql-istället-för-access