天津市质量技术监督信息网

　　　　机构职能　　　　｜　　　　政策法规　　　　｜　　　　行政许可　　　　｜　　　　规划公报　　　　｜　　　　统计数据　　　　｜

　　　　办事指南　　　　｜　　　　文档下载　　　　｜　　　　在线办理　　　　｜　　　　查询中心　　　　｜　　　　咨询投诉　　　　｜

　　　　咨询留言　　　　｜　　　　办事电话　　　　｜　　　　局长信箱　　　　｜　　　　网上调查　　　　｜　　　　12365热线　　　｜

首页

" response.write "

关键字：

站点导航

<% mode = LCASE(Request("mode")) gif = Request("gif") Set conncount = Server.CreateObject("ADODB.Connection") conncount.Open(tcon()) SET rscount = Server.CreateObject("ADODB.Recordset") rscount.Open "Select * From counters" , conncount,1,3 LASTIP = rscount("LASTIP") NEWIP = REQUEST.servervariables("REMOTE_ADDR") IF CSTR(Month(rscount("DATE"))) <> CSTR(Month(DATE())) THEN rscount("DATE") = DATE() rscount("YESTERDAY") = rscount("TODAY") rscount("BMONTH") = rscount("MONTH") rscount("MONTH") = 1 rscount("TODAY") = 1 rscount.Update ELSE IF CSTR(Day(rscount("DATE"))) <> CSTR(Day(DATE())) THEN rscount("DATE") = DATE() rscount("YESTERDAY") = rscount("TODAY") rscount("TODAY") = 1 rscount.Update END IF END IF rscount("TOTAL") = rscount("TOTAL") + 1 rscount("TODAY") = rscount("TODAY") + 1 rscount("MONTH") = rscount("MONTH") + 1 rscount.Update counter=rscount("total") response.write "总访问量" GCounter( rscount("TOTAL") ) if counter=500000 then response.write "
" response.write "感谢您一直以来的支持，请凭这个号码（du83n)到我所领取精美礼品一份，期待您的到来" response.write "
" response.write "联系电话：23033321" else response.write "
" end if ' response.write "
" ' response.write "今日浏览总人数：" ' GCounter( rscount("TODAY") ) ' response.write "
" ' response.write "昨日浏览总人数：" ' GCounter( rscount("YESTERDAY") ) ' response.write "
" ' response.write "本月浏览总人数：" ' GCounter( rscount("MONTH") ) ' response.write "
" ' response.write "上月浏览总人数：" ' GCounter( rscount("BMONTH") ) ' response.write "
"%> <%response.write "

" N = Now D2 = DateValue(N) D1 = #27/11/2000# ' 开始统计日期(月/日/年) 'response.write "开站至今天：" ' GCounter( DateDiff("d", D1, D2) ) 'response.write "
" 'D3 = DateDiff("d", D1, D2) 'response.write "平均一日人数：" ' GCounter( rscount("TOTAL")\D3 ) conncount.CLOSE Function GCounter( counter ) Dim S, i, G S = CStr( counter ) For i = 1 to Len(S) G = G & "

" Next response.write G End Function %>

1、浏览网页时如何调整字号的大小？
IE4.0中 >>> 您可以在菜单中“查看(View)”中的“字体(Fonts)”选项中设置字体大小. IE5.0中 >>> 您可以在菜单中“查看(View)”中的“文字大小(Text Fonts)”选项中设置字体大小。 Netscape4.X中 >>> 可使用热键“Ctrl+]”增大字体，用“Ctrl+[”减小字体。
2、为什么有时IE会不正常？
IE由于和系统连接的比较紧密，当您有时在系统上安装某些动态监测系统的软件后，会对系统产生一些影响，您只要将IE重新安装一下就可解决问题。
3、看网页遇到乱码怎么办？
广东省质量技术监督局的网页中使用了语言标识，在浏览时如出现乱码，可用如下办法解决： IE4.X >>> 在菜单中选“查看(View)”中的“字体(Fonts)”，然后选“简体中文(Simplifiedhinese)GB2312”。 IE5.X >>> 在菜单中选“查看(View)”中的“编码(Encoding)”，然后选“简体中文(Simplified Chinese)GB2312”。 Netscape4.0X >>> 在菜单中选“View”中的“Encoding”，然后选“Simplified ChineseGB2312”。 Netscape4.5X >>> 在菜单中选“View”中的“Character Set”，然后选“Simplified ChineseGB2312”。
4、为什么有时用IE4.x/Netscapt4.X以下版本会出错？
广东省质量技术监督局的网页中使用了大量的Web制作新技术，如CSS, JSSS, Java等，这些新技术都不被IE4.x/Netscapt4.X以下版本所接受。
5、如果想删除浏览器地址栏中的网址,怎么办?
(1)、在Netscape　Navigator 3.x中　 a、先退出Netscape，运行regedit命令。　　 b、出现注册表编辑器后，打开HKEY-CURRENT-USER\SOFTWARE\NETSCAPE NAVIGATOR\URLHISTORY分支　　 c、清除“URLHISTORY”中的你先想要隐藏的网址整行。　　 d、关闭注册表文件，启动Netscape即可。 (2)、在Netscape　Communicator 4.x中 a、退出Netscape。　　 b、用计算机的查找文件功能查到一个名为“prefs.js”的文件，它一般位于 c:\programfiles\netscape\users\yourname\prefs.js，其中yourname为登录WINDOWS的用户名。　　 c、用鼠标双击该文件来打开它，此文件的内容通常由类似下列格式的行组成：　　　 user_pref("browser.url_history.url_1","http://www.chinayancheng.net/"）　　 d、这些行决定了地址栏下拉框中的内容，于是删除我们想要清除的内容。　　 e、保存该文件，然后启动Netscape即可。　　 (3)、在IE3.X以上版本中 a、退出INTERNET　EXPLORER，运行regedit命令。 b、注册表编辑器出现以后，打开HKEY_CURRENT_USER\SOFTWARE\MICROSOFT\INTERNET EXPLORER\TYPEDURLS分支。 c、清除“TYPEDURLS”中的您想删除的键值。　 d、关闭注册表文件，重新打开ＩＥ即可。 (4)、在IE3.X以上版本中 a、打开INTERNET　EXPLORER浏览器。　　 b、打开菜单栏中的“查看－－INTERNET选项”，出现INTERNET选项对话框。　　 c、选择“清除历史记录”按钮，即可把地址框中的所有内容清除掉。
6.设置什么分辨率合适？
浏览本网主页，建议将电脑显示屏的分辨率设置为1024×768

天津市质量技术监督信息网