SetupFactory-脚本

1、写注册表

lResult = Registry.DoesKeyExist(HKEY_LOCAL_MACHINE, "SOFTWARE\\MapInfo\\MapX\\5.0");

if not lResult then

 Registry.CreateKey(HKEY_LOCAL_MACHINE, "SOFTWARE\\MapInfo\\MapX\\5.0");

end;

Registry.SetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\MapInfo\\MapX\\5.0", "ProgramDir", "C:\\Program Files\\MapInfo\\MapX 5.0", REG_MULTI_SZ);

Registry.SetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\MapInfo\\MapX\\5.0", "SearchPaths", "", REG_MULTI_SZ);

Registry.SetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\MapInfo\\MapX\\5.0", "GeoDictionary", "", REG_MULTI_SZ);

Registry.SetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\MapInfo\\MapX\\5.0", "VersionCode", "5.02", REG_MULTI_SZ);

Registry.SetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\MapInfo\\MapX\\5.0", "CommonDLLDir", "C:\\Program Files\\MapInfo\\MapX 5.0", REG_MULTI_SZ);

2、注册文件

lreg = SessionVar.Expand('"%AppFolder%\\MapX 5.0\\regsvr32.exe" /s ');

lfile = SessionVar.Expand('"%AppFolder%\\MapX 5.0\\MAPX50.DLL"');

localfile = String.Concat(lreg,lfile);

File.Run(localfile, "", "", SW_SHOWNORMAL, false);

--result = Dialog.Message("注意",localfile, MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

3、检查Oracle客户端是否安装

function isOracleClientInstalled()

  retVal = Registry.DoesKeyExist(HKEY_LOCAL_MACHINE, "Software\\Oracle\\HOME0");

  -- 提供额外的检查

  return retVal;

end;

4、下载文件(s)

function downloadFile(remoteUrl, localFile, title)

  retVal = ""

  httpOK = HTTP.TestConnection(remoteUrl);

  if (httpOK) then

    StatusDlg.Show(0, false);

    StatusDlg.SetTitle(title);

    HTTP.Download(remoteUrl, localFile);

    StatusDlg.Hide();

    err = Application.GetLastError();

    if err == 0 then

      return localFile;

    end;

  end;

 

  if (not httpOK) then

    return "";

  end;

end;

function downloadFiles(remotePath, files, localPath, title)

  StatusDlg.Show(0, false);

  StatusDlg.SetTitle(title);

  for idx, f in files do

    remoteFile = String.Concat(remotePath, f);

    localFile = String.Concat(localPath, String.Replace(f, "/", "\\"));

    HTTP.Download(remoteFile, localFile);

    err = Application.GetLastError();

    if err ~= 0 then

      return "";

    end;

  end;

  StatusDlg.Hide();

  return localPath;

end;

5、添加Oracle连接串

function addOracleLocalService(serviceName, host, port, remoteService)

  oraFile = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\Oracle", "ORACLE_HOME");

  oraFile = String.Concat(oraFile, "\\network\\admin\\tnsnames.ora");

 

  stroraFile = TextFile.ReadToString(oraFile);

  svcPos = 1;

  oraFileLen = String.Length(stroraFile);

 

  while svcPos > 0 and svcPos < oraFileLen do

    svcPos = String.Find(stroraFile, serviceName, svcPos + String.Length(serviceName), false);

    if svcPos > 0 and prevIsNotSymbol(stroraFile, svcPos) and nextSymbol(stroraFile, svcPos + String.Length(serviceName), oraFileLen) == '=' then

      break;

    end;

  end;

 

  if svcPos == -1 then

    stroraFile =

    String.Concat(serviceName,

      String.Concat(" =\r\n  (DESCRIPTION =\r\n    (ADDRESS_LIST =\r\n      (ADDRESS = (PROTOCOL = TCP)(HOST = ",

        String.Concat(host,

          String.Concat(")(PORT = ",

            String.Concat(port,

              String.Concat("))\r\n    )\r\n    (CONNECT_DATA =\r\n      (SERVICE_NAME = ",

                String.Concat(remoteService,

                  ")\r\n    )\r\n  )"

                )

              )

            )

          )

        )

      )

    );

    stroraFile = String.Concat("\r\n", stroraFile);

    orabakFile = String.Concat(oraFile, ".sbk");

    File.Copy(oraFile, orabakFile);

    TextFile.WriteFromString(oraFile, stroraFile, true);

  end;

end;

6、修改hosts文件

function addSdeLocalHosts(LName,MapIP)

  hostsFile = _WindowsFolder;

  hostsFile = String.Concat(hostsFile, "\\system32\\drivers\\etc\\hosts");

  --Debug.SetTraceMode(turn_on);

  --Debug.ShowWindow(true);

  --Debug.SetTraceMode(true);

  Avar =String.Concat(MapIP,"      ");

  Avar =String.Concat(Avar,LName);

  --strhostFile = TextFile.ReadToString(hostsFile);

  --strhostFile =String.Concat(strhostFile,Avar);

  strhostFile =String.Concat("\r\n",Avar);

   -- strhostFile=Avar;   

    hostsbakFile = String.Concat(hostsFile, ".sbk");    

    File.Copy(hostsFile, hostsbakFile);

    TextFile.WriteFromString(hostsFile,strhostFile, true);

end;

7、检查fromwork2.0是否安装

function isDotNETInstalled()

  retVal = Registry.DoesKeyExist(HKEY_LOCAL_MACHINE,

    "Software\\Microsoft\\.NETFramework\\Policy\\v2.0");

  -- 做额外的检查

  return retVal;

end;

8、其它

 

DlgProgressBar.SetRange(CTRL_PROGRESS_BAR_01, 0, 5);

DlgProgressBar.SetStep(CTRL_PROGRESS_BAR_01, 1);

-- Test if Oracle 9i Client is installed.

-- If not, download from the location specified by session variable "%OracleDownloadUrl%"

-- and install it.

DlgProgressBar.SetProperties(CTRL_PROGRESS_BAR_01, {Text="正在验证Oracle客户端安装..."});

DlgProgressBar.Step(CTRL_PROGRESS_BAR_01);

if not isOracleClientInstalled() then

  localOracleStartFolder = SessionVar.Expand("%TempFolder%\\Oracle\\");

  localOracle = String.Concat(localOracleStartFolder, "Oracle9iClient.msi");

  oracleUrl = SessionVar.Get("%OracleDownloadUrl%");

  if downloadFile(oracleUrl, localOracle, "正在下载Oracle客户端……") == localOracle then

   runMSINoAttention(localOracle, localOracleStartFolder);

  else

    Dialog.Message("错误",

      "不能下载安装Oracle客户端,安装完本软件后,请自行下载安装。",

      MB_OK,

      MB_ICONEXCLAMATION);

  end;

end;

-- If oracle client does exist or has just been installed, register local oracle service name.

DlgProgressBar.SetProperties(CTRL_PROGRESS_BAR_01, {Text="正在验证Oracle客户端服务名..."});

DlgProgressBar.Step(CTRL_PROGRESS_BAR_01);

if isOracleClientInstalled() then

  addOracleLocalService(

    SessionVar.Get("%OracleLocalService%"),

    SessionVar.Get("%OracleRemoteHost%"),

    SessionVar.Get("%OracleRemotePort%"),

    SessionVar.Get("%OracleRemoteService%")

  );

end;

 

Setup Factory 打包工具部分功能代码解

Application.Exit
退出安装程序,并返回一个可选的返回代码。Application.GetInstallLanguage
返回一个包含当前安装语言的表格。Application.GetLastError
返回最后的错误代码。Application.GetWndHandle
为安装程序窗口返回数字窗口句柄。Application.LoadActionPlugin
加载一个操作插件文件 (.lmd)。Application.LoadScript
加载并执行一个外部脚本文件 (.lua)。Application.LoadValue
加载保存 Application.SaveValue 操作的值。Application.Minimize
最小化安装程序窗口到任务栏。Application.Restore
恢复安装程序窗口。Application.RunScriptFile
执行外部脚本文件 (.lua) 的内容。Application.SaveValue
保存值到

用户的系统,以便今后可用 Application.LoadValue 操作获取。Application.SetInstallLanguage
设置指定的语言为安装语言。Application.SetLastError
更改最后的错误代码。Application.Sleep
让安装程序休眠一段时间。
Debug.Clear
清除调试窗口的内容。Debug.GetEventContext
返回描述当前事件上下文的字符串,如:"欢迎 > 继续时"。Debug.GetTraceMode
返回当前调试跟踪模式。Debug.Print
追加文本到调试窗口的底部。Debug.SetTraceMode
打开或关闭调试跟踪模式。Debug.ShowWindow
显示或隐藏调试窗口。Dialog.FileBrowse
显示一个文件浏览对话框,以便用户选择一个或多个文件的路径。Dialog.FolderBrowse
显示文件夹浏览对话框,以便用户选择文件夹的路径。Dialog.Input
显示输入对话框,以便获取用户信息。Dialog.MaskedInput
显示输入对话框,以便按指定格式获取用户信息。Dialog.Message
显示带有消息信息的对话框。Dialog.PasswordInput
显示“隐藏输入”对话框,以便获取用户输入的密码。Dialog.TimedMessage
显示带有消息信息的定时对话框。Dialog.SplashImage
显示包含图像的闪屏对话框。DlgButton.GetProperties
获取当前屏幕上按钮控件的属性。DlgButton.SetProperties
设置当前屏幕上按钮控件的属性。DlgCheckBox.GetProperties
获取当前屏幕上检查框的属性。DlgCheckBox.SetProperties
设置当前屏幕上检查框控件的属性。DlgComboBox.AddItem
将项目添加到已排序的组合框控件。如果控件未排序,项目将被添加到末尾。DlgComboBox.GetItemData
获取当前屏幕上组合框控件中项目的关联数据字符串。DlgComboBox.GetItemText
返回当前屏幕上组合框控件中项目的文本。DlgComboBox.GetProperties
获取当前屏幕上组合框控件的属性。DlgComboBox.InsertItem
插入项目到组合框控件。DlgComboBox.RemoveItem
从组合框控件中移除项目。DlgComboBox.SetItemData
将组合框控件的项目设置为字符串,以便今后能被检索。DlgComboBox.SetProperties
设置当前屏幕上组合框控件的属性。DlgEditField.GetProperties
获取当前屏幕上编辑栏控件的属性。DlgEditField.SetProperties
设置当前屏幕上编辑栏控件的属性。DlgListBox.AddItem
添加项目到列表框控件。如果列表框已排序,项目被添加到已排序的位置,否则被添加到末尾。注意:此操作仅在从屏幕事件调用和指定的控件在当前屏幕上的时候工作。DlgListBox.DeleteItem
从列表框控件中删除项目。DlgListBox.FindItem
基于搜索字符串在列表框中查找项目,并返回其索引。DlgListBox.GetCount
返回列表框控件中的项目数量。DlgListBox.GetItemProperties
获取已给出其索引的列表框控件中项目的属性。DlgListBox.GetProperties
获取当前屏幕上列表框控件的属性。DlgListBox.GetSelected
返回指定列表框控件中所有已选项的索引 (行号) 的数字索引表。DlgListBox.GetSelectedCount
返回列表框控件中已选项的数量。DlgListBox.InsertItem
将项目插入到列表框控件中的指定位置。DlgListBox.SetItemProperties
设置已给出其索引的列表框控件中项目的属性。DlgListBox.SetProperties
设置当前屏幕上列表框控件的属性。DlgListBox.SetUpdate
设置列表框控件的更新状态。DlgProgressBar.GetPos
返回进度条控件中进度表的当前位置。DlgProgressBar.GetProperties
返回包含当前屏幕上进度条控件属性的表格。DlgProgressBar.GetRange
返回包含当前屏幕上进度条控件范围的表格。DlgProgressBar.SetPos
设置当前屏幕上进度条控件中进度表的位置。DlgProgressBar.SetProperties
设置当前屏幕上进度条控件的属性。DlgProgressBar.SetRange
设置当前屏幕上进度条控件的范围。DlgProgressBar.SetStep
设置进度条控件的步长值,它将在 DlgProgressBar.Step 被调用时使用。DlgProgressBar.Step
通过在 DlgProgressBar.SetStep 操作中指定的步长数量来增加当前进度。DlgRadioButton.GetProperties
获取当前屏幕上单选按钮控件的属性。DlgRadioButton.SetProperties
设置当前屏幕上单选按钮控件的属性。DlgScrollingText.AppendLine
追加新行到滚动文本控件中的当前文本。DlgScrollingText.SetProperties
设置当前屏幕上滚动文本控件的属性。DlgSelectPackages.GetCategoryProperties
获取当前屏幕上选择程序包控件中程序包类别的属性。DlgSelectPackages.SetCategoryProperties
设置当前屏幕上选择程序包控件中程序包类别的属性。DlgSelectPackages.UpdateDisplay
基于当前内部数据来更新当前显示的程序包列表。DlgStaticText.GetProperties
获取当前屏幕上静态文本控件的属性。DlgStaticText.SetProperties
设置当前屏幕上静态文本控件的属性。DLL.CallFunction
调用动态链接库 (DLL) 中的函数。它可用于以你自己的函数来扩充 Setup Factory 的功能。Drive.Eject
当给出了有效的盘符时弹出 CD 或 DVD-ROM。Drive.Enumerate
返回包含用户系统上所有驱动器的数字索引表。Drive.GetFreeSpace
获取指定驱动器的剩余磁盘空间,并返回其大小 (MB)。Drive.GetInformation
返回有关指定驱动器的信息表。Drive.GetSize
获取指定硬盘的磁盘空间,并返回其大小 (MB)。Drive.GetType
获取指定驱动器的类型。Drive.GetUsedSpace
获取指定驱动器的已用磁盘空间,并返回其大小 (MB)。File.Copy
复制文件到其他位置。File.Delete
删除文件。File.DeleteOnReboot
下次系统重启时删除文件。File.DoesExist
如果文件存在于指定位置就返回 true,否则返回 false。File.ExploreFolder
浏览用户系统上的文件夹。File.Find
在本地系统上搜索文件。File.GetAttributes
给指定文件返回包含所有属性的表格。File.GetCRC
给指定文件返回 CRC 值。File.GetDefaultViewer
返回路径到与指定文件扩展名关联的默认阅读程序。File.GetShortName
获取文件的完整路径和文件名的“8.3”样式。File.GetSize
返回文件的大小 (字节)。File.GetVersionInfo
给指定文件返回包含所有版本信息的表格。File.Install
将文件安装到用户系统。File.IsInUse
确定指定文件是否正在使用。如果文件正在使用,就不能复制或删除。File.Move
移动文件到其他位置。File.MoveOnReboot
下次系统重启时将文件从一个位置移动到另一个位置。File.Open
用默认的阅读程序打开文档文件。File.OpenEmail
用目标栏中的 Email 地址打开用户的默认 Email 客户端。File.OpenURL
在用户的默认网络浏览器中打开本地文件或网络地址。File.Print
在用户的默认打印机上打印文档。File.Rename
重命名文件。File.Run
运行可执行文件。File.RunOnReboot
下次系统重启时运行执行程序。File.SetAttributes
设置文件的属性。Folder.Create
创建新文件夹。Folder.Delete
删除文件夹。Folder.DeleteTree
删除指定的文件夹及其子文件夹中的所有文件。Folder.DoesExist
如果指定文件夹存在就返回 true,否则返回 false。Folder.Find
搜索文件夹。Folder.GetCurrent
返回“当前文件夹”(工作目录)。Folder.Rename
重命名文件夹。Folder.SetCurrent
设置应用程序的“当前文件夹”(工作目录)。HTTP.Download
从网站上下载文件。HTTP.DownloadSecure
使用 HTTPS (安全超文本传输协议 ) 从网站下载文件。HTTP.GetConnectionState
检索用户的 Internet 连接状态。HTTP.GetHTTPErrorInfo
检索有关最后发生错误的 HTTP 指定信息。HTTP.Submit
提交数据到网站,并从服务器返回响应。HTTP.SubmitSecure
使用 HTTPS (安全超文本传输协议 ) 提交数据到网站,并从服务器返回响应。HTTP.TestConnection
检查用户的 Internet 连接。INIFile.DeleteSection
删除指定 INI 文件中的“区段”。INIFile.DeleteValue
删除指定 INI 文件中的“值”。INIFile.GetSectionNames
返回 INI 文件中的所有“区段”名称。INIFile.GetValue
返回指定 INI 文件中与“值”关联的数据。INIFile.GetValueNames
返回 INI 文件的区段中的所有“值”名称。INIFile.SetValue
设置值的数据。Math.Abs
返回数字的绝对值。Math.Acos
返回数字的反余弦 (弧度)。Math.Asin
返回数字的反正弦 (弧度)。Math.Atan
返回数字的反正切 (弧度)。Math.Atan2
返回 Num1/Num2 的反正切 (弧度)。Math.Ceil
返回数字的上限。Math.Cos
返回数字的余弦。Math.Deg
将数字从弧度转换为度数。Math.Exp
返回数字的指数值。Math.Floor
返回数字的下限。Math.Frexp
返回数字(x) 的尾数(m) 和指数(n) (方程式:x = m * 2^n) 的表格。Math.Ldexp
已知尾数(m) 和指数(n) (方程式:x = m * 2^n),返回数字(x)。Math.Log
返回数字的对数。Math.Log10
返回数字的基数为 10 的对数。Math.Max
比较两个数字,并返回最大数。Math.Min
比较两个数字,并返回最小数。Math.Mod
返回 Num1/Num2 的系数。Math.Pow
返回基数乘至指数幂的计算。Math.Rad
将数字从度数转换为弧度。Math.Random
生成随机数。Math.RandomSeed
播种用于 Math.Random 的随机数。Math.Round
按指定的小数位数返回“四舍五入”后的数字。Math.Sin
返回弧度值的正弦。Math.Sqrt
返回数字的平方根。Math.Tan
返回弧度值的正切。
<<待
[ 此贴被benbenmu在2008-01-07 15:34重新编辑 ]--------
学习了很好啊这个--------
不错,参考一下,感谢楼主 --------
早就期盼有人发布AutoPlay Media Studio6.0 动作之中文解释,感谢.--------
这个真好 因为当时感觉是中文版的 最后一看 脚本是英文的 蒙了 不过好在只用了快速动作里面的 ^_^--------
哈哈好东西希望能在找些素材就更好了--------
呵呵——用来做汉化的不错!谢谢啦--------
真的不错,积极支持你。--------
能像HAO那样把用法一起写出来就更加完美无缺了哈哈--------
Num
弧度角度ODBC.ConfigDataSource
配置 ODBC 数据源。ODBC.InstallDriver
安装 ODBC 驱动程序。ODBC.InstallManager
安装驱动程序管理器。ODBC.UninstallDriver
移除 ODBC 驱动程序,并返回该操作之后驱动程序的使用统计。ODBC.UninstallManager
卸载驱动程序管理器,并返回该操作之后的使用统计。Registry.CreateKey
在用户的注册表中创建“键”。Registry.DeleteKey
从用户的注册表中删除“键”。Registry.DeleteValue
从用户的注册表中删除“值”。Registry.DoesKeyExist
确定是否存在指定的注册表键,并返回 true 或 false。Registry.GetAccess
检查注册表键是否有指定的访问权限,并返回 true 或 false。
Registry.GetKeyNames
给指定的键返回包含所有子键名称的表格。Registry.GetValue
返回指定注册表值的数据。Registry.GetValueNames
返回指定子键中所有的值名称。Registry.GetValueType
返回注册表值的类型。Registry.SetValue
设置指定注册表值的数据。
Screen.Back
返回到一个已查看过的屏幕。此操作类似网络浏览器上的返回按钮。Screen.End
跳转到当前屏幕列表的末尾,并开始安装中的下一个阶段。Screen.GetFocus
获取当前控件的 ID。Screen.GetLocalizedString
获取当前语言中字符串 ID 的文本。Screen.GetProperties
获取当前屏幕的属性。Screen.Jump
跳转到指定屏幕。Screen.Next
依照屏幕管理器中的顺序进入屏幕列表中的下一个屏幕。Screen.Previous
依照屏幕管理器中的顺序进入屏幕列表中的上一个屏幕。Screen.SetFocus
给控件设置焦点。Screen.SetLocalizedString
设置当前语言中字符串 ID 的文本。Screen.StartTimer
启动计时器。Screen.StopTimer
停止计时器。
Service.Continue
继续指定的服务。Service.Create
在本地系统中创建服务。Service.Delete
从服务数据库中删除指定的服务。Service.Pause
暂停指定的服务。Service.Query
查询指定服务的状态。Service.Start
启动服务。Service.Stop
停止服务。SessionVar.Expand
返回包含给定的会话变量的内容的字符串。SessionVar.Get
返回未展开的会话变量的内容。SessionVar.Remove
在运行时从会话变量管理器中移除给定的会话变量。SessionVar.Set
将给定的会话变量设置为指定的值。
SetupData.CalculateRequiredSpace
计算安装所需的磁盘空间。SetupData.GetAppShortcutFolderPath
获取存放应用程序快捷方式的文件夹。SetupData.GetFileListSetupData.GetLocalizedString
获取全局字符串的定位文本 (基于当前安装语言)。SetupData.GetPackageList
返回包含在当前安装程序中的程序包 ID 的数字索引表。SetupData.GetPackageProperties
返回包含给定的程序包属性的表。SetupData.GetSerialListNames
返回包含所有序列号列表名称的数字索引表。SetupData.IsValidSerialNumber
检查给定的序列号在指定的序列号列表中是否有效。SetupData.SetLocalizedString
设置当前语言中字符串 ID 的文本。SetupData.SetPackageProperties
设置给定的程序包的属性。SetupData.WriteToLogFile
将文本的字符串写入安装或卸载日志文件。
Shell.CreateShortcut
创建快捷方式。Shell.DeleteShortcut
移除快捷方式。Shell.GetFolder
返回公共文件夹的路径,如:"My Documents" 或用户的启动文件夹。StatusDlg.GetMeterPos
返回状态对话框的当前状态表位置。StatusDlg.Hide
隐藏内建的状态对话框。StatusDlg.IsCancelled
如果点击了内建状态对话框上的取消按钮就返回 true,否则返回 false。StatusDlg.SetMessage
设置内建状态对话框上的主要描述信息。StatusDlg.SetMeterPos
设置内建状态对话框上的状态表位置。StatusDlg.SetMeterRange
设置内建状态对话框的状态表的范围。StatusDlg.SetStatusText
设置内建状态对话框上的状态文本。这是显示在状态表上的文本。StatusDlg.SetTitle
设置内建状态对话框上的标题栏。StatusDlg.SetCancelled
设置内建状态对话框上取消按钮的已点击/未点击状态。StatusDlg.Show
显示内建状态对话框。StatusDlg.ShowCancelButton
显示或隐藏内建状态对话框上的取消按钮。StatusDlg.ShowProgressMeter
显示或隐藏内建状态对话框上的进度表。
String.AbbreviateFilePath
返回简短的文件路径。String.Asc
返回字符的 ASCII 代码 (十进制)。String.Char
返回指定 ASCII 代码的字符值 (十进制)。String.Compare
比较两个字符串 (区分大小写)。String.CompareFileVersions
比较两个文件的版本。String.CompareNoCase
比较两个字符串 (区分大小写)。String.Concat
添加 (或连接) 两个字符串,并返回结果为一个新字符串。String.Find
查找子字串第一次出现的位置。String.GetFormattedSize
给定字节数,返回格式化字符串,转换为 字节、KB、MB 或 GB,并可插入逗号。String.Left
从现有字符串的最左边的 x 个字符创建一个新字符串。String.Length
返回字符串中的字符数量。String.Lower
返回字符串的全小写样式。String.MakePath
返回基于指定表中元素的路径。String.Mid
从字符串返回指定的字符范围。String.Repeat
按给定的次数重复字符串。String.Replace
在字符串中搜索子字串,并将其替换为新的子字串。String.ReverseFind
从右到左搜索子字串在字符串中第一次出现的位置。String.Right
从现有字符串的最右边 x 个字串创建新的字符串。String.ToNumber
将数字字符串转换为数字值。String.SplitPath
将指定的路径分割为驱动器、文件夹、文件名和扩展名。String.TrimLeft
从源字符串的左边清除指定的字符。String.TrimRight
从源字符串的右边清除指定的字符。String.Upper
返回字符串的全大写样式。
System.GetDate
按各种格式返回当前日期。System.GetDefaultLangID
返回包含主、次语言 ID 的表。System.GetDisplayInfo
返回包含用户系统的显示信息的表。System.GetLANInfo
返回包含用户局域网信息的表。System.GetOSName
返回操作系统的名称,如:"Windows 2000"。System.GetOSVersionInfo
返回包含操作系统版本信息的表。System.GetTime
按各种格式返回当前时间。System.GetUserInfo
返回包含用户信息的表。System.Reboot
重启用户系统。System.RegisterActiveX
注册 ActiveX 控件。System.RegisterFont
注册 TrueType 字体 (.ttf 文件)。System.RegisterTypeLib
注册类型库文件 (.tlb)。System.UnregisterActiveX
卸载注册 ActiveX 控件。System.UnregisterFont
卸载注册 TrueType 字体 (.ttf 文件)。
Table.Concat
返回包含表中某些或全部值的字符串。这些值必须由定界符分隔。Table.Count
返回表中的项目总数。Table.Sort
排序数字索引表的项目。Table.Insert
将项目插入到数字索引表的指定位置。Table.Remove
从数字索引表中移除指定项目,并返回其值。
TextFile.ReadToString
读取文本文件的内容,并将其返回为字符串。TextFile.ReadToTable
将文本文件的内容读取到表中。TextFile.WriteFromString
将文本的字符串写入到文本文件。TextFile.WriteFromTable
将表的内容写入到文本文件。表中每项一行。
UninstallData.AddItem
将项目添加到卸载配置文件。如果项目已存在,现有项目将被新数据覆盖。UninstallData.GetConfigurationFile
获取卸载配置文件 (xml) 的完整路径和文件名。UninstallData.GetItem
从卸载配置文件中获取项目的详情。UninstallData.GetItemList
按给定的卸载数据类型返回标识符的数字索引表。UninstallData.RemoveItem
从卸载配置文件中移除项目。UninstallData.SetConfigurationFile
设置卸载配置文件 (xml) 的名称。
Window.Close
关闭用户桌面上的指定窗口。Window.EnumerateProcesses
返回包含所有当前运行进程的列表及其关联窗口句柄的表。Window.EnumerateTitles
返回包含所有打开窗口的窗口标题和窗口句柄的表。Window.GetPos
返回窗口的 X 和 Y 屏幕坐标 (像素)。Window.GetSize
返回窗口的像素尺寸。Window.Hide
隐藏指定窗口。Window.Maximize
最大化指定窗口。Window.Minimize
最小化指定窗口。Window.Restore
恢复指定窗口。Window.SetOrder
设置相对于其他可见窗口的窗口 Z 顺序。Window.SetPos
设置指定窗口相对于屏幕的 X 和 Y 像素坐标。Window.SetSize
设置指定窗口的大小。Window.SetText
设置指定窗口的标题文本。此文本将显示在窗口的标题栏和任务栏。Window.Show
显示指定窗口。--------

 

 

 

 

 

创建注册表键:

Registry.CreateKey(HKEY_LOCAL_MACHINE, "Software//ZGCarSystem");

 

判断注册表值是否存在:

Registry.DoesKeyExist(HKEY_LOCAL_MACHINE, "Software//ZGCarSystem");

 

给注册表项赋值,若没有该项会新增:

Registry.SetValue(HKEY_LOCAL_MACHINE, "Software//ZGCarSystem", "SoftEnName", "ZGCarSystem", REG_SZ);

 

将会话变量或环境变量值给普通变量:

strSessionValue=SessionVar.Get("%AppFolder%");

给会话变量或环境变量赋值:

SessionVar.Set("%AppFolder%", result);

 

将单选按钮的ID给变量:

result = String.ToNumber(SessionVar.Expand('%RadioSelection%'));

判断时用单选按钮的常量判断:
if(result==CTRL_RADIO_BUTTON_02) then

 

执行外部文件:

Shell.Execute(SessionVar.Expand("C://ZGCarSystemDatabaseBK//MD_Dir.bat"), "open", "", "", SW_SHOWNORMAL);
-- repeat ... until 循环:判断该文件是否执行完毕,不支持执行带参数的.bat文件
repeat
      -- 要执行的语句
      numLoopCount =  File.IsInUse("C://ZGCarSystemDatabaseBK//MD_Dir.bat");
until not numLoopCount;

展开阅读全文

没有更多推荐了,返回首页