<% dim Hits dim vote dim VoteNum dim documentid Dim con Set con = Server.CreateObject("ADODB.Connection") con.Open Application("ConnectionString") Call con.Execute("update documents set hits=isnull(hits,0)+1 where documentid=2990") Dim rs Set rs = con.Execute("select hits,vote/isnull(votenum,1),isnull(votenum,1) as votenum from documents where documentid=2990") If Not (rs.EOF And rs.BOF) Then Hits = rs(0) Vote = rs(1) VoteNum = rs(2) Else Hits = 1 Vote = 5 VoteNum = 1 End If rs.Close Set rs = Nothing con.Close Set con = Nothing %> Fireworks（三十三）PS滤镜在FW里的使用


Fireworks（三十三）PS滤镜在FW里的使用

PS处理图片的时候会借助很多外部下载的滤镜来增加处理的效果使作品更美观，然而FW2004也同样也可以使用PS的滤镜作出同样的效果。下面我先给大家介绍一下怎么安装滤镜。。。

第一步：请你下载eye4000滤镜并解压。


第二步：安装。 请看图安装，双击你解压后的eye4000，点确定。

第三步，确定安装目录是在FW20004——Plug-Ins下


第四步，点安装，UNZIP滤就会被安装成功。

第五步，起动FW2004就会在菜单兰里看到你EYE400的滤镜版面。。。

                           **版权所有闪客启航** 玉树临风整理2004年7月