home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 23 / IOPROG_23.ISO / SOFT / TCPIP.EXE / Setup.sif < prev    next >
Encoding:
Text File  |  1998-11-23  |  1.4 KB  |  40 lines
  1. //
  2. // Jeffrey Carlyle's Stratoware StratoSetup 1.70
  3. // Copyright 1997 by Jeffrey Carlyle.
  4. //
  5. // This will install the information you need to use StratoSetup.
  6. // See the ReadMe.htm file for more information.
  7. //
  8. ConfirmInstall("Thisáprogram will install PSTRUH TCP/IP library. DoáYouáwishátoácontinueá?")
  9. GenerateUnSetupInfo("PSTRUH TCPIP", "PSTRUH TCPIP")
  10. PromptForDir("TCPIP", "Please choose the destination for the TCPIP files.", UMDir, "?ProgramFiles?\PSTRUH\TCPIP")
  11. SetDefaultDir(?UMDir?)
  12. //
  13. // Start copying files.
  14. //
  15. ShowStatus("Installing TCPIP")
  16. InstallFile(Trace.asp)
  17. InstallFile(class.htm)
  18. InstallFile(class1.htm)
  19. InstallFile(class2.htm)
  20. InstallFile(library.htm)
  21. InstallFile(libs.htm)
  22. InstallFile(OLEDesc.htm)
  23. InstallFile(OLEDesc1.htm)
  24. InstallFile(OLEDesc2.htm)
  25. InstallFile(OLEDesc3.htm)
  26. InstallFile(OLEDesc4.htm)
  27. InstallFile(OLEDesc5.htm)
  28. InstallFile(OLEDesc6.htm)
  29. InstallFile(OLEDesc7.htm)
  30. InstallFile(OLEDesc8.htm)
  31. InstallFile(OLEDesc9.htm)
  32. InstallFile(revision.htm)
  33. InstallFile(tcpip.dll)
  34. UpdateSysFile(atl.dll)
  35. RegisterDllServer(?DefDir?\tcpip.dll)
  36. CreateShortcut(?DefDir?\library.htm, ?Programs?\PSTRUH, TCPIP library)
  37. CreateShortcut(?DefDir?\Trace.asp, ?Programs?\PSTRUH, TraceRoute sample ASP page)
  38.  
  39. HideStatus()
  40. Notify("TCPIP library has been installed. For additional information and help see Start->Programs->Pstruh->TCPIP")