經典的asp / vbscript類可跟蹤員工和績效指標

Question

我正在嘗試創建一個經典的asp / vbscript類，該類將使我能夠輕松管理少量員工（30-40）以及與這些員工相關的一些指標，每個指標約14個。 我已經在線完成了一些教程，但還不太了解如何進行。 到目前為止，我所擁有的如下。 數量不多，基本上我認為我只能將員工添加到班級的字典中，但是我不知道從這里去哪里。

class iagent
    private di_agents
    private ar_metrics
    private pri_agent_counter

    Public function add_agent(uuid)
        di_agents.Add uuid, pri_agent_counter
        pri_agent_counter=pri_agent_counter+1
    end function

    private sub Class_initialize
        pri_agent_counter=1
        dim ar_metrics(14, 5)
        set di_agents = CreateObject("Scripting.Dictionary")
    end sub

end class

Answer 1

您所擁有的課程只是字典的包裝。 您是在談論創建代表員工的課程嗎？

Class Employee
  Public Name
  Public Age
  Public Phone
  'other properties
End Class

然后，您可以像這樣實例化Employee並設置屬性

Set e = New Employee
e.Name = "Some name"

然后，您可以將Employee實例存儲在字典中，也許與ID配對：

Set d = CreateObject("Scripting.Dictionary")
Call d.Add(uuid, e)

但是，最好還是使用數據庫並使用ASP / VBS提取記錄...除非這只是一個練習