Chat room to achieve private chat 1th/4 page

Chat room to achieve private chat 1th/4 page _ Application Tips

Last Update:2017-01-18 Source: Internet

Author: User

Tags chr

Developer on Alibaba Coud: Build your first app with APIs, SDKs, and tutorials on the Alibaba Cloud. Read more ＞

A few good friends in the chat room chatting, there are always some topics are not want the same chat room other chat friends see, then chat room to support the private message will be what is necessary, to achieve a lot of whispering methods, now the tiger introduced the use of the session object to achieve it, Using the session object to achieve private whispers, there are advantages and disadvantages, because the application of the session object, in fact, is the use of client cookies. If the client cookies are not supported or closed, then the program will run a problem. So is using the Session object No good?? Not also, at least programming greatly reduced workload, imagine if you need to save the user's chat name, then use the session object can directly save his name, if there is no session object. The solution seems to be that only a few hidden textbox objects are stored in the form where the address is addressed, which can be handled more than a boring lock, but the benefits are widespread, even if the browser does not support cookies still available.

Speaking of which, we may try the Internet's numerous ASP chat rooms, try to the browser's security options (always accept cookies off) to see that the chat room is still normal to use. That would be a problem. Oh ~ ~ Don't look for the tiger's chat room to try .... My chat room also needs cookies to support. No Session object programming is really annoying lock a lot. and the default value of most browsers ' security configuration is always to accept cookies. So there is no need to be too but the heart, only a small part of the user is more special than teaching.

Now from the chat room to start, to deal with the speech, show the speech, step-by-step to let everyone know how to deal with, and finally add a whisper function

First of all, our chat room mainly provides the following elements: spokesperson (your name), action (shouting, hugging ...) And so on), the object (to whom does this sentence say?) ), the content of the four elements.

The name of the spokesperson (your chat name) is saved in the User hidden text box in the statement form so that whenever you speak, you can use Request.Form ("user") to get the name of the chat in the Says.asp program that handles the speech. And the action is provided by the dropdown box action, you can customize a lot of action types to meet the needs of different chat friends. The speakers are also selected by the Drop-down box Whoto, which lists the names of all users in the current chat room. How to judge a new user into the chat room and exit the processing, here is not to say. Because the construction of a complete chat room to do a lot of work. Finally, a says text box provides the speech content.

With these several main chat elements. We will be able to address the speech.

Please take a look at the following program fragment

' Get the words and filter the script statements
Usersays=request.form ("says")
If InStr (Usersays, "<script") >0 Then
Usersays= ""
End If

' To judge whether there is a conversation or not to deal with it

If Len (usersays) <>0 Then
Session ("Whoto") =request.form ("Whoto")
Session ("Action") =request.form ("action")
If InStr (USERSAYS,CHR) >0 Then
Usersays=replace (USERSAYS,CHR), "\" &AMP;CHR (39))
End If
If InStr (USERSAYS,CHR) >0 Then
Usersays=replace (USERSAYS,CHR), "\" &AMP;CHR (34))
End If

Application.Lock

' Define a conversation buffer, and the following will give you a detailed analysis

Dim chats (20)
For N=1 to 20
Chats (n) =application ("Chats") (n)
Next
Username=request. Form ("User")

Usertime=time
Usertime= "(" &right (usertime,8) & ")"
User_whoto=request. Form ("Whoto")
User_action=request. Form ("Action")
If Application ("Counter") >19 Then
Application ("Counter") =0
End If
' Not a whisper, add a
If Request.Form ("action") <> "Whisper" then
Application ("Counter") =application ("Zj_1counter") +1
Counter=application ("Zj_1counter")
' User's action handling

Select Case Request. FORM ("Action")
Case "Talk"
If request. FORM ("whoto") = "All" Then
Chats (counter) = "" &usertime& " " &username & ": " &usersays& " "
Else
Chats (counter) = "" &usertime& " " &username & " and " &request. FORM ("Whoto") & " said :" &usersays& " "
End If
Case "Shout"
Chats (counter) = "" &usertime& " " &username & " Chong " &request. FORM ("Whoto") & " shout :" &usersays& " "
Case "kiss."
Chats (counter) = "" &usertime& " " &username & " Pro Pro " &request. FORM ("Whoto") & " cheek :" &usersays& " "
Case "hug."
Chats (counter) = "" &usertime& " " &username & " gently holding the " &request. FORM ("Whoto") & ":" &usersays& " "
Case "rage."
Chats (counter) = "" &usertime& " " &username & " toward " &request. FORM ("Whoto") & " Hengmeilengdui vertical :" &usersays& " "
Case "Nudge"
Chats (counter) = "" &usertime& " " &username & " gently push push " &request. FORM ("Whoto") & " arm :" &usersays& " "
Case "giggle."
Chats (counter) = "" &usertime& " " &username & " silly toward " &request. FORM ("Whoto") & " smile :" &usersays& " "
Case "punching."
Chats (counter) = "" &usertime& " " &username & " alignment " &request. FORM ("Whoto") & " is a fist :" &usersays& " "
Case "foot kick"
Chats (counter) = "" &usertime& " " &username & " volley kick in " &request. FORM ("Whoto") & head : "&usersays&" "
Case "confession."
Chats (counter) = "" &usertime& " " &username & " pulls " &request. FORM ("Whoto") & hand tone Heart Long said : "&usersays&" "
Case "Slap"
Chats (counter) = "" &usertime& " " &username & " mercilessly slapped the " &request. FORM ("Whoto") & " several slaps :" &usersays& " "
Case "Bow"
Chats (counter) = "" &usertime& " " &username & " respectfully to " &request. FORM ("Whoto") & " stooping to bow :" &usersays& " "
case, "sorry."
Chats (counter) = "" &usertime& " " &username & " feel Shipi apology, whispered to " &request. FORM ("Whoto") & " said :" &usersays& " "
Case "surprise."
Chats (counter) = "" &usertime& " " &username & " surprise on " &request. FORM ("Whoto") & " spit out the tongue :" &usersays& " "
Case "Yawn"
Chats (counter) = "" &usertime& " " &username & " " &request. FORM ("Whoto") & " wide open mouth, yawned :" &usersays& " "
Case "Smile"
Chats (counter) = "" &usertime& " " &username & " " &request. FORM ("Whoto") & " slight smile :" &usersays& " "
Case "shake hands."
Chats (counter) = "" &usertime& " " &username & " tightly hold " &request. FORM ("Whoto") & " hand :" &usersays& " "
Case "shrug."
Chats (counter) = "" &usertime& " " &username & " to " &request. FORM ("Whoto") & " shrugged shoulders :" &usersays& " "
Case "Comfort"
Chats (counter) = "" &usertime& " " &username & " Pat " &request. FORM ("Whoto") & " shoulder, eyes concern said :" &usersays& " "
Case "angry"
Chats (counter) = "" &usertime& " " &username & " gas Drum's toot mouth on " &request. FORM ("Whoto") & " road :" &usersays& " "
Case "crying."
Chats (counter) = "" &usertime& " " &username & " can't help " &request. FORM ("Whoto") & " burst into tears :" &usersays& " "
Case "sobbing."
Chats (counter) = "" &usertime& " " &username & " hands covering his face, " &request. FORM ("Whoto") & " purring :" &usersays& " "
Case "commitment"
Chats (counter) = "" &usertime& " " &username & " to " &request. FORM ("Whoto") & : "&usersays&" "
Case "Not shed"
Chats (counter) = "" &usertime& " " &username & " reluctantly pulled " &request. FORM ("Whoto") & " :" &usersays& " "
Case "Affectionate"
Chats (counter) = "" &usertime& " " &username & " with affectionate eyes, looking at " &request. FORM ("Whoto") & ":" &usersays& " "
Case "confusing"
Chats (counter) = "" &usertime& " " &username & " grasping scalp looking at " &request. FORM ("Whoto") & " revealing a puzzled look :" &usersays& " "
Case "puzzled"
Chats (counter) = "" &usertime& " " &username & " look at the " &request in an unpredictable way. FORM ("Whoto") & ":" &usersays& " "
Case "Disaster"
Chats (counter) = "" &usertime& " " &username & " gloat over " &request. FORM ("Whoto") & " said :" &usersays& " "
Case "laughing."
Chats (counter) = "" &usertime& " " &username & " to " &request. FORM ("Whoto") & " laughing :" &usersays& " "
Case "Frown"
Chats (counter) = "" &usertime& " " &username & " frowned on " &request. FORM ("Whoto") & ":" &usersays& " "
Case "Grievance"
Chats (counter) = "" &usertime& " " &username & " very wronged to look at " &request. FORM ("Whoto") & tears streaming down : "&usersays&" "
Case "Happy"
Chats (counter) = "" &usertime& " " &username & " cheerfully to " &request. FORM ("Whoto") & " said :" &usersays& " "
Case "depression."
Chats (counter) = "" &usertime& " " &username & " full face gloomily on " &request. FORM ("Whoto") & " said :" &usersays& " "
Case "disappointment."
Chats (counter) = "" &usertime& " " &username & " crestfallen to " &request. FORM ("Whoto") & " said :" &usersays& " "
Case "nerves."
Chats (counter) = "" &usertime& " " &username & " nerves " &request. FORM ("Whoto") & " said :" &usersays& " "
Case "Mystery"
Chats (counter) = "" &usertime& " " &username & " very mysteriously to " &request. FORM ("Whoto") & " said :" &usersays& " "
Case "Spoiled"
Chats (counter) = "" &usertime& " " &username & " pulls " &request. FORM ("Whoto") & " hand spoiled :" &usersays& " "
Case "Grimace"
Chats (counter) = "" &usertime& " " &username & " to " &request. FORM ("Whoto") & made a grimace : "&usersays&" "
Case "Helpless"
Chats (counter) = "" &usertime& " " &username & " to " &request. FORM ("Whoto") & " very reluctantly :" &usersays& " "
End Select

' is a whisper
Else

' Whisper handle
Application ("chat") = "" &usertime& " " & username& " quietly to " &request. FORM ("Whoto") & " whisper :" &usersays& " "
' To who say
Application ("Chatto") =request. FORM ("Whoto")
' The man who Speaks
Application ("owner") =username
Session ("chat") = "true"
End If

' Talk Global
Application ("Chats") =chats

Application.UnLock

End If

The above program is the user's Speech and action and speech object generated HTML statements and save. To be shown in the chat room behind it, please note that the whisper is stored in the Global Application Object application ("Chat"). OK, the next section is to give you a detailed analysis of the content of the speech is how to deal with.

Current 1/4 page 1234 Next read the full text

This article is an English version of an article which is originally in the Chinese language on aliyun.com and is provided for information purposes only. This website makes no representation or warranty of any kind, either expressed or implied, as to the accuracy, completeness ownership or reliability of the article or any translations thereof. If you have any concerns or complaints relating to the article, please send an email, providing a detailed description of the concern or complaint, to info-contact@alibabacloud.com. A staff member will contact you within 5 working days. Once verified, infringing content will be removed immediately.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

Get Started for Free

Sales Support

1 on 1 presale consultation

Chat Contact Sales
After-Sales Support

24/7 Technical Support 6 Free Tickets per Quarter Faster Response

Open a Ticket
Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.

Learn More