webForumDet fria alternativet

Skumt fel

ASPur ASP

4 svar · 175 visningar · startad av Jacob

Medlem sedan dec. 2000503 inlägg
Frågan#1
MySQL="SELECT TOP 25 film.titel, film.filmid, film.bildid, film.handling, film.ingress, kategori.kategori FROM film INNER JOIN  kategori ON film.kategoriid = kategori.kategoriid WHERE (film.typid = "&Request.QueryString("vilka")&") ORDER BY film.filmid DESC"
Set MyRs = Conn.Execute(MySQL)
Do Until MyRs.EOF
   If tom(MyRs("ingress")) and not tom(MyRs("handling")) then
   ingress=left(MyRs("handling"),250)&"..."
   else
   ingress=MyRs("ingress")
   End If
=ingress%>
<%MyRs.MoveNext
Loop

Även om det finns något i kolumnen handling så skrivs bara ... ut, why?

Medlem sedan dec. 200012 464 inlägg
#2

Hur ser funktionen tom ut?

Medlem sedan dec. 2000503 inlägg
#3

Function tom(ByVal str)
tom = Len(Trim(str & "")) = 0
End Function
Function fixit(str)
fixit=replace(str, "'", "''")
End Function

Medlem sedan dec. 200012 464 inlägg
#4

Den ser ju bra ut. Då gissar jag att handling eller ingress är PM/Memo kolumner i databasen.

I så fall så går det bara att hämta ett sådant värde en gång från ett reocrdset.

Do Until MyRs.EOF
   ingress = MyRs("ingress")
   handling = MyRs("handling")
   If tom(ingress) and not tom(handling) then
   ingress=left(handling,250)&"..."
   End If

I din sql-sats så måste alla memo/PM kolumner ligga sist och om du har flera så måste dom komma i samma ordning som dom är definierade i i din tabell.

Medlem sedan dec. 2000503 inlägg
#5

Jaha det hade jag ingen arnng om , tack

131 ms totalt · 3 externa anrop · v20260731065814-full.b746b907
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)