A-I

摘要： 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... 阅读全文