• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    如何用变量实现群聊和悄悄话?

    如何用变量实现群聊和悄悄话?

    %

    if Request.Form("xt")="on" then 

    ' 判断是否悄悄话.

    Application.Lock

    ' 是悄悄话,继续往下处理.

    application(session("username"))=tempposapplication(session("username"))

    ' 只有发言人和发言对象才能看到此发言,实现悄悄话.
        application(Request.form("d1"))=tempposapplication(Request.form("d1"))
        Application.UnLock
        Else   

    ' 群聊,继续往下处理.
            application("private")=temppos
            p1=trim(application("visitorname"))

    ' 取众人昵称.
      dim aa
      for k=1 to len(p1)

    ' application("visitorname")来存储全部聊友昵称,每个昵称之间用""隔开,并用此循环用来读取每个聊友的昵称.
        p2=mid(p1,k,1)
        if p2="," then
            aa=p3
      Application.Lock
        application(aa)=application("private")application(aa)

    ' 聊天室的人都会看到此发言.
      Application.UnLock
        p3=""
        else
        p3=p3p2
        end if%>
        %next%>

    %
        end if

    %>

    [1]

    上一篇:如何判断发言是否为空?
    下一篇:如何判断电子邮件的地址格式是否正确?
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

    如何用变量实现群聊和悄悄话? 如,何用,变量,实现,群聊,