webForumDet fria alternativet

Vad gör användaren?

ASP

8 svar · 523 visningar · startad av SGuncel

Medlem sedan jan. 2007217 inlägg
Frågan#1

Jag undrar hur jag ska få så att de står "Spanar in i Pelle".
Men då vill jag att "Spanar in i" ska vara text och "Pelle" länk som man kan klicka.

Så här ser min kod ut men vet inte hur jag ska få så att de blir som jag vill ha.

<%
Dim strVart_page , strVart_Query, strVart
strVart_page  = Mid(Request.ServerVariables("PATH_INFO"),1)
strVart_Query  = Request.ServerVariables("QUERY_STRING")

If Len(strVart_Query) > 0 Then
  strVart = strVart_page &"?"& strVart_Query
  Else
  strVart = strVart_page
End If

dim strVart_LinkName, strVart_Name
strVart_LinkName    = ("Spanar in i")

strVart_Name = strVart_LinkName

ObjConn.Execute("UPDATE TLUsers SET UsrWhere = '" & strVart & "', UsrWhereName = '" & strVart_Name 
& "' WHERE UsrID = " & Session("UsrID"))
%>
Medlem sedan dec. 19996 721 inlägg
#2

För det första så får variablerna absolut inte heta något med "Vart", för det är dålig svenska :) Var är du? Vart ska du?

Jag vet inte hur dynamiskt system du vill ha, men du skulle t.ex. kunna lagra "Spanar in i %target%" i en kolumn som heter UsrWhat (för det är ju mer "vad" än "var"). Själva länken kan du lagra i UsrWhere och användarnamnet i UsrTarget.

Sedan är det bara att skriva ut texten och ersätta %target% med länken och användarnamnet.

response.write replace(rs("UsrWhat"),"%target%", "<a href=""" & rs("UsrWhere") & """>" & rs("UsrTarget") & "</a>")
Medlem sedan jan. 2007217 inlägg
#3

Nu hänger jag inte med :)

Medlem sedan dec. 19996 721 inlägg
#4

Läs igenom ordentligt och prova.

Medlem sedan jan. 2007217 inlägg
#5

Jag vill ha så här så snabbt man kollar på någons profil, gästbok, vänner osv.
Så ska det ändras i databasen.

Om vi sparar:
"Spanar in i %target%" på en kolumn som heter UsrWhat, men vad innehåller %target%? Användarnamn på personen man besöker?

Då menar du nåt sånt:

<%
Dim strVar_page , strVar_Query, strVar
strVar_page  = Mid(Request.ServerVariables("PATH_INFO"),1)
strVar_Query  = Request.ServerVariables("QUERY_STRING")

If Len(strVar_Query) > 0 Then
  strVart = strVar_page &"?"& strVar_Query
  Else
  strVart = strVar_page
End If

dim strVar_LinkName, strVar_Name
strVar_LinkName    = ("Spanar in i")

strVar_Name = strVar_LinkName

dim UsrName
strUsrName = ObjRS("UsrTPName")

ObjConn.Execute("UPDATE TLUsers SET UsrWhere = '" & strVar & "', UsrWhereName = '" & strVar_Name & "', UsrWhat = '" & strUsrName & "' WHERE UsrID = " & Session("UsrID"))
%>

Min kompis hade fått dena koden från någon annan sida men vi visste inte hur vi skulle göra:
"jag skulle föreslå att använda två kolumner istället:

actiontype - enum(guestbook, diary, profile, etc)
actionid - där id är idt på användaren eller vad man nu kollar på

använd select case och hantera de olika typerna"

select case rs("actiontype")
   case "diary"
      useraction = "smygkollar i " & getUserNameById(rs("actionid")) & "'s dagbok"
   case "guestbook"
      useraction = "checkar " & getUserNameById(rs("actionid")) & "'s gästbok"
   case "forum"
      useraction = "kollar i inlägget " & getTopicSubjectById(rs("actionid"))
end select
Medlem sedan juni 20008 205 inlägg
#6

SGuncel skrev:

"Spanar in i %target%" på en kolumn som heter UsrWhat, men vad innehåller %target%? Användarnamn på personen man besöker?

Läs emissions första inlägg igen... %target% "innehåller" ingenting. Det är bara en delsträng som du sen byter ut mot t.ex. namnet på och en länk till användaren vars profil man kollar in.

Medlem sedan jan. 2007217 inlägg
#7

Okeej, men hur ska jag göra då?
Finns det inte lättare sätt?

Medlem sedan juni 20008 205 inlägg
#8

SGuncel skrev:

Okeej, men hur ska jag göra då?

Som emission skriver, med Replace.

SGuncel skrev:

Finns det inte lättare sätt?

Nej. Förresten, vad är det som inte är lätt med det här? Allt du behöver göra är att ersätta en del av en sträng (%target%) med en annan (länken till användarprofilen) och skriva ut resultatet.

Medlem sedan juli 20003 825 inlägg
#9

Du vet ju vilken sida en användare tittar på.

viewProfile.asp?ID=23 <------- användarens ID
guestbook.asp?ID=23 <------- användarens ID
diary.asp?ID=23 <------- användarens ID
profile.asp?ID=23 <------- användarens ID

Sen vet du ju vem som tittar, kanske du sparat det ID som session("intUserID")

Du får hålla isär dessa två. Det är samma sak, men olika... Are you with!?

259 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
124 ms — deklarationer (db)
0 ms — hämta statistik (cache)
132 ms — hämta tråd, inlägg och bilagor (db)
124 ms — ändringar (db)