摘要: Public gCompName '取得计算机名及Windows目录 Dim i% Dim c$ Dim cSql As String Dim cProduct As String c = Space(256) i = GetComputerName(c, 256) gCompName = Trim(c) gCompName = Left(gCom... 阅读全文
posted @ 2008-07-30 10:31 艾伦 阅读(298) 评论(0) 推荐(0) 编辑