推荐:几种打开记录集方式的比较先定义conn.asp <% dim objConn dim strConn strConn = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & chr(34) & Server
chat.html
| 以下为引用的内容: |
chatopinions.asp
以下为引用的内容:
chatform.asp <% If Request.Form (Opinion)= then ShowForm() else if Session(AA)= then NewUser() GoAhead() else GoAhead() end if end if %> <% Sub ShowForm() %> <% End Sub %> <% Sub GoAhead() %> <% BB=Request.form(Opinion) BB=server.htmlencode(BB) Application.Lock Application(B1)=Application(B2) Application(B2)=Application(B3) Application(B3)=Application(B4) Application(B4)=Application(B5) Application(B5)=Application(B6) Application(B6)=Application(B7) Application(B7)=Application(B8) Application(B8)=Application(B9) Application(B9)=BB Application(A1)=Application(A2) Application(A2)=Application(A3) Application(A3)=Application(A4) Application(A4)=Application(A5) Application(A5)=Application(A6) Application(A6)=Application(A7) Application(A7)=Application(A8) Application(A8)=Application(A9) Application(A9)=Session(AA) Application.Unlock %> <% End Sub %> <% Sub NewUser() %> <% AA=Request.form(Name) AA=server.htmlencode(AA) Session(AA)=AA %> <% End Sub %> |
分享:ASP利用Google实现在线翻译功能有时候想为我们的网页提供多语言支持,如果一种语言用一张网页来做实在太麻烦了,幸好Google提供了语言工具功能,下面介绍如何利用它来实现网页多种语言之间的转换。lan.htm