<% set con=server.CreateObject("adodb.connection") set rs=server.CreateObject("adodb.recordset") con.open "provider=microsoft.jet.oledb.4.0;data source=" & server.MapPath("..\db\counter101\counter.mdb") rs.open "select * from hit",con,1,3 rs("counter")=rs("counter")+1 rs("tgl")=date rs.update counter=rs("counter") tgl=rs("tgl") rs.close set rs=nothing con.close set con=nothing %>
Welcome to Susan+Pro       |ENGLISH | INDONESIAN|


     
       
bar1_Bottom bar2_Bottom bar3_Bottom_Essential
 

 
     





Flash_PlugIn_Download
visitors: <%=counter%>

Portfolioman - Mobile Applications 		 
Portfolioman - Data Center
Developed by: portfolioman.com
News & Events Company Prolie Our Products Alliances Contact Us