<%=formatdatetime(now(),vblongdate)%>
<%=formatdatetime(now(),vblongtime)%>
|
<%
mode = LCASE(Request("mode"))
gif = Request("gif")
Set conn = Server.CreateObject("ADODB.Connection")
strCon = "provider=SQLOLEDB.1;Data Source=192.168.1.132;User ID=sa;pwd=m9m8l7jar;Initial Catalog=dbhouse"
conn.open strCon
SET rs = Server.CreateObject("ADODB.Recordset")
Rs.Open "Select * From counters where ID = 'taiwandm1dm'" , conn,1,3
RS("LASTIP") = RS("NEWIP")
RS("NEWIP") = REQUEST.servervariables("REMOTE_ADDR")
IF CSTR(Month(RS("DATIME"))) <> CSTR(Month(DATE())) THEN
RS("DATIME") = DATE()
RS("YESTERDAY") = RS("TODAY")
RS("BMONTH") = RS("TMONTH")
RS("TMONTH") = 1
RS("TODAY") = 1
RS.Update
ELSE
IF CSTR(Day(RS("DATIME"))) <> CSTR(Day(DATE())) THEN
RS("DATIME") = DATE()
RS("YESTERDAY") = RS("TODAY")
RS("TODAY") = 1
RS.Update
END IF
END IF
RS("TOTAL") = RS("TOTAL") + 1
RS("TODAY") = RS("TODAY") + 1
RS("TMONTH") = RS("TMONTH") + 1
RS.Update
' response.write "今："&RS("TODAY")&"
"
' response.write "昨："&RS("YESTERDAY")&" "
' response.write "總："&RS("TOTAL")
' response.write "總："
' GCounter( RS("TOTAL") )
' response.write " "
' response.write "今："
' GCounter( RS("TODAY") )
' response.write " "
' response.write "昨："
' GCounter( RS("YESTERDAY") )
' response.write " "
'response.write "本月總數："
' GCounter( RS("TMONTH") )
'response.write " "
'response.write "上月總數："
'GCounter( RS("BMONTH") )
'response.write " "
N = Now
D2 = DateValue(N)
D1 = #12/09/2002# ' 網站開站日期(月/日/西元)
'response.write "開站至今天數："
'GCounter( DateDiff("d", D1, D2) )
'response.write "
"
'D3 = DateDiff("d", D1, D2)
'response.write "平均一日人數："
'GCounter( RS("TOTAL")\D3 )
rs.close
set rs = nothing
CONN.CLOSE ' 關閉資料庫
set conn = nothing
Function GCounter( counter )
Dim S, i, G
S = CStr( counter ) ' 先將數值轉成字串 S
' 逐一取出字串 S 的每一個字元，然後串成  的圖形標示
For i = 1 to Len(S)
G = G & "![](img/gif/") "
Next
response.write G
End Function
%>
|
本網站相關服務，由經營【平面廣告執行通路】有多年豐富經驗之【中和派報社】即（【中和聯合廣告有限 公司】） 所提供，品質有保障 。
歡迎將您的【印刷製作】與【派夾報執行】 一次交給【中和派報社網站
】。
本網站 除傳統之【全台灣信箱派報、報紙夾報】 項目 外，另與各大【印刷廠】結盟，將【製作】與【執行】作一 系列
結合，除提供所有客戶最便利之服務外，並因為結合之成本 降低，將最便宜價位回饋給所有客戶。
|
房產新聞
◎陸資來台買不動產 停留期限放寬(2008/02/18)
◎房仲業者調查 愛侶合購愛巢 男看價格女看環境(2008/02/18)
◎網路找屋比重 增至83％(2008/02/18)
◎彰化鹿港金和興街天公伯 身價不凡(2008/02/18)
◎建商前十大洗牌 台中建商出頭(2008/02/14)
◎土增稅一月衰退一成六(2008/02/14)
◎公設地變更未申報 改為免罰(2008/02/14)
◎台北市社子島為彌補禁建土地稅減30%(2008/01/30)
|
|
| |
|
「中和派報社」，即【中和聯合廣告有限公司】，成立於中華民國八十七年八月份，於大台北地區派報業中，具十年專業經驗，在派夾報服務上，品質一流。
本公司負責人，亦為本行業於北台灣之同業組織 --
「台北市平面廣告品夾送服務業者協會」之「理事」。
本公司所屬之行業別「派報業」，服務性質為：接受工商百業客戶的委託，將客戶之平面廣告品（含海報、文宣、廣告品、贈品），送到特定或不特定的潛在消費者手中。故可採用的方法與途徑甚多，可見（服務項目）。
曾服務過與目前服務的客戶行業廣泛，包含：各大建設代銷房地產案件、各大仲介案件、各大賣場、餐飲、美容休閒、娛樂、幼教、租賃、駕訓、代書、金融銀行、各式俱樂部、搬家貨運、郵購、電腦資訊、超市、美髮、百貨、貿易、展覽促銷、雜誌折價券、傢俱賣場、保全、裝潢、法律顧問........等。
公司資料
地址：台北市縣中和市德光路一一七號一樓
電話：（02）8964-1145
傳真：（02）8964-1153
E-mail：taiwan.home1@msa.hinet.net
網址：http://www.taiwandm.com.tw/1dm
負責人：（台北市平面廣告品夾送服務業者協會現任理事）
成立年份：民國87年
業務服務項目：
| ● 各區信箱派報 |
| ● 各大報【訂戶報】報紙夾報 |
| ● 各大報【五大連鎖超商零售報】報紙夾報 |
| ● 路邊定點派報發行人 |
| ● 海報文宣設計印刷製作 |
服務範圍：
|
基隆市
|
中正區、信義區、仁愛區、中山區、安樂區、七堵區、暖暖區 |
|
台北市
|
中山區、大安區、信義區、松山區、中正區、大同區、萬華區、文山區、士林區、北投區、內湖區、南港區 |
|
台北縣
|
樹林市、汐止市、新店市、板橋市、土城市、三重市、新莊市、蘆洲市、泰山鄉、五股鄉、永和市、中和市、三峽鎮、淡水鎮、鶯歌鎮、林口鄉、深坑鄉、八里鄉、貢寮鄉、三芝鄉、石門鄉、金山鄉、萬里鄉、烏來鄉、平溪鄉、雙溪鄉、石碇鄉、坪林鄉、瑞芳鎮 |
|
|
【http://www.taiwandm.com.tw/1dm】