Add a function to get a unique id(string) named 'Easp.NewID()'.

新增 Easp.NewID 方法，该方法返回一个不会重复的10位字符串，支持高并发情况下生成唯一的编号。示例：
<% Dim i
For i = 0 To 1000
Easp.WN Easp.NewID()
Next %>