ASP系統中需要獲取系統時間是一個常見的需求。在ASP中，可以使用Access數據庫來獲取系統時間。具體實現方式是通過使用VBScript語言，利用Access數據庫的內置函數來獲取系統當前時間，并將其顯示在網頁中。

假設我們有一個名為"TimeTable"的Access數據庫，其中包含了一個名為"tblTime"的表，表中有一個名為"CurrentTime"的字段用于存儲系統當前時間。我們希望在網頁中顯示出這個系統時間。

首先，我們需要在ASP頁面中連接到Access數據庫。

<%@ Language=VBScript %>
<% Option Explicit %>
<% 
Dim conn, rs
Set conn = Server.CreateObject("ADODB.Connection")
conn.Provider = "Microsoft.Jet.OLEDB.4.0"
conn.Open Server.MapPath("TimeTable.mdb")
%>

上述代碼中，我們創建了一個對象conn來連接到Access數據庫。其中Server.CreateObject("ADODB.Connection")用于創建一個ADODB.Connection對象，Server.MapPath("TimeTable.mdb")用于指定數據庫的路徑。

接下來，我們需要獲取系統當前時間，并將其存儲到變量currentTime中。

<% 
Dim currentTime
currentTime = Now()
%>

上述代碼中的Now()函數可以獲取系統當前時間。

然后，我們需要將系統當前時間寫入到Access數據庫的tblTime表中。

<% 
Dim sql
sql = "UPDATE tblTime SET CurrentTime='" & currentTime & "'"
conn.Execute(sql)
%>

上述代碼中，我們使用UPDATE語句將系統當前時間更新到tblTime表的CurrentTime字段中。

最后，我們可以從tblTime表中讀取到系統當前時間，并將其顯示在網頁中。

<% 
Dim sql, rs
sql = "SELECT CurrentTime FROM tblTime"
Set rs = conn.Execute(sql)
Response.Write "系統當前時間是：<br>"
Response.Write rs("CurrentTime")
rs.Close
conn.Close
%>

上述代碼中，我們使用SELECT語句從tblTime表中讀取CurrentTime字段的值，并將其顯示在網頁中。

通過以上的代碼，我們可以實現在ASP系統中獲取Access數據庫中的系統當前時間，并將其顯示在網頁中。

實際應用中，我們可以根據需要對獲取到的系統當前時間進行格式化操作，以滿足不同的展示需求。此外，我們還可以通過調整代碼，實現定時更新系統當前時間到Access數據庫中，保持時間顯示的準確性。