jboy_87Medlem sedan aug. 20011 099 inlägg snälla kan nån fixa koden till mig vill att den får vanliga ramar please!!!!:
<%
Response.Buffer = True
Select Case LCase(Request.QueryString("mode"))
Case "chat"
%>
<!-- #include file="../adovbs.inc" -->
<html>
<head>
<meta http-equiv="REFRESH" content="3; URL=default.asp?mode=chat">
<title>Chat</title>
</head>
<%
strUser = "<b>" & session("id") & "</b>: "
strMessage = Server.HTMLEncode(Trim(Request.Form("message")))
' // Her rydes Chat loggen, hvis den overstiger 10000 karakter
If Len(Application("ChatLog")) > 10000 Then
Application.Lock
Application("ChatLog") = ""
Application.UnLock
End If
If Request.Form("Action") = "Send" Then
If Len(strMessage) > 0 Then
strChatContent = strUser & strMessage & "<br>" & Application("ChatLog")
Application.Lock
Application("ChatLog") = strChatContent
Application.UnLock
End If
End If
Response.Write Application("ChatLog")
Case "send" %>
<form method="POST" action="default.asp?mode=chat" target="Top">
<input type="text" name="message" size="30"> <input type="submit" name="Action" value="Send">
</form>
<% Case Else %>
<frameset rows="90%,*">
<frame name="Top" src="default.asp?mode=chat" scrolling="auto" marginwidth="4" marginheight="4" noresize>
<frame name="Bottom" src="default.asp?mode=send" scrolling="auto" marginwidth="4" marginheight="4">
<noframes>
<body>
<p>Denne side bruger frames, og det understøtter din browser ikke.</p>
</body>
</noframes>
</frameset>
<% End Select %>
</body>
</html>
------------------
ASP är bäst fuck the rest!!!
iceM2Medlem sedan mars 2001243 inlägg
snälla kan nån fixa koden till mig vill att den får vanliga ramar please!!!!
hmm förstår inte riktigt vad du menar...
------------------
"Ni tre går och bildar en kvadrat" (Rolf Zetterlund under ett träningspass)
jboy_87Medlem sedan aug. 20011 099 inlägg typ asså hela chatte är en fil med ramar !!
------------------
ASP är bäst fuck the rest!!!
jboy_87Medlem sedan aug. 20011 099 inlägg fixade det själv
------------------
ASP är bäst fuck the rest!!!
jboy_87Medlem sedan aug. 20011 099 inlägg hur får jag användarnamet som e inloggad istället för ip adressen??
------------------
ASP är bäst fuck the rest!!!
@ndersMedlem sedan juni 200032 969 inlägg Var får du ip-adressen ifrån?
------------------
Don't panic!
jboy_87Medlem sedan aug. 20011 099 inlägg <%
strUser = "<b>" & recset("username") & "</b>: "
strMessage = Server.HTMLEncode(Trim(Request.Form("message")))
' // Her rydes Chat loggen, hvis den overstiger 10000 karakter
If Len(Application("ChatLog")) \> 10000 Then
Application.Lock
Application("ChatLog") = ""
Application.UnLock
End If
If Request.Form("Action") = "Skicka" Then
If Len(strMessage) \> 0 Then
strChatContent = strUser & strMessage & "\<br\>" & Application("ChatLog")
Application.Lock
Application("ChatLog") = strChatContent
Application.UnLock
End If
End If
Response.Write Application("ChatLog")
%>
------------------
ASP är bäst fuck the rest!!!
jboy_87Medlem sedan aug. 20011 099 inlägg gjorde så här men funkande inte
strUser = "<b>" & recset("username") & "</b>:
------------------
ASP är bäst fuck the rest!!!
@ndersMedlem sedan juni 200032 969 inlägg Jag ser ingenting om någon ip-adress... Om inte ip-adressen ligger lagrad i fältet username i din tabell, och i så fall är min fråga varför ip-adressen ligger där.
------------------
Don't panic!
jboy_87Medlem sedan aug. 20011 099 inlägg jag tog bort det och la in recset("username")
------------------
ASP är bäst fuck the rest!!!
@ndersMedlem sedan juni 200032 969 inlägg Hur identifierar du dina användare?
------------------
Don't panic!
jboy_87Medlem sedan aug. 20011 099 inlägg det såg ut såhär förut:
strUser = "<b>" & Request.ServerVariables("REMOTE_ADDR") & "</b>: "
------------------
ASP är bäst fuck the rest!!!
jboy_87Medlem sedan aug. 20011 099 inlägg hallå kan ingen hjälpa mig
------------------
ASP är bäst fuck the rest!!!
@ndersMedlem sedan juni 200032 969 inlägg Hur identifierar du dina användare? Har du inloggning?
Om inte, det ska du ha, annars finns det ju inget användarnamn på användaren.
------------------
Don't panic!
Man kan ju alltid slumpa ut ett namn på användaren... :OO
------------------
/Erik
www.juhlin.nu /sk8files/ /mp2d/
OveRRidEMedlem sedan feb. 200112 078 inlägg
ASP är bäst fuck the rest!!!
:e :OO
------------------
Jag är skum
[Redigerat av OveRRidE den 29 nov 2001]
mrblondeMedlem sedan aug. 20012 349 inlägg den här tråden känns väldigt förvirrad.
trots det lyckas jboy_87 lösa alla problem hela tiden :)
------------------
National Blonde Day!
Alle ihre Basis ist uns gehört.
jboy_87Medlem sedan aug. 20011 099 inlägg jag använder mig utav session när man loggar in
------------------
ASP är bäst fuck the rest!!!
@ndersMedlem sedan juni 200032 969 inlägg Vad heter din session då?
------------------
Don't panic!
jboy_87Medlem sedan aug. 20011 099 inlägg vad då heter
------------------
ASP är bäst fuck the rest!!!
