<% dim conn,ff 'dim connstr Set conn = Server.CreateObject("ADODB.Connection") 'server为服务器地址可以填写IP,UID为登陆用户名,PWD为密码,DATABASE为数据库名 'connstr="DSN=SP;UID=IUSR_KHXGX;PWD=" 'conn.Open connstr ff=server.mappath("lz.asp") conn.open "driver={microsoft access driver (*.mdb)};dbq="&ff %> 廉洁自律承诺
设为主页
加入收藏
联系我们
　|　委局领导　|　主要职能　|　内设机构　|　政策法规　|　信访举报　|　经济环境投诉中心　|　纪委书记信箱

欢迎第 <%SET Rs1 = Server.CreateObject("ADODB.Recordset") Rs1.Open "Select * From counter" , conn,1,3 Rs1("TOTAL")=Rs1("TOTAL") + 1 Rs1.update response.write MyCounter( Rs1("TOTAL") ) Function MyCounter( counter ) Dim S, i, G S = CStr( counter ) For i = 1 to Len(S) G = G & "" Next Response.write G End Function rs1.close set rs1=nothing%> 位客人

本站信息查询：
　　


　 公 告 栏
　 读书思廉
　 廉洁自律
◆ 警钟长鸣
◆ 警 界 线
◆ 从政警言
◆ 廉洁承诺
　 案件查办

部门领导
乡镇领导
县委办（更新中）
古田山管理局（更新中）
县联通公司（更新中）
县农发行（更新中）
县信用联社（更新中）
县保险公司（更新中）
 

中华网 新浪网 搜狐网 网 易 阿里巴巴 人民日报　衢州政务网　开化政务网　浙江日报　衢州日报
北京市纪委　东方廉政网　廉政经纬　绿谷廉政网 南京纪检监察网 温州廉政网 杭州纪检网 南通廉政网


版权所有 中共开化县纪律检查委员会　
Tel:0570-6013863 　　E-mail:khnj110@163.com