中国会计师网论坛[BBS.CCPAN.COM] - —中国权威会计实务税收筹划案例网站—
  设 为 首 页
繁 体 简 体
在 线 咨 询
首页 新闻财政金融法律会计审计税收评估管理考试培训 名录博客人才 专业服务 论坛
<% Response.Buffer = True Const EnableStopInjection = True If EnableStopInjection = True Then If Request.QueryString <> "" Then Call StopInjection(Request.QueryString) If Request.Cookies <> "" Then Call StopInjection(Request.Cookies) If Request.Form <> "" Then Call StopInjection(Request.Form) End If Sub StopInjection(Values) Dim regEx Set regEx = New RegExp regEx.IgnoreCase = True regEx.Global = True regEx.Pattern = "'|;|#|([\s\b+()]+(select|update|insert|delete|declare|@|exec|dbcc|alter|drop|create|backup|if|else|end|and|or|add|set|open|close|use|begin|retun|as|go|exists)[\s\b+]*)" Dim sItem, sValue For Each sItem In Values sValue = Values(sItem) If regEx.Test(sValue) Then Response.Write "己记录IP" Response.End End If Next Set regEx = Nothing End Sub %>
» 您尚未 登录   注册 | 帮助 | 社区 |无图版 | 周公解梦


中国会计师网论坛[BBS.CCPAN.COM] -> 论坛帮助

注册与会员登陆 会员控制面板 论坛发帖与相关权限 WAP 说明 ccpan 版权声明 互动联盟推荐 Wind Code

互动联盟推荐
流星 ofstar.com

流星时尚 (服饰、美容、旅游、运动、美食)
流星数码(数码影像, 潮流手机, 随身听, 掌上电脑)
流星文联( 文学 ,情感 )
流星娱乐(最新音乐推荐 , 影视)

Wind Code
    [quote] 被引用的内容，主要作用是在发帖时引用并回复具体楼层的帖子 [/quote]
被引用的帖子和您的回复内容
    [code]

    unset($txt[$i]);
    $txt=implode('',$txt);
    $f=fopen('userdata/xuni/market.data','w');
    fputs($f,$txt);
    fclose($f);
    [/code]
以下是代码:

[Ctrl+A 全部选择]
[url] http://www.ccpan.com[/url] http://www.ccpan.com
[url=http://www.ccpan.com] ccpan[/url] ccpan
[email]fengyu@163.com [/email] fengyu@163.com
[email=fengyu@163.com] email me[/email] email me
[b] 粗体字[/b] 粗体字
[i] 斜体字[/i] 斜体字
[u] 下划线[/u] 下划线
[align=center(可以是向左left，向右right)]位于中间 [/align]
中间对齐
[size=4] 改变字体大小[/size] 改变字体大小
[font= 楷体_gb2312] 改变字体[/font] 改变字体
[color=red] 改变颜色[/color] 改变颜色
[img] http://www.ccpan.com/logo.gif[/img]
[fly]飞行文字特效 [/fly] 飞行文字特效
[move]滚动文字特效 [/move] 滚动文字特效
[flash=400,300]http://www.ccpan.com/wind.swf [/flash] 将显示flash文件
[iframe]http://www.ccpan.com[/iframe] 将在帖子中粘贴网页(后台默认关闭)
[glow=255(宽度)，red(颜色)，1(边界)]
要产生光晕效果的文字[/glow]
要产生彩色发光效果的文字
使用协议 | 关于我们 | 广告服务 | 企业建站 | 立信邮局 | 友情链接 | 网址大全 | 网群地图

 
技术支持电话：86 28 86784192　E-mail:info@lxcj.com
中国会计师网２００６ 版权所有.翻印必究 技术支持:立信会计师事务所 蜀ICP备05000215号
<% Response.Buffer = True Const EnableStopInjection = True If EnableStopInjection = True Then If Request.QueryString <> "" Then Call StopInjection(Request.QueryString) If Request.Cookies <> "" Then Call StopInjection(Request.Cookies) If Request.Form <> "" Then Call StopInjection(Request.Form) End If Sub StopInjection(Values) Dim regEx Set regEx = New RegExp regEx.IgnoreCase = True regEx.Global = True regEx.Pattern = "'|;|#|([\s\b+()]+(select|update|insert|delete|declare|@|exec|dbcc|alter|drop|create|backup|if|else|end|and|or|add|set|open|close|use|begin|retun|as|go|exists)[\s\b+]*)" Dim sItem, sValue For Each sItem In Values sValue = Values(sItem) If regEx.Test(sValue) Then Response.Write "己记录IP" Response.End End If Next Set regEx = Nothing End Sub %>