<<< 返回 access911.net 编程静态资料库索引页

如何获取 GUID 字符串?《API》

 

作者:朱亦文,爱狐狸,cg1  摘自:access911.net  录入:cg1  时间:2002-11-22  浏览人次:4214


专题地址:http://access911.net/fixhtm/76FAB41E.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:如何生成GUID

 


方法一:

Debug.Print CreateObject("Scriptlet.TypeLib").Guid

 

方法二:

编写函数如下:

Public Function GetGUIDString() As String 
' 通过 usysGUID 表自动产生 GUID 字符串,并借助事务消除对数据库的操作 
' usysGUID 表:GUID 字段为:自动编号 同步复制ID 主键 
'      GuidStr字段为:char(20) 
' 作者:朱亦文 

  Dim rst As ADODB.Recordset 
  Dim cn As ADODB.Connection 
   
  Set cn = CodeProject.Connection 
   
  ' 开始数据库的事务 
  cn.BeginTrans 
   
  ' 打开一个新的记录集 
  Set rst = New ADODB.Recordset 
  With rst 
    Set .ActiveConnection = cn 
     
    ' 以键集开放锁打表 GUID 表 
    .Open "usysGUID", , adOpenKe.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/76FAB41E.htm

 


上一篇:如何获取 CPU ID (CPUid)?

下一篇:如何通过 WMI 获取主机的 IP 地址

2017年2月22日生成静态资料