ASP chat using jquery

Hi,


Is there something that out there still "support" classic ASP?  LOL    thx  
mcrmgAsked:
Who is Participating?
 
Wayne BarronConnect With a Mentor Commented:
This is ASP Classic and AJAX If that helps.
This is what I am going to be designing mine with later on in the year.
http://www.aspajax.org/asp-ajax-examples-chat.asp

Have not found anything with just JQuery.

Good Luck
(ASP Classic is not dead, there is still a LOT of projects being created with the Classic ASP, it is just that people try to make you think that it is going to die out.
Microsoft for one with their new servers are trying to unsupport ASP, but they will NEVER totally unsupport it as there are too many companies out there that still use the old technology, like my company and 1,000's of others.)

Carrzkiss
0
 
mcrmgAuthor Commented:
thanks   that made me fell better...lol  
0
 
Wayne BarronCommented:
Good.
I love Classic ASP, .NET is something that I am not too concerned about at the moment.
I will use the .NET technology when I have to, not before.

Classic ASP still rocks and can still do the same as .NET, with only a few exclusions.

Take Care
Carrzkiss
0
The new generation of project management tools

With monday.com’s project management tool, you can see what everyone on your team is working in a single glance. Its intuitive dashboards are customizable, so you can create systems that work for you.

 
mcrmgAuthor Commented:
Hi,

I am sorry to bug you again since the question is closed.  I have looked at this, it is great, but I am having a problem, I need to have a seprate chat for ewach account...it looks like it can only have one, (maybe I am wrong?)

here is the test code   thx
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<% option explicit %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<!--#include file="aspajax.asp"-->
<%
 ' ASPAjax.Path="/aspajax/"   ' instalation path 'ASPAjax.Path="/aspajax/"
 ASPAjax.Open()

%>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>ASP AJAX Chat Application</title>
<link href="SampleContent/CSS/main.css" rel="stylesheet" type="text/css" />
</head>
<body>
<%
''''''''''''''''''''''''''''''''''SETUP CHAT''''''''''''''''''''''''''''''''''
Dim ChatArray, i
ChatArray = Application.Contents("ASPAJAX_ChatArray")

If not isArray(ChatArray) Then
 ChatArray=Array("","","","","","","","","","")
End If


Dim ChatArray1', i
ChatArray1 = Application.Contents("ASPAJAX_ChatArray")

If not isArray(ChatArray1) Then
 ChatArray1=Array("","","","","","","","","","")
End If

''''''''''''''''''''''''''''''''''PROCESS CHAT INPUT''''''''''''''''''''''''''''''''''
If Request.Form("SubmitChat")<>"" Then
Response.Write "111"
 For i =   0 to UBound(ChatArray)-1 
		ChatArray(i) =   ChatArray(i+1)
  Next
  ChatArray(UBound(ChatArray)) = "<em>"&time()&" "&Request.ServerVariables("REMOTE_HOST")&" : "&Request.Form("usrName") &" : </em>"& Request.Form("usrMsg")  & "<br />"

Application.Contents("ASPAJAX_ChatArray") = ChatArray
End If 


If Request.Form("SubmitChat1")<>"" Then
Response.Write "222"
 For i =   0 To UBound(ChatArray1)-1 
		ChatArray1(i) =   ChatArray1(i+1)
  Next
  ChatArray1(UBound(ChatArray1)) = "<em>"&time()&" "&Request.ServerVariables("REMOTE_HOST")&" : "&Request.Form("usrName1") &" : </em>"& Request.Form("usrMsg1")  & "<br />"

Application.Contents("ASPAJAX_ChatArray") = ChatArray1
End If 
''''''''''''''''''''''''''''''''''PROCESS CHAT INPUT''''''''''''''''''''''''''''''''''
%>
<h2>Chat Window:</h2>
<div>
  <%
	 Dim myPanel
	 Set myPanel = ASPAjax.CreateUpdatePanel
	 myPanel.Id = "CHAT123"
	 myPanel.RefreshInterval = 5 ' UpdatePanel self refreshes every 5 seconds 
	 Call myPanel.RegisterTrigger ("form1" , "onsubmit") ' Makes form1 use AJAX to refresh this UpdatePanel 
	 myPanel.Open
	 
	 

	 
%>
  <%''''''''''''''''''''''''''''''''''DRAW CHAT OUTPUT''''''''''''''''''''''''''''''''''%>
  <%=Join(ChatArray,"")%> <br />
  Last Checked: <%=time()%>
  <%
	myPanel.close
	set myPanel = nothing
	%>
</div>
<hr />
<form method="post" id="form1" action="">
  <label>Name
  <input type="text" name="usrName" value="User1" />
  </label>
  <label>Message
    <textarea name="usrMsg" cols="30" rows="4"></textarea>
  </label>
  <label>
  <input type="submit" value="Send" name="SubmitChat"    />
  </label>
</form>
<p style="clear:both"><br />
  <br />
  This chat application has been kept simple - so that it can be easily modified and skinned. </p>
  
    <%
	 Dim myPanel1
	 Set myPanel1 = ASPAjax.CreateUpdatePanel
	 myPanel1.Id = "CHAT1"
	 myPanel1.RefreshInterval = 5 ' UpdatePanel self refreshes every 5 seconds 
	 Call myPanel1.RegisterTrigger ("form2" , "onsubmit") ' Makes form1 use AJAX to refresh this UpdatePanel 
	 myPanel1.Open
	 
	 

	 
%>
  
  <%=Join(ChatArray1,"")%> <br />
  Last Checked: <%=time()%>
  <%
	myPanel1.close
	set myPanel1 = nothing
	%>
  
<form method="post" id="form2" action="">
  <label>Name
  <input type="text" name="usrName1" value="User2" />
  </label>
  <label>Message
    <textarea name="usrMsg1" cols="30" rows="4"></textarea>
  </label>
  <label>
  <input type="submit" value="Send" name="SubmitChat1"    />
  </label>
</form>
<p style="clear:both"><br />  
</body>
</html>
<% ASPAjax.Close()%>

Open in new window

0
 
Wayne BarronCommented:
I have not fully tested this script, so I am unable to advice you on it.
The only thing that I can suggest is to contact the developer or try to customize it yourself.

Right now I just do not have the extra time to mess around with it.
Sorry, but the best thing to do is to contact the developer and explain to him your needs
And see if his script will do it.
I am pretty sure that it will.

Take Care and Good Luck
Carrzkiss
0
 
mcrmgAuthor Commented:
okay, thanks
0
 
don nuke otteloCommented:
I have been using ASP since 2007 and had gone a lot of powerfull projects that had win some awards. I work with in in a third of time if I use .net. I love it
0
All Courses

From novice to tech pro — start learning today.