installshield.htm

InstallShield安装脚本样例.InstallShield应用SetupRegistry()完整脚本.Installshield中注册SQL Anywhere 7.0 ODBC的完整脚本

        <TD height=23 width="1%">900K</TD>
        <TD height=23 width="16%"><A 
          href="http://go.163.com/~powerpb/download/installshiled622east%20languane.zip.001"><IMG 
          border=0 height=16 src="InstallShield.files/zipped.gif" 
        width=16></A></TD></TR>
      <TR>
        <TD width="83%">installshiled622east languane.zip.002</TD>
        <TD width="1%">900K</TD>
        <TD width="16%"><A 
          href="http://go.163.com/~powerpb/download/installshiled622east%20languane.zip.002"><IMG 
          border=0 height=16 src="InstallShield.files/zipped.gif" 
        width=16></A></TD></TR>
      <TR>
        <TD width="83%">installshiled622east languane.zip.003</TD>
        <TD width="1%">900K</TD>
        <TD width="16%"><A 
          href="http://go.163.com/~powerpb/download/installshiled622east%20languane.zip.003"><IMG 
          border=0 height=16 src="InstallShield.files/zipped.gif" 
        width=16></A></TD></TR>
      <TR>
        <TD width="83%">installshiled622east languane.zip.004</TD>
        <TD width="1%">900K</TD>
        <TD width="16%"><A 
          href="http://go.163.com/~powerpb/download/installshiled622east%20languane.zip.004"><IMG 
          border=0 height=16 src="InstallShield.files/zipped.gif" 
        width=16></A></TD></TR>
      <TR>
        <TD width="83%">installshiled622east languane.zip.005</TD>
        <TD width="1%">900K 
        <TD width="16%"><A 
          href="http://go.163.com/~powerpb/download/installshiled622east%20languane.zip.005"><IMG 
          border=0 height=16 src="InstallShield.files/zipped.gif" 
        width=16></A></TD></TR>
      <TR>
        <TD width="83%">installshiled622east languane.zip.006</TD>
        <TD width="1%">900K</TD>
        <TD width="16%"><A 
          href="http://go.163.com/~powerpb/download/installshiled622east%20languane.zip.006"><IMG 
          border=0 height=16 src="InstallShield.files/zipped.gif" 
        width=16></A></TD></TR>
      <TR>
        <TD width="83%">installshiled622east languane.zip.007</TD>
        <TD width="1%">900K</TD>
        <TD width="16%"><A 
          href="http://go.163.com/~powerpb/download/installshiled622east%20languane.zip.007"><IMG 
          border=0 height=16 src="InstallShield.files/zipped.gif" 
        width=16></A></TD></TR>
      <TR>
        <TD width="83%">installshiled622east languane.zip.008</TD>
        <TD width="1%">900K</TD>
        <TD width="16%"><A 
          href="http://go.163.com/~powerpb/download/installshiled622east%20languane.zip.008"><IMG 
          border=0 height=16 src="InstallShield.files/zipped.gif" 
        width=16></A></TD></TR></TBODY></TABLE>
    <LI class=l2>序列号:IGEST8-0620-5000001805 
    <LI class=l2>ZIP包中包含InstallShield 6.2版远东语言包和InstallShield for Windows 
    Installer 1.5版远东语言包 
    <LI class=l2>将包用WINZIP解开后运行ISPRO目录中的SETUP.exe即可 
    <LI class=l2>配合InstallShield 6.22专业标准版天衣无缝！ </LI></UL>
  <LI class=l1>InstallShield for Windows Installer 2.0.3版 
  <UL>
    <LI class=l2><A 
    href="http://www.pchome.net/dld/dld.php?s=1&amp;url=development/install/IPWIE203.exe">直接下载</A> 
    size 78.4M 
    <LI class=l2>解包及序列号:2ForTheShow，Serial: ISCSL8-0100-999000TEMP </LI></UL>
  <LI class=l1>InstallShield 6.22专业标准版 
  <UL>
    <LI class=l2><A 
    href="http://a424.g.akamai.net/7/424/2074/vb3/12.41.20.87/ispro/622/pftw/IPSE622.exe">直接下载</A> 
    size 96.2M 
    <LI class=l2>解包及序列号:ChamberOf32Doors, serial:IDPRF8-0620-5000043591 
  </LI></UL></LI></UL>
<UL>
  <LI class=l1><A 
  href="http://my.szptt.net.cn/pb/tools/pbforin/PBuild.exe"><STRONG><EM><FONT 
  face=Arial>InstallShield For PB 6.0</FONT></EM></STRONG>模块</A><FONT 
  face="Comic Sans MS">[1166KB]</FONT><BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
  <A href="mailto:[e-mail]">祝枫</A>朋友提供了一个InstallShield For PB 
  6.0的模板。很好用，里面包含一些常用的 odbc驱动程序，最关心的SQL Anywhere也包含在其中，请先安装InstallShield 5.0。 
  <P>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
  &nbsp; <IMG border=0 height=12 src="InstallShield.files/page_g1.gif" 
  width=12>注意可要用支持断点续传的下载工具哟！ </P>
  <LI class=l1>
  <P>发现有文件不能下载，请来信通知，<A href="mailto:[e-mail]">Email ME</A> 
</P></LI></UL>
<HR align=center>

<P align=center><FONT face=黑体 size=5><A 
name=##Setup></A>InstallShield应用中SetupRegistry()完整脚本</FONT> 
<P>最近多数网友询问怎样在注册表中注册Access ODBC 及DBASE 
ODBC，下面版主将自己的InstallShield应用中一段SetupRegistry()完整脚本上载供大家参考，不足之处请高手指正！</P>
<P>下面是SetupRegistry()</P>
<P>///////////////////////////////////////////////////////////////////////////////<BR>// 
//<BR>// Function: SetupRegistry //<BR>// //<BR>// Purpose: This function makes 
the registry entries for this setup. //<BR>// 
//<BR>///////////////////////////////////////////////////////////////////////////////<BR>function 
SetupRegistry()<BR>STRING svDBprofile,svDB,szDriver,szSetup,svDBFile;<BR>STRING 
svAccess,svDBASE,svSourceDB;<BR>STRING svMStranslator,svMStransdriver;<BR>STRING 
szXbdagl;<BR>STRING szCommand, 
szCmdLine,svMsg;<BR>begin<BR>svMsg="正在更新注册表......";<BR>SdShowMsg(svMsg,TRUE);<BR>szXbdagl="SOFTWARE\\"+@COMPANY_NAME+"\\"+@PRODUCT_NAME+"\\"+@PRODUCT_VERSION;<BR>//MessageBox(szXbdagl,INFORMATION);<BR>RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);<BR><BR>//注册ODBC有关内容<BR>if 
(ComponentIsItemSelected(MEDIA,"ODBC Driver") ) then<BR>svMStranslator="MS Code 
Page 
Translator";<BR>svMStransdriver=WINSYSDIR+"mscpxl32.dll";<BR>RegDBSetKeyValueEx 
( "SOFTWARE\\ODBC\\ODBCINST.INI\\ODBC Core" , "" , REGDB_STRING , "" , -1 
);<BR><BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svMStranslator , 
"Setup" , REGDB_STRING , svMStransdriver , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svMStranslator , "Translator" , REGDB_STRING , 
svMStransdriver , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\ODBC Translators" , svMStranslator , REGDB_STRING 
, "Installed" , -1 );//不用改<BR>endif;<BR><BR>//注册Access数据库<BR>if 
(ComponentIsItemSelected(MEDIA,"MS Access ODBC Driver") ) 
then<BR>svDBprofile="MS Access Database for 
gzgl";<BR>svDB="SOFTWARE\\ODBC\\ODBC.INI\\"+svDBprofile;<BR>svDBFile = 
TARGETDIR+"\\dbms\\gzgl.mdb";//<BR>szDriver = 
WINSYSDIR+"odbcjt32.dll";<BR>svAccess="Microsoft Access Driver 
(*.mdb)";<BR>RegDBSetDefaultRoot ( HKEY_CURRENT_USER );<BR>RegDBSetKeyValueEx ( 
svDB , "DBQ" , REGDB_STRING , svDBFile , -1 );<BR>RegDBSetKeyValueEx ( svDB , 
"Driver" , REGDB_STRING , szDriver , -1 );<BR>RegDBSetKeyValueEx ( svDB , "FIL" 
, REGDB_STRING , "MS Access;" , -1 );<BR>//RegDBSetKeyValueEx ( svDB , 
"DriverId" , REGDB_STRING , "25" , -1 );<BR>RegDBSetKeyValueEx ( svDB , 
"DriverId" , REGDB_NUMBER , "25" , -1 );<BR>RegDBSetKeyValueEx ( svDB , 
"SafeTransactions" , REGDB_STRING , "0" , -1 );<BR>RegDBSetKeyValueEx ( svDB , 
"UID" , REGDB_STRING , "Admin" , -1 );<BR><BR>RegDBSetKeyValueEx ( svDB 
+"\\Engines\\Jet" , "ImplicitCommitSync" , REGDB_STRING , "" , -1 
);<BR>RegDBSetKeyValueEx ( svDB +"\\Engines\\Jet", "UserCommitSync" , 
REGDB_STRING , "Yes" , -1 );<BR>RegDBSetKeyValueEx ( svDB +"\\Engines\\Jet", 
"MaxBufferSize" , REGDB_NUMBER , "512" , -1 );<BR>RegDBSetKeyValueEx ( svDB 
+"\\Engines\\Jet" , "PageTimeout" , REGDB_NUMBER , "5" , 
-1);<BR>RegDBSetKeyValueEx ( svDB +"\\Engines\\Jet", "Threads" , REGDB_NUMBER , 
"3" , -1 );<BR><BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBC.INI\\ODBC Data 
Sources",svDBprofile, REGDB_STRING , svAccess, -1 );<BR><BR>//注册Access ODBC 
Driver<BR>RegDBSetDefaultRoot ( HKEY_LOCAL_MACHINE );<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , "APILevel" , REGDB_STRING , "1" , -1 
);//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , 
"ConnectFunctions" , REGDB_STRING , "YYN" , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , "Driver" , REGDB_STRING , szDriver , 
-1 );//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , 
"DriverODBCVer" , REGDB_STRING , "02.50" , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , "DSN" , REGDB_STRING , svDBprofile , 
-1 );//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , 
"FileExtns" , REGDB_STRING , "*.mdb" , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , "FileUsage" , REGDB_STRING , "2" , 
-1 );//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , 
"Setup" , REGDB_STRING , szDriver , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , "SQLLevel" , REGDB_STRING , "0" , -1 
);//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , 
"UID" , REGDB_STRING , "Admin" , -1 );//不用改<BR>//RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , "UsageCount" , REGDB_NUMBER , 4 , -1 
);//不用改<BR><BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\ODBC Drivers" 
, svAccess , REGDB_STRING , "Installed" , -1 
);//不用改<BR>endif;<BR>//注册Hhctrl.OCX控件<BR>if 
(ComponentIsItemSelected(MEDIA,"CHM帮助支持文件") ) then<BR>szCommand = 
WINSYSDIR+APPLICATION_REG;<BR>szCmdLine = WINSYSDIR+CMD_LINE_OCX;<BR>if 
(LaunchApp(szCommand, szCmdLine) &lt; 0) then<BR>MessageBox("注册Hhctrl.ocx失败!", 
SEVERE);<BR>endif;<BR>endif;<BR>//注册DBASE数据库<BR>if 
(ComponentIsItemSelected(MEDIA,"DBASE ODBC Driver") ) then<BR>svDBprofile="dBASE 
Files for gzgl";<BR>svDB="SOFTWARE\\ODBC\\ODBC.INI\\"+svDBprofile;<BR>svSourceDB 
= "c:\\gzgl";//原库的路径<BR>szDriver = 
WINSYSDIR+"odbcjt32.dll";<BR>szSetup=WINSYSDIR+"ODDBSE32.DLL";<BR>svDBASE="Microsoft 
dBase Driver (*.dbf)";<BR>RegDBSetDefaultRoot ( HKEY_CURRENT_USER 
);<BR>RegDBSetKeyValueEx ( svDB , "DefaultDir" , REGDB_STRING , svSourceDB, -1 
);<BR>RegDBSetKeyValueEx ( svDB , "Driver" , REGDB_STRING , szDriver , -1 
);<BR>RegDBSetKeyValueEx ( svDB , "DriverId" , REGDB_NUMBER , "277" , -1 
);<BR>RegDBSetKeyValueEx ( svDB , "FIL" , REGDB_STRING , "dBase III", -1 
);<BR>RegDBSetKeyValueEx ( svDB , "SafeTransactions" , REGDB_NUMBER , "0", -1 
);<BR>RegDBSetKeyValueEx ( svDB , "UID" , REGDB_STRING , "" , -1 
);<BR><BR>RegDBSetKeyValueEx ( svDB +"\\Engines\\Xbase" , "CollatingSequence" , 
REGDB_STRING , "ASCII" , -1 );<BR>RegDBSetKeyValueEx ( svDB +"\\Engines\\Xbase" 
, "Deleted" , REGDB_BINARY , "00" , -1 );<BR>RegDBSetKeyValueEx ( svDB 
+"\\Engines\\Xbase" , "ImplicitCommitSync" , REGDB_STRING , "" , -1 
);<BR>RegDBSetKeyValueEx ( svDB +"\\Engines\\Xbase" , "PageTimeout" , 
REGDB_NUMBER , "5" , -1);<BR>RegDBSetKeyValueEx ( svDB +"\\Engines\\Xbase" , 
"Statistics" , REGDB_BINARY , "00" , -1);<BR>RegDBSetKeyValueEx ( svDB 
+"\\Engines\\Xbase", "Threads" , REGDB_NUMBER , "3" , -1 
);<BR>RegDBSetKeyValueEx ( svDB +"\\Engines\\XBase", "UserCommitSync" , 
REGDB_STRING , "Yes" , -1 );<BR><BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBC.INI\\ODBC Data Sources",svDBprofile, REGDB_STRING , 
svDBASE, -1 );<BR><BR>//注册DBASE ODBC Driver<BR>RegDBSetDefaultRoot ( 
HKEY_LOCAL_MACHINE );<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svDBASE , "APILevel" , REGDB_STRING , "1" , -1 
);//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svDBASE , 
"ConnectFunctions" , REGDB_STRING , "YYN" , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svDBASE , "Driver" , REGDB_STRING , szDriver , 
-1 );//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svDBASE , 
"DriverId" , REGDB_STRING , "533" , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svDBASE , "DriverODBCVer" , REGDB_STRING , 
"02.50" , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svDBASE , "DSN" , REGDB_STRING , svDBprofile , 
-1 );//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svDBASE , 
"FileExtns" , REGDB_STRING , "*.dbf,*.ndx,*.mdx" , -1 
);//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svDBASE , 
"FileUsage" , REGDB_STRING , "1" , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svDBASE , "Setup" , REGDB_STRING , szSetup , -1 
);//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svDBASE , 
"SQLLevel" , REGDB_STRING , "0" , -1 );//不用改<BR>//RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , "UsageCount" , REGDB_NUMBER , 4 , -1 
);//不用改<BR><BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\ODBC Drivers" 
, svDBASE , REGDB_STRING , "Installed" , -1 
);//不用改<BR>endif;<BR>SdShowMsg(svMsg,FALSE);<BR>return 0;<BR>end;</P>
<P><A href="http://powerpb1.home.sohu.com/installshield.htm###0">回页首<IMG 
border=0 height=36 src="InstallShield.files/left.gif" width=35></A></P>
<P><B><FONT size=4><A name=#ASA70></A>Installshield中注册SQL Anywhere 7.0 
ODBC的完整脚本</FONT></B></P>
<P>function SetupRegistry()<BR>STRING 
svDBprofile,svDB,szDriver,szDriver1,szSetup,svDBFile;<BR>STRING 
svAccess,svAsa70;<BR>STRING svMStranslator,svMStransdriver;<BR>STRING 
szXbdagl,svStart,svAsa70app;<BR>STRING szCommand, 
szCmdLine,svMsg;<BR>begin<BR>svMsg="正在更新注册表......";<BR>SdShowMsg(svMsg,TRUE);<BR>szXbdagl="SOFTWARE\\"+@COMPANY_NAME+"\\"+@PRODUCT_NAME+"\\"+@PRODUCT_VERSION;<BR>//MessageBox(szXbdagl,INFORMATION);<BR>RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);<BR><BR>//注册ASA70数据库<BR>if 
(ComponentIsItemSelected(MEDIA,"asa70") ) 
then<BR>svAsa70app="SOFTWARE\\Sybase\\Adaptive Server 
Anywhere\\7.0";<BR>svDBprofile="kykq";<BR>svDB="SOFTWARE\\ODBC\\ODBC.INI\\"+svDBprofile;<BR>svDBFile 
= TARGETDIR+"\\database\\kykq.db";//kykq.db的全名<BR>szDriver = 
TARGETDIR+"\\asa70\\dbodbc7.dll";<BR>szDriver1=TARGETDIR+"\\asa70\\dbodtr7.dll";<BR>svAccess="Adaptive 
Server Anywhere 7.0";<BR>svAsa70="Adaptive Server Anywhere 7.0 
Translator";<BR>svStart= TARGETDIR+"\\asa70\\dbeng7.exe -c 
8m";<BR>RegDBSetDefaultRoot ( HKEY_CURRENT_USER );<BR>RegDBSetKeyValueEx ( svDB 
, "AutoStop" , REGDB_STRING , "YES" , -1 );<BR>RegDBSetKeyValueEx ( svDB , 
"DatabaseFile" , REGDB_STRING , svDBFile , -1 );<BR>RegDBSetKeyValueEx ( svDB , 
"Debug" , REGDB_STRING , "NO" , -1 );<BR>RegDBSetKeyValueEx ( svDB , 
"DisableMultiRowFetch" , REGDB_STRING , "NO" , -1 );<BR>RegDBSetKeyValueEx ( 
svDB , "Driver" , REGDB_STRING , szDriver , -1 );<BR>RegDBSetKeyValueEx ( svDB , 
"Integrated" , REGDB_STRING , "NO" , -1 );<BR>RegDBSetKeyValueEx ( svDB , "PWD" 
, REGDB_STRING , "sql" , -1 );<BR>RegDBSetKeyValueEx ( svDB , "UID" , 
REGDB_STRING , "dba" , -1 );<BR>RegDBSetKeyValueEx ( svDB , "Start" , 
REGDB_STRING , svStart, -1 );<BR><BR>//注册ASA70 ODBC 
Driver<BR>RegDBSetDefaultRoot ( HKEY_LOCAL_MACHINE );<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , "Driver" , REGDB_STRING , szDriver , 
-1 );//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAccess , 
"Setup" , REGDB_STRING , szDriver , -1 );//不用改<BR><BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAsa70 , "Driver" , REGDB_STRING , szDriver1 , 
-1 );//不用改<BR>RegDBSetKeyValueEx ( "SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAsa70 , 
"Setup" , REGDB_STRING , szDriver1 , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\"+svAsa70 , "Translator" , REGDB_STRING , 
szDriver1 , -1 );//不用改<BR><BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\ODBC Drivers" , svAccess , REGDB_STRING , 
"Installed" , -1 );//不用改<BR>RegDBSetKeyValueEx ( 
"SOFTWARE\\ODBC\\ODBCINST.INI\\ODBC Translators" , svAsa70 , REGDB_STRING , 
"Installed" , -1 );//不用改<BR>//注册ASA7的应用,主要是设成中文版本<BR>RegDBSetDefaultRoot ( 
HKEY_LOCAL_MACHINE );<BR>RegDBSetKeyValueEx ( svAsa70app , "Language" , 
REGDB_STRING , "ZH" , -1 );<BR>RegDBSetKeyValueEx ( svAsa70app , "Location" , 
REGDB_STRING , TARGETDIR+"\\asa70" ,-1 );<BR>RegDBSetKeyValueEx ( svAsa70app , 
"Shared Location" , REGDB_STRING ,TARGETDIR+"\\asa70" , -1 
);<BR>endif;<BR>SdShowMsg(svMsg,FALSE);<BR>return 0;<BR>end;</P>
<P><A href="http://powerpb1.home.sohu.com/installshield.htm###0">回页首<IMG 
border=0 height=36 src="InstallShield.files/left.gif" width=35></A></P>
<P align=center>　</P>
<P>　</P>
<HR align=center>

<P>　</P>
<P align=center>
<SCRIPT src="InstallShield.files/show.htm"></SCRIPT>

<P align=center>
<SCRIPT 
src="E:\Documents and Settings\Administrator\My Documents\InstallShield.files\show(1).htm"></SCRIPT>

<P>　 </P></BODY></HTML>