<% 'Dim Action,Id Action = Trim(Request.QueryString("Action")) ID = Trim(Request.QueryString("ID")) Action = Replace(Action," ","") ID = Replace(ID," ","") Sql = "Select Picture,Hits From "&Action&" Where id="&ID Rs.Open Sql,Conn,1,2 Rs("Hits") = Rs("Hits") + 1 Rs.Update Rs.Close CloseConn() %> Test-YongKang TuoXin Industry & Trading Co., Ltd
Name Test
Time 2009-2-20 16:09:43
Down Down
Illumination Test

CpoyRight © 2008-2010 Toolscn.net All Rights Reserved.   Supported by  Ykr.Cc

 Add: Zhiying Industry Zone, Yongkang, Jinhua, Zhejiang, China  
Tel: 0086-579-87116671 Fax: 0086-579-87116571  
Email:Lewisxu@gmail.com     http://www.toolscn.net