|
 |
|
 |
|
 |
 |
 |
|
 |
 |
|
|
 |
 |
|
|
 |
 |
|
|
 |
 |
|
|
 |
 |
|
|
 |
 |
|
|
 |
 |
|
| |
 |
|
 |
| |
| 加入收藏 |
 |
| 設為首頁 |
|
| 您是本站的第 |
 <%
Dim fsoObject
Dim tsObject
Dim filObject
Dim lngVisitorNumber
Dim intDisplayDigitsLoopCount
On Error Resume Next
lngVisitorNumber = 0
Set fsoObject = Server.CreateObject("Scripting.FileSystemObject")
Set filObject = fsoObject.GetFile(Server.MapPath("visitor_counter.txt"))
Set tsObject = filObject.OpenAsTextStream
lngVisitorNumber = CLng(tsObject.ReadAll)
If Session("lngSessionVisitorNum") = "" Then
lngVisitorNumber = lngVisitorNumber + 1
Session("lngSessionVisitorNum") = lngVisitorNumber
Else
Session("lngSessionVisitorNum") = lngVisitorNumber
End if
Set tsObject = fsoObject.CreateTextFile((Server.MapPath("visitor_counter.txt")), True)
tsObject.Write CStr(lngVisitorNumber)
Set fsoObject = Nothing
Set tsObject = Nothing
Set filObject = Nothing
For intDisplayDigitsLoopCount = 1 to Len(lngVisitorNumber)
Response.Write "![]() "
Next
%> |
| 位訪客 |
|
|
 |
|
 |
|
|
|
 |
 |
 |
 |
 |
 |
|
 |
| |
|
| Technology |
|
|
|
| 鍵寧企業股份有限公司
|
| 一直保持著在技術上的領先地位 , 秉承以高技術為依托 , 一流服務為客戶的宗旨 , 力爭向客戶提供優質與完善的技術支援及服務為目標 ... |
| |
 More information ... |
|
|
 |
| |
|
| Contact |
|
|
|
| Taipei Head Office 台北: |
TEL: 886-2-2786-2233
FAX: 886-2-2788-5066
|
| Hong Kong Office 香港: |
TEL: 852-2743-1816
FAX: 852-2742-2506 |
| Shanghai Office 上海: |
TEL: 8621-63532570
TEL: 8621-63532570 |
| More information ... |
|
|
 |
 |
|
 |
| |
  |
| |
Greendich Enterprise, Co.,Ltd., established in 1983, has become a major importer of quality components in Taiwan's electronic industry, as well as a leading exporter of Taiwan computer products and peripherals. We offer a broad range of products backed by a complete and responsive service organization. |
|
 |
| |
More information ... |
|
|
 |
| |
  |
| |
To take the lead in supporting an industry that is in constant change.With branches in Southern Taiwan ( Kaohsiung ) and Hong Kong , our goal is to expand our product lines and customer base , by offering Quality, Reliable Products and Dependable Service. |
| |
More information ... |
|
 |
|
|
 |
|
 |
|
|
|
|
|
|
|
|
|
