<% '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