台灣醫學儀器網

<% Set conn = Server.CreateObject("ADODB.Connection") DBPath = Server.MapPath("counter.mdb") conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath SET rs = Server.CreateObject("ADODB.Recordset") Rs.Open "Select * From counters" , conn,1,3 LASTIP = RS("LASTIP") NEWIP = REQUEST.servervariables("REMOTE_ADDR") IF CSTR(RS("DATE")) <> CSTR(DATE()) THEN ' 如果日期已過了一天 RS("DATE") = DATE() ' 將日期改為今天 RS("YESTERDAY") = RS("TODAY") ' 將今日人數與昨日人數交換 RS("TODAY") = 1 ' 重新計算今日登入人數 RS.Update ' 儲存資料 END IF IF LASTIP <> NEWIP THEN ' 比對 IP ,不使用灌水式 RS("TOTAL") = RS("TOTAL") + 1 ' 總數加一 RS("TODAY") = RS("TODAY") + 1 ' 重新計算今日登入人數 RS("LASTIP") = NEWIP ' 將新登入者的 IP 寫入 RS.Update ' 儲存資料 END IF %> 台灣醫學儀器網

English

產品銷售

維修零件銷售

中古儀器銷售區

儀器廠商廣告區

＊急需!!
1. 急徵中古顯微鏡(150倍)
2. 高價收購檢驗科使用之各式中古檢驗儀器一批(國外醫院採購)
　廠牌不限，需良品。
3.高價收購中古腹部超音波掃瞄儀壹部，廠牌不限，需良品。

＊超音波掃描儀器專用GEL Warmer --------- (廠牌：Parker)
符合UL安規，世界最大專業製造廠產品安全、專業、可靠
現在特惠價只要 $ 7500 元 (歡迎來電洽詢)

＊