nicht angemeldet
Request("RoomName")
soo ich habe mal ne frege ;)
ich habe einen asp-chat der auf meinem server liegt!
der asp-chat wir per iframe auf einem anderen server importiert...
soweit funktioniert alles!
um jetzt in den chat richtig eingeloggt zu werden muss ich mich zweimal anmelden weil er irgendwie beim ersten mal den RoomName nicht übergibt!
ich glaube es liegt an dem open()?!?!?
oder daran das es per iframe importiert wird?
wie kann ich den fehler eingrenzen???
<%
Option Explicit
Dim ErrorSt, EnterMessage, objChat
Set objChat = Server.CreateObject("test.Chat")
If Len(Request("Join")) > 0 Or Len(Request("UserId")) > 0 Then
EnterMessage = objChat.GetConfigValue("EnterMessage")
objChat.SetConfigValue "EnterMessage", "<font face=""Verdana,Arial,sans-serif"" color=""00FF0C"" size=""2"">%userfrom% betrat gerade diesen raum...</font>"
objChat.CheckUserTimeouts Request("RoomName"), ""
If objChat.JoinRoom(Request("RoomName"), Request("UserId"), ErrorSt, TRUE) Then
objChat.SetConfigValue "EnterMessage", EnterMessage
Response.Redirect("ChatMain.Asp?DoDHTML=" & Request("DoDHTML"))
response.write("<scr" & "ipt>" & vbCrLf)
Response.write("open(""ChatMain.Asp?DoDHTML="& Request("DoDHTML") & """, ""ThankYou"",""width=530,height=400,scrollbars=no"");" & vbCrLf)
response.write("</scr" & "ipt>")
Else
objChat.SetConfigValue "EnterMessage", EnterMessage
End If
End If
%>
-
sorry das Response.Redirect("ChatMain.Asp?DoDHTML=" & Request("DoDHTML"))
muss natürlich raus!
aber auch so geht es nicht-
hat hier keiner ne ahnung?
sorry das Response.Redirect("ChatMain.Asp?DoDHTML=" & Request("DoDHTML"))
muss natürlich raus!
aber auch so geht es nicht
-