asp - 20 sidste skrevne indlæg - Udvikleren.dk - Programmering, webdesign og grafik

Tags: asp

<< < 1 2 3 > >>

Bruger #8811 @ 09.01.06 21:43

Hej jeg har fået fat i denne kode

--------------------------------------------

<%
SQL = "SELECT * FROM TABEL_MED_EMNER WHERE FORFATTER ='"& Request.QueryString("user") &"' LIMIT 0, 20"

Set rs = Conn.Execute(SQL)

Do While Not rs.EOF

SQL_COUNT = "SELECT COUNT(*) AS count FROM TABEL_MED_UNDER-EMNER WHERE id = " & rs("id")
set rs_count = Conn.Execute(SQL_COUNT)

response.write rs("FELT_NAVN") &" ("& rs_count("count")&")"

RS.MoveNext
Loop
rs.close
set rs = nothing
%>

-------------------------------------------

Og jeg har den asp fil det skal ind i, men ved ikk hvordan jeg skal gøre det, nogen som er frisk?

Jeg vil være utrolig taknemlig, og det skal bruges til profiler på
www.moviemakers.nu .. Grunden til vi ikk får den normale koder til det, er at han kræver penge for hver gang han skal kode andet end news... og vi har ikk uendelige penge, da det er et hobbysite

Håber virkelig i vil hjælpe..

Jeg arbejder med:
Vegas 6.0c
3d Studio Max 8
Photoshop cs
Delphi 7

29 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 5 karma

Sorter efter stemmer Sorter efter dato

Bruger #8817 @ 11.01.06 23:26

Rigtigt, læste ikke det hele. Men prøv det her:

Kode

<%
SQL = "SELECT * FROM forum_svar WHERE username ='"& Request.QueryString("user") &"' ORDER BY id DESC LIMIT 20"

Set rs = Conn.Execute(SQL)

Do While Not rs.EOF
 Set topic = Conn.Execute("SELECT * FROM forum_topic WHERE id = " & rs("topic") & "")
 Response.Write "<a href='din_side.asp?id=" & rs("topic") & "'>" & topic("topic") & "</a><br>"
RS.MoveNext
Loop

rs.close
set rs = nothing
%>

**********
F. Mahmood

Bruger #8811 @ 12.01.06 01:43

Rigtigt, læste ikke det hele. Men prøv det her:

Kode

<%
SQL = "SELECT * FROM forum_svar WHERE username ='"& Request.QueryString("user") &"' ORDER BY id DESC LIMIT 20"

Set rs = Conn.Execute(SQL)

Do While Not rs.EOF
 Set topic = Conn.Execute("SELECT * FROM forum_topic WHERE id = " & rs("topic") & "")
 Response.Write "<a href='din_side.asp?id=" & rs("topic") & "'>" & topic("topic") & "</a>"
RS.MoveNext
Loop

rs.close
set rs = nothing
%>

**********
F. Mahmood

Kode

<%
SQL = "SELECT * FROM forum_svar WHERE username ='"& Request.QueryString("user") &"' ORDER BY id DESC LIMIT 20"

Set rs = Conn.Execute(SQL)

Do While Not rs.EOF
 Set topic = Conn.Execute("SELECT * FROM forum_topic WHERE id = " & rs("topic") & "")
 Response.Write "<a href='medlemmar.asp?id=" & rs("topic") & "'>" & topic("topic") & "</a><br>"
RS.MoveNext
Loop

rs.close
set rs = nothing
%>

Microsoft VBScript runtime error '800a01a8'

Object required: ''

/medlem.asp, line 473

line 473 = Set rs = Conn.Execute(SQL)

kan det være fordi at databasen er i access ?

_____________________
Jeg arbejder med:
Vegas 6.0c
3d Studio Max 8
Photoshop cs
Delphi 7

Bruger #8817 @ 12.01.06 07:44

Brug det her

Kode

<%
SQL = "SELECT * FROM forum_svar WHERE username ='"& Request.QueryString("user") &"' ORDER BY id DESC LIMIT 20"

Set rs = MinCon.Execute(SQL)

Do While Not rs.EOF
 Set topic = Conn.Execute("SELECT * FROM forum_topic WHERE id = " & rs("topic") & "")
 Response.Write "<a href='medlemmar.asp?id=" & rs("topic") & "'>" & topic("topic") & "</a><br>"
RS.MoveNext
Loop

rs.close
set rs = nothing
%>

**********
F. Mahmood

Bruger #8811 @ 12.01.06 12:29

Brug det her

Kode

<%
SQL = "SELECT * FROM forum_svar WHERE username ='"& Request.QueryString("user") &"' ORDER BY id DESC LIMIT 20"

Set rs = MinCon.Execute(SQL)

Do While Not rs.EOF
 Set topic = Conn.Execute("SELECT * FROM forum_topic WHERE id = " & rs("topic") & "")
 Response.Write "<a href='medlemmar.asp?id=" & rs("topic") & "'>" & topic("topic") & "</a>"
RS.MoveNext
Loop

rs.close
set rs = nothing
%>

**********
F. Mahmood

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in ORDER BY clause.

/medlem.asp, line 473

_________________________
Jeg arbejder med:
Vegas 6.0c
3d Studio Max 8
Photoshop cs
Delphi 7

Bruger #8811 @ 12.01.06 12:43

Brug det her

Kode
<%
SQL = "SELECT * FROM forum_svar WHERE username ='"& Request.QueryString("user") &"' ORDER BY id DESC LIMIT 20"

Set rs = MinCon.Execute(SQL)

Do While Not rs.EOF
 Set topic = Conn.Execute("SELECT * FROM forum_topic WHERE id = " & rs("topic") & "")
 Response.Write "<a href='medlemmar.asp?id=" & rs("topic") & "'>" & topic("topic") & "</a>"
RS.MoveNext
Loop

rs.close
set rs = nothing
%>
**********
F. Mahmood
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in ORDER BY clause.

/medlem.asp, line 473

line 473 - Set rs = MinCon.Execute(SQL)

_________________________
Jeg arbejder med:
Vegas 6.0c
3d Studio Max 8
Photoshop cs
Delphi 7

Jeg arbejder med:
Vegas 6.0c
3d Studio Max 8
Photoshop cs
Delphi 7

Bruger #8817 @ 12.01.06 12:49

Når! Troede du brugte mySQL, men du bruger MS Access. Så skal SQL-sætningen være lidt anderledes. Her:

Kode

<%
SQL = "SELECT TOP 20 * FROM forum_svar WHERE username ='"& Request.QueryString("user") &"' ORDER BY id DESC"

Set rs = MinCon.Execute(SQL)

Do While Not rs.EOF
 Set topic = Conn.Execute("SELECT * FROM forum_topic WHERE id = " & rs("topic") & "")
 Response.Write "<a href='medlemmar.asp?id=" & rs("topic") & "'>" & topic("topic") & "</a>"
RS.MoveNext
Loop

rs.close
set rs = nothing
%>

**********
F. Mahmood

[Redigeret d. 12/01-06 12:50:23 af Faran Mahmood]

Bruger #8811 @ 12.01.06 13:28

Når! Troede du brugte mySQL, men du bruger MS Access. Så skal SQL-sætningen være lidt anderledes. Her:

Kode
<%
SQL = "SELECT TOP 20 * FROM forum_svar WHERE username ='"& Request.QueryString("user") &"' ORDER BY id DESC"

Set rs = MinCon.Execute(SQL)

Do While Not rs.EOF
 Set topic = Conn.Execute("SELECT * FROM forum_topic WHERE id = " & rs("topic") & "")
 Response.Write "<a href='medlemmar.asp?id=" & rs("topic") & "'>" & topic("topic") & "</a>"
RS.MoveNext
Loop

rs.close
set rs = nothing
%>
**********
F. Mahmood

[Redigeret d. 12/01-06 12:50:23 af Faran Mahmood]

Microsoft VBScript runtime error '800a01a8'

Object required: ''

/medlem.asp, line 476

line 476: Set topic = Conn.Execute("SELECT * FROM forum_topic WHERE id = " & rs("topic") & "")

_____________________________________
Jeg arbejder med:
Vegas 6.0c
3d Studio Max 8
Photoshop cs
Delphi 7

Bruger #8811 @ 12.01.06 15:20

Jeg fik koden til at virke nu (:
tusind ta kfor hjælpen, smid et svar..

Bruger #8811 @ 12.01.06 17:12

Godt.

Det du skulle ret var:
Set topic = MinCon.Execute("SELECT * FROM forum_topic WHERE id = " & rs("topic") & "")

Men her er et svar!

**********
F. Mahmood

plus den hvor jeg skrev medlemmar.asp det sku ændres til noget som slet ikk var tabeller

og så det dér id efter osv. det sku også ændres

Mange tusind tak for hjælpen det vil blive værdsat

_______________
Jeg arbejder med:
Vegas 6.0c
3d Studio Max 8
Photoshop cs
Delphi 7

<< < 1 2 3 > >>

20 sidste skrevne indlæg

Karma barometer (30 dage)

Modtaget

Givet

Favorit hos
Forum tråde
Artikler