webForumDet fria alternativet
Logga in / Bli medlem

Räknar problem...

ASP

15 svar · 351 visningar · startad av Bosse168

Medlem sedan nov. 20031 018 inlägg
Trådstart#1

Jag vill visa och räkna besöket genom att infoga räknar sidan så här:

<script language="JavaScript" src="http://www.minDomän.nu/counter.asp?id=1"></script>

givetvis är det annat domännamn

counter.asp

<%@ LANGUAGE="VBSCRIPT" %>
<% Response.Expires=-1
Response.Buffer = True %>

<!-- #INCLUDE VIRTUAL="/include/koppling.asp" -->

<%

If Request.Cookies(Request.Querystring("id")) <> "TRUE" Then

Response.Cookies(Request.Querystring("id")) = "TRUE"
Response.Cookies(Request.Querystring("id")).Expires = DateAdd("h", 24, now)

Connect.Execute ("update geek_counter set viz_u = viz_u +1 WHERE ID='" & Request.QueryString("id") & "'")

End If

Connect.Execute ("update geek_counter set viz = viz +1 WHERE ID='" & Request.QueryString("id") & "'")

Set Rs = Connect.Execute("SELECT viz_u From geek_counter WHERE ID='" & Request.QueryString("id") & "' LIMIT 1")

Response.Write Rs("viz_u")

Rs.Close : Set Rs=nothing

Connect.Close : Set Connect=Nothing
%>

Någon som vet vad det är för fel?

Medlem sedan nov. 20031 018 inlägg
#2

Löste det glömde bort att det var java... :i

document.write("<%=Rs("viz_u")%>")

Någon som har förslag på förbättring på kod?

Medlem sedan nov. 20031 018 inlägg
#3

Jag vill göra om siffrorna till bilder och det blir helt blankt när jag skriver ut dom så här:

For i = 1 To Len(CStr(Rs2("viz_u")))
  Response.Write("document.write('<img src=../bilder/siffror/" & Mid(CStr(Rs2("viz_u")), i, 1) & "_8x8.gif>')")
Next
Medlem sedan apr. 20031 660 inlägg
#4

HEJ!

Vad blir det för adress till bilden under egenskaper?

Då ser du vad du har programmerat ihop.

Medlem sedan nov. 20031 018 inlägg
#5

den visar ingen bild

Medlem sedan apr. 20031 660 inlägg
#6

HEJ!

Det är inte det jag undrar, VAD tycker webbläsaren att den (=du!) ska visa för bild. Det är stor skillnad!

Ser du ingen bild alls, dvs inget kryss, då har du allvarligare problem, då kommer den inte till loopen alls.

Medlem sedan nov. 20031 018 inlägg
#7

Hittade felet men vet inte hur det ska lösas den skriver ju ut:
document.write('bilden')

Efter varje bild så när javascriptet skriver ut det blir det så här:

document.write('bilden')document.write('bilden')

Medlem sedan juni 200032 967 inlägg
#8
For i = 1 To Len(CStr(Rs2("viz_u")))
  Response.Write("document.write('<img src=../bilder/siffror/" & Mid(CStr(Rs2("viz_u")), i, 1) & "_8x8.gif>');" & vbCrLf)
Next
Medlem sedan nov. 20031 018 inlägg
#9

Blir det inte en rad brytning efter varje bild då?

Medlem sedan apr. 20031 660 inlägg
#10

HEJ!

Jag reagerade inte på det, eftersom du skrev fel på det tidigare när du vara i javasciptet.

Men, borde det inte stå enbart Response.Write, utan något document.write? Eftersom loopen är skriven som den är antar jag du håller på med vb.

Lista ut vad du håller på med, så löser du det ;)

Medlem sedan nov. 20031 018 inlägg
#11

jag håller på med båda.

Medlem sedan juni 200032 967 inlägg
#12

Bosse168 skrev:

Blir det inte en rad brytning efter varje bild då?

Jo, i källkoden, men inte till läsaren. Det är ju inte <br> vi pratar om.

Medlem sedan apr. 20031 660 inlägg
#13

HEJ!

Okej, nu får vi lösa detta!

Jag gissar det är såhär:

Response.Write("document.write('<img src=../bilder/siffror/" & Mid(CStr(Rs2("viz_u")), i, 1) & "_8x8.gif>');"

och att koden i sidan blir

<img src=../bilder/siffror/document.write('sexa')_8x8.gif>

det borde ju vara

<img src=../bilder/siffror/sexa_8x8.gif>

och det får du genom

Response.Write "<img src=../bilder/siffror/" & Mid(CStr(Rs2("viz_u")), i, 1) & "_8x8.gif>"

Eller?

Medlem sedan nov. 20031 018 inlägg
#14

Löste det med att göra så här:

document.write("<%For i=1 to Len(CStr(Rs("viz_u")))%><img src='../bilder/siffror/<%= Mid(CStr(Rs("viz_u")), i, 1) %>_8x8.gif' border='0'><%Next%>")

Någon som har ett bättre förslag och förstår hur jag menar?

Medlem sedan apr. 20031 660 inlägg
#15

HEJ!

Ja, jag förstår vad du menar, fast inte varför du gör så? Saknar kod för vad du gör nu, antar du alltså faktiskt är i ett javascript?

Borde du inte kunna göra som jag skrev ovan, lite anpassat till det du skrev nyss:

<%For i=1 to Len(CStr(Rs("viz_u")))
 response.write "<img src='../bilder/siffror/" & Mid(CStr(Rs("viz_u")), i, 1) & "_8x8.gif' border='0'>"
Next%>

Men, som sagt ovan, du är i javascriptet?

Medlem sedan nov. 20031 018 inlägg
#16

Ja jag är i javascriptet.

375 ms totalt · 4 externa anrop · v20260731065814-full.51f67c91
121 ms — deklarationer (db)
119 ms — hämta statistik (db)
132 ms — hämta tråd, inlägg och bilagor (db)
121 ms — ändringar (db)