---
title: "ASP till PHP"
type: "forum-thread"
url: "https://www.webforum.nu/amne/php/50344-asp-till-php"
topic: "PHP"
topic_url: "https://www.webforum.nu/amne/php"
author: "Squid"
published: "2002-08-14T21:59:53.000Z"
updated: "2002-08-16T13:15:37.000Z"
replies: 3
views: 204
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/php/50344-asp-till-php"
---

# ASP till PHP

## #1 — Squid, 2002-08-14T21:59Z

kan någon hjälpa mig med att få den är att bli i php kod den ska arbeta med mysql databas.

\<%

IF Request.Querystring("kat") = "" then
kat = "index"
ELSE
kat = Request.Querystring("kat")
END IF

If kat = "index" Then
SQL = "Select TOP 10 \* From pc ORDER BY ID DESC"
ElseIf kat = "a" Then
SQL = "Select \* From pc Where kat= 'a' ORDER BY fusk_namn asc"
ElseIf kat = "b" Then
SQL = "Select \* From pc Where kat= 'b' ORDER BY fusk_namn asc"
ElseIf kat = "c" Then
SQL = "Select \* From pc Where kat= 'c' ORDER BY fusk_namn asc"
ElseIf kat = "d" Then
SQL = "Select \* From pc Where kat= 'd' ORDER BY fusk_namn asc"
ElseIf kat = "e" Then
SQL = "Select \* From pc Where kat= 'e' ORDER BY fusk_namn asc"
ElseIf kat = "f" Then
SQL = "Select \* From pc Where kat= 'f' ORDER BY fusk_namn asc"
ElseIf kat = "g" Then
SQL = "Select \* From pc Where kat= 'g' ORDER BY fusk_namn asc"
ElseIf kat = "h" Then
SQL = "Select \* From pc Where kat= 'h' ORDER BY fusk_namn asc"
ElseIf kat = "i" Then
SQL = "Select \* From pc Where kat= 'i' ORDER BY fusk_namn asc"
ElseIf kat = "j" Then
SQL = "Select \* From pc Where kat= 'j' ORDER BY fusk_namn asc"
ElseIf kat = "k" Then
SQL = "Select \* From pc Where kat= 'k' ORDER BY fusk_namn asc"
ElseIf kat = "l" Then
SQL = "Select \* From pc Where kat= 'l' ORDER BY fusk_namn asc"
ElseIf kat = "m" Then
SQL = "Select \* From pc Where kat= 'm' ORDER BY fusk_namn asc"
ElseIf kat = "n" Then
SQL = "Select \* From pc Where kat= 'n' ORDER BY fusk_namn asc"
ElseIf kat = "o" Then
SQL = "Select \* From pc Where kat= 'o' ORDER BY fusk_namn asc"
ElseIf kat = "p" Then
SQL = "Select \* From pc Where kat= 'p' ORDER BY fusk_namn asc"
ElseIf kat = "q" Then
SQL = "Select \* From pc Where kat= 'q' ORDER BY fusk_namn asc"
ElseIf kat = "r" Then
SQL = "Select \* From pc Where kat= 'r' ORDER BY fusk_namn asc"
ElseIf kat = "s" Then
SQL = "Select \* From pc Where kat= 's' ORDER BY fusk_namn asc"
ElseIf kat = "t" Then
SQL = "Select \* From pc Where kat= 't' ORDER BY fusk_namn asc"
ElseIf kat = "u" Then
SQL = "Select \* From pc Where kat= 'u' ORDER BY fusk_namn asc"
ElseIf kat = "v" Then
SQL = "Select \* From pc Where kat= 'v' ORDER BY fusk_namn asc"
ElseIf kat = "w" Then
SQL = "Select \* From pc Where kat= 'w' ORDER BY fusk_namn asc"
ElseIf kat = "x" Then
SQL = "Select \* From pc Where kat= 'x' ORDER BY fusk_namn asc"
ElseIf kat = "y" Then
SQL = "Select \* From pc Where kat= 'y' ORDER BY fusk_namn asc"
ElseIf kat = "z" Then
SQL = "Select \* From pc Where kat= 'z' ORDER BY fusk_namn asc"
ElseIf kat = "å" Then
SQL = "Select \* From pc Where kat= 'å' ORDER BY fusk_namn asc"
ElseIf kat = "ä" Then
SQL = "Select \* From pc Where kat= 'ä' ORDER BY fusk_namn asc"
ElseIf kat = "ö" Then
SQL = "Select \* From pc Where kat= 'ö' ORDER BY fusk_namn asc"
End If

Set rs= Conn.execute(SQL)
If not rs.eof Then
Do until rs.eof
%\>
          \<a href="pc_consol_fusk_read.asp?ID=\<%= rs("ID") %\>"\>\<%= rs("fusk_namn") %\>\</a\>\<br\>
          \<% 
rs.movenext
Loop
rs.Close
Set rs = Nothing
end if
%\>

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

## #2 — UlfT, 2002-08-14T22:16Z

Jag kan inte hjälpa dig med det du frågar efter, men jag kunde inte låta bli att notera hela harangen av "elseif" som du använder för att bygga upp din sql-sats. Skriv istället:

```
If kat="index" Then
  SQL = "Select TOP 10 * From pc ORDER BY ID DESC"
Else
  SQL = "Select * From pc Where kat='" & kat & "' ORDER BY fusk_namn asc"
End If
```

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

## #3 — Fredde Mannen, 2002-08-16T11:45Z

Mamma mia va mycke If satser!!! =)

Hmm... ska väl kunna hjälpa dig lite granna!!! :e

\<%
IF Request.Querystring("kat") = "" then 
kat = "index" 
ELSE 
kat = Request.Querystring("kat") 
END IF 
%\>

```php
<?php
// Då kör vi!!!
If($HTTP_GET_VARS["kat"] == "") {
$kat = "index";
} else {
$kat = $HTTP_GET_VARS["kat"];
}
?>
```

\=================================
Den andra delen var det så mycke if-satser!!! :e
Kan väl göras så här på ett förkortat sätt!!!

```php
<?php
If($kat == "index") {
$SQL = "SELECT TOP10 * FROM pc ORDER BY ID DESC";
} else {
$SQL = "SELECT * From pc WHERE kat='$kat' ORDER BY fusk_namn asc";
}
?>
```

Nästa del.... 
\<%
Set rs= Conn.execute(SQL) 
If not rs.eof Then 
Do until rs.eof 
%\> 
\<a href="pc_consol_fusk_read.asp?ID=\<%= rs("ID") %\>"\>\<%= rs("fusk_namn") %\>\</a\>\<br\> 
\<% 
rs.movenext 
Loop 
rs.Close 
Set rs = Nothing 
end if 
%\>

```php
<?php
$result=mysql_query( $SQL );
While( $rad=mysql_fetch_array( $result ) ) {

$ID=rad["ID"];
$fusk_namn=rad["fusk_namn"];

echo "<a href=\"pc_consol_fusk_read.php?ID=".$ID."\">".$fusk_namn."</a></ br>";

}

?>
```

Kan hända att jag missat något då.. men men...   :birp 

\==============================
If kat = "index" Then 
SQL = "Select TOP 10 \* From pc ORDER BY ID DESC" 
ElseIf kat = "a" Then 
SQL = "Select \* From pc Where kat= 'a' ORDER BY fusk_namn asc" 
ElseIf kat = "b" Then 
SQL = "Select \* From pc Where kat= 'b' ORDER BY fusk_namn asc" 
ElseIf kat = "c" Then 
SQL = "Select \* From pc Where kat= 'c' ORDER BY fusk_namn asc" 
ElseIf kat = "d" Then 
SQL = "Select \* From pc Where kat= 'd' ORDER BY fusk_namn asc" 
ElseIf kat = "e" Then 
SQL = "Select \* From pc Where kat= 'e' ORDER BY fusk_namn asc" 
ElseIf kat = "f" Then 
SQL = "Select \* From pc Where kat= 'f' ORDER BY fusk_namn asc" 
ElseIf kat = "g" Then 
SQL = "Select \* From pc Where kat= 'g' ORDER BY fusk_namn asc" 
ElseIf kat = "h" Then 
SQL = "Select \* From pc Where kat= 'h' ORDER BY fusk_namn asc" 
ElseIf kat = "i" Then 
SQL = "Select \* From pc Where kat= 'i' ORDER BY fusk_namn asc" 
ElseIf kat = "j" Then 
SQL = "Select \* From pc Where kat= 'j' ORDER BY fusk_namn asc" 
ElseIf kat = "k" Then 
SQL = "Select \* From pc Where kat= 'k' ORDER BY fusk_namn asc" 
ElseIf kat = "l" Then 
SQL = "Select \* From pc Where kat= 'l' ORDER BY fusk_namn asc" 
ElseIf kat = "m" Then 
SQL = "Select \* From pc Where kat= 'm' ORDER BY fusk_namn asc" 
ElseIf kat = "n" Then 
SQL = "Select \* From pc Where kat= 'n' ORDER BY fusk_namn asc" 
ElseIf kat = "o" Then 
SQL = "Select \* From pc Where kat= 'o' ORDER BY fusk_namn asc" 
ElseIf kat = "p" Then 
SQL = "Select \* From pc Where kat= 'p' ORDER BY fusk_namn asc" 
ElseIf kat = "q" Then 
SQL = "Select \* From pc Where kat= 'q' ORDER BY fusk_namn asc" 
ElseIf kat = "r" Then 
SQL = "Select \* From pc Where kat= 'r' ORDER BY fusk_namn asc" 
ElseIf kat = "s" Then 
SQL = "Select \* From pc Where kat= 's' ORDER BY fusk_namn asc" 
ElseIf kat = "t" Then 
SQL = "Select \* From pc Where kat= 't' ORDER BY fusk_namn asc" 
ElseIf kat = "u" Then 
SQL = "Select \* From pc Where kat= 'u' ORDER BY fusk_namn asc" 
ElseIf kat = "v" Then 
SQL = "Select \* From pc Where kat= 'v' ORDER BY fusk_namn asc" 
ElseIf kat = "w" Then 
SQL = "Select \* From pc Where kat= 'w' ORDER BY fusk_namn asc" 
ElseIf kat = "x" Then 
SQL = "Select \* From pc Where kat= 'x' ORDER BY fusk_namn asc" 
ElseIf kat = "y" Then 
SQL = "Select \* From pc Where kat= 'y' ORDER BY fusk_namn asc" 
ElseIf kat = "z" Then 
SQL = "Select \* From pc Where kat= 'z' ORDER BY fusk_namn asc" 
ElseIf kat = "å" Then 
SQL = "Select \* From pc Where kat= 'å' ORDER BY fusk_namn asc" 
ElseIf kat = "ä" Then 
SQL = "Select \* From pc Where kat= 'ä' ORDER BY fusk_namn asc" 
ElseIf kat = "ö" Then 
SQL = "Select \* From pc Where kat= 'ö' ORDER BY fusk_namn asc" 
End If 

Set rs= Conn.execute(SQL) 
If not rs.eof Then 
Do until rs.eof 
%\> 
\<a href="pc_consol_fusk_read.asp?ID=\<%= rs("ID") %\>"\>\<%= rs("fusk_namn") %\>\</a\>\<br\> 
\<% 
rs.movenext 
Loop 
rs.Close 
Set rs = Nothing 
end if 
%\>

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

## #4 — Fredde Mannen, 2002-08-16T13:15Z

just det... kan ju vara bra att veta hur man kopplar upp sig mot Mysql-databasen!! =)

\<?php
@mysql_connect("localhost", "användarnamn","lösenord"); 
mysql_select_db("dbnamn"); 
?\>

ti hi!!! :OO

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

---

Tråden på webben: https://www.webforum.nu/amne/php/50344-asp-till-php