  ȥ..

  ʵͻԼ

ûѡˡ֪ˣҪң򲢲ΪûӶֿʼѡ


  ʱ涨15ʾlistΪ140px;17ʾΪ180px


  ҳһ˵ԽõĹøƵ±бԺõϵճˡ

   inputҳеĿݼCtrl+Enter,ȻˣǿƲǺܺáȥΪ漰һֹû޼ϵ͡ݼȻҲԿƼһʱ䡣Ϊһسˡûϣһ»سͺܷˡ

   inputҳسֱӷͣһӵ˵ĵУ


   IPʱҪǵprocess.asp,÷endtimeӦǶ١

   application("c_sysuser")ȥΪ˱Щ࣬Application("c_useronline"),¼ͬʱ
   
   initchat.aspҪȫ
   
   session("c_guest")ҪȥΪʵʧȥڵļֵ
   
   inspecterܶҪ޸ģ̫

   ʽļܣõjk_md5㷨˱managerҺ̨½ҳҶûϡ

 admin_room.aspвǿɾ䣬ûΪ0ǿƹرո÷䣬ɾɾὫݿеɾӦи漰ݿ޸ġֻη֮á

   ʱ涨15ʾұߵLISTʾΪ140ײINPUTΪ7017ʾұߵʾΪ180ײINPUTΪ80

   session("c_username")̨Ա½ϵͳԶΪϵͳԱҪıƣҪǵ˴

   ʼʽڷǷַ⣺дݿݣûسƵȡ

   ǹдݿݵļ顣мݿеݶҪõtrdb(mess)Թ淶

function trdb(mess)
  mess=trim(zhgl(mess))
  mess=server.HTMLEncode(mess)
  mess=replace(mess,chr(34),"&quot;")
  mess=replace(mess,"'","&#39;")
  mess=replace(mess,"  ","")
  mess=replace(mess,chr(10),"")
  trdb=replace(mess,chr(13),"<br>")
end function

dbfunc.aspС


ύмܣ淶

function trpass(preString)
  Dim texts
  Dim seed
  Dim i,length
  prestring = trim(preString)
  length = len(preString)
  seed = length
  Randomize(length)
  texts = ""
  for i = 1 to length
    seed = int(94*rnd(-asc(mid(preString,i,1))-seed*asc(right(prestring,1)))+32)
    texts = texts & chr(seed) & chr(int(94*rnd(-seed)+32))
  next
  texts=replace(texts,"'","")
  trpass=replace(texts,chr(34),"")
end function
Դ˵ˮɣáͨû룬ϵͳԱõjk_md5

ʹ÷

ڴ֮ǰ֤õıֵǲΪյģûκ
sPass=trPass(sPass)
sPass=trPass(sPass)
if rs("passwd")=sPass then
insert into ..........................(ֱΪֶݣݿУ

Ӧóڣʱ䣬Զ˳ʱ䣬ʱ䣬Զظֵȫ͡

ڵĬֵģʱ䣺3ӣԶ˳5ӣʱΪ6ӣԶظΪ10䡣

Ựʱ7ӣڳʱ֮ǰһ˳ûʹglobal.asasession.onend¼ҲɣûʹõAPP޷ٵʧ


session.onendĴ

ıApplication("c_useronline")һʶı÷ҪģΪødefault.aspҳֱinnerTextĵǰspanȥӦе

ΪһЩĪĴҪԴһЩ

ע⣬һʹõĻһЩģʱһͳһ

application("c_roomvisite"&cstr(room_id)):ʱãѾȥ

ϵļȣһloading.asp
