home *** CD-ROM | disk | FTP | other *** search
/ Boston 2 / boston-2.iso / DOS / DEUTSCH / GS / ADRESS18 / INSTALL.BAT < prev    next >
DOS Batch File  |  1993-12-01  |  15KB  |  350 lines
  1. ECHO OFF
  2. CLS
  3. IF NOT EXIST gsadr.180 GOTO allesfalsch
  4.  
  5. IF     "%1" == "" IF EXIST c:\gsadr\drupara1.dbf GOTO doppeltupdate
  6. IF NOT "%1" == "" IF EXIST %1%2\drupara1.dbf GOTO doppeltupdate
  7.  
  8. CLS
  9. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  10. ECHO    ║       Installationsprogramm der Adressen- und Textverwaltung 1.80     ║
  11. ECHO    ║                                                                       ║
  12. ECHO    ║            (c) 1993 Gandke & Schubert   Computerprogramme             ║
  13. ECHO    ║                                                                       ║
  14. ECHO    ║ Bitte lesen Sie vor der Installation erst die Datei "install.txt".    ║
  15. ECHO    ║ Am einfachsten geht das durch die Eingabe von:                        ║
  16. ECHO    ║                                                                       ║
  17. ECHO    ║    A:\) start                                                         ║
  18. ECHO    ║                                                                       ║
  19. ECHO    ║ Sie brauchen auf Ihrer Festplatte etwa 12 MB freien Speicherplatz!    ║
  20. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  21. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  22. ECHO    ║         Weiter mit beliebiger Taste - Abbruch mit (CTRL)+(C)          ║
  23. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  24. ECHO.
  25. PAUSE > NUL
  26.  
  27. IF "%1" == "" GOTO lwfehlt
  28. IF "%2" == "" GOTO parafehler
  29.  
  30. GOTO lwda
  31.  
  32. :fangean
  33.  
  34. IF NOT "%2" == "" GOTO marke1
  35. IF NOT EXIST c:\gsadr\gsadr.exe MD c:\gsadr > NUL
  36. CD > c:\gsadr\lwtest
  37. IF NOT EXIST c:\gsadr\lwtest GOTO verzeichnisfehler
  38. DEL c:\gsadr\lwtest
  39. GOTO marke2
  40.  
  41. :marke1
  42. IF NOT EXIST %1%2\gsadr.exe MD %1%2 > NUL
  43. CD > %1%2\lwtest
  44. IF NOT EXIST %1%2\lwtest GOTO verzeichnisfehler
  45. DEL %1%2\lwtest
  46. :marke2
  47.  
  48. CLS
  49. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  50. ECHO    ║       Installationsprogramm der Adressen- und Textverwaltung 1.80     ║
  51. ECHO    ║                                                                       ║
  52. ECHO    ║            (c) 1993 Gandke & Schubert   Computerprogramme             ║
  53. ECHO    ║                                                                       ║
  54. ECHO    ║        Die Diskette wird in das gewünschte Verzeichnis kopiert!       ║
  55. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  56. ECHO.
  57.  
  58. IF NOT "%2" == "" COPY install.txt %1%2 /v > NUL
  59. IF NOT "%2" == "" COPY start.bat   %1%2 /v > NUL
  60. IF NOT "%2" == "" COPY gsadr.180   %1%2 /v > NUL
  61. IF NOT "%2" == "" COPY install.bat %1%2 /v > NUL
  62. IF NOT "%2" == "" COPY list.exe    %1%2 /v > NUL
  63. IF NOT "%2" == "" IF EXIST start COPY    start  %1%2 /v > NUL
  64. IF NOT "%2" == "" IF EXIST kunde COPY    kunde  %1%2 /v > NUL
  65. IF NOT "%2" == "" IF EXIST haendler COPY haendler %1%2 /v > NUL
  66.  
  67. IF     "%2" == "" COPY install.txt c:\gsadr /v > NUL
  68. IF     "%2" == "" COPY start.bat   c:\gsadr /v > NUL
  69. IF     "%2" == "" COPY gsadr.180   c:\gsadr /v > NUL
  70. IF     "%2" == "" COPY install.bat c:\gsadr /v > NUL
  71. IF     "%2" == "" COPY list.exe    c:\gsadr /v > NUL
  72. IF     "%2" == "" IF EXIST start    COPY start    c:\gsadr /v > NUL
  73. IF     "%2" == "" IF EXIST kunde    COPY kunde    c:\gsadr /v > NUL
  74. IF     "%2" == "" IF EXIST haendler COPY haendler c:\gsadr /v > NUL
  75.  
  76. ECHO.
  77.  
  78. IF "%2" == "" GOTO ohneparam
  79. %1
  80. CD %2
  81. GOTO mitparam
  82.  
  83. :ohneparam
  84. c:
  85. CD \gsadr
  86. :mitparam
  87.  
  88. ECHO ECHO OFF                                            >c:\gsadr.bat
  89. ECHO CLS                                                >>c:\gsadr.bat
  90. ECHO ECHO.                                              >>c:\gsadr.bat
  91. ECHO ECHO GS-Adressen 1.80 wird aufgerufen, bitte warten ... >>c:\gsadr.bat
  92. IF     "%1" == "" ECHO C:                               >>c:\gsadr.bat
  93. IF     "%1" == "" ECHO CD \gsadr                        >>c:\gsadr.bat
  94. IF NOT "%1" == "" ECHO %1                               >>c:\gsadr.bat
  95. IF NOT "%1" == "" ECHO CD %2                            >>c:\gsadr.bat
  96.  
  97. ECHO IF     EXIST gsadr.exe gsadr %%1 %%2 %%3           >>c:\gsadr.bat
  98. ECHO IF NOT EXIST gsadr.exe echo.                       >>c:\gsadr.bat
  99. ECHO IF NOT EXIST gsadr.exe echo Programm nicht gefunden !!! >>c:\gsadr.bat
  100. ECHO ECHO ON                                            >>c:\gsadr.bat
  101.  
  102. IF NOT EXIST adresse.dbf GOTO jetztgehtslos
  103.  
  104. REN adresse.dbf adresse1.dbf > NUL
  105. REN adresse.dbt adresse1.dbt > NUL
  106. REN adrverb.dbf adrverb1.dbf > NUL
  107. REN nummern.dbf nummern1.dbf > NUL
  108. REN text.dbf    text1.dbf > NUL
  109. REN text.dbt    text1.dbt > NUL
  110. REN vorgaben.dbf vorgabe1.dbf >NUL
  111. REN drupara.dbf drupara1.dbf > NUL
  112. GOTO dateiloesch
  113.  
  114. :jetztgehtslos
  115.  
  116. CLS
  117. ECHO ... Programm wird ausgepackt ...
  118. ECHO.
  119.  
  120. IF EXIST programm.exe DEL programm.exe >NUL
  121. REN gsadr.180 programm.exe
  122. programm
  123. DEL programm.exe >NUL
  124.  
  125. CLS
  126. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  127. ECHO    ║       Installationsprogramm der Adressen- und Textverwaltung 1.80     ║
  128. ECHO    ║                                                                       ║
  129. ECHO    ║            (c) 1993 Gandke & Schubert   Computerprogramme             ║
  130. ECHO    ║                                                                       ║
  131. ECHO    ║ So wie's aussieht, ist das Programm jetzt installiert. Rufen Sie es   ║
  132. ECHO    ║ in Zukunft bitte folgendermaßen auf:                                  ║
  133. ECHO    ║                                                                       ║
  134. ECHO    ║    C:\GSADR) gsadr                                                    ║
  135. ECHO    ║                                                                       ║
  136. ECHO    ║ Nach dem nächsten Tastendruck erhalten Sie weitere Informationen über ║
  137. ECHO    ║ das Programm                                                          ║
  138. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  139. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  140. ECHO    ║                     Weiter mit beliebiger Taste!                      ║
  141. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  142. ECHO.
  143. PAUSE > NUL
  144.  
  145. list formular.txt
  146. list werbung.txt
  147. list sharewar.txt
  148. list aender.txt
  149. list netz.txt
  150.  
  151. CLS
  152. ECHO Aha ........ alle Texte schön übersprungen ... oder ?
  153. ECHO.
  154. ECHO.
  155. ECHO.
  156. ECHO.
  157. ECHO Damit uns keiner erzählt, das Programm hätte keine Dokumentation ....
  158. ECHO.
  159. ECHO .......mit beliebiger Taste hin zur DOKUMENTATION ...................
  160. PAUSE > NUL
  161. list dok.txt
  162. CLS
  163. IF NOT EXIST adresse1.dbf echo ... Bitte warten ...
  164. IF NOT EXIST adresse1.dbf GOTO ende
  165. ECHO ACHTUNG: Ihre bisherigen Daten werden beim ersten Aufruf des Programmes
  166. ECHO          automatisch übernommen! - Spielen Sie wegen der geänderten Da-
  167. ECHO          teistruktur keinesfalls eine alte Datensicherung auf!
  168. GOTO ende
  169.  
  170. :lwfehlt
  171. CLS
  172. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  173. ECHO    ║       Installationsprogramm der Adressen- und Textverwaltung 1.80     ║
  174. ECHO    ║                                                                       ║
  175. ECHO    ║            (c) 1993 Gandke & Schubert   Computerprogramme             ║
  176. ECHO    ║                                                                       ║
  177. ECHO    ║ Die Laufwerks- und Verzeichnisangabe ist nicht vollständig!           ║
  178. ECHO    ║ Normalerweise sieht der Aufruf so aus:                                ║
  179. ECHO    ║                                                                       ║
  180. ECHO    ║    A:\) install LAUFWERK VERZEICHNIS                                  ║
  181. ECHO    ║                                                                       ║
  182. ECHO    ║ also z.B. "install D: \ADRESSE". Beide Angaben müssen durch ein Leer- ║
  183. ECHO    ║ zeichen getrennt sein. Vor dem Verzeichnis muß ein "\" stehen.        ║
  184. ECHO    ║ Sie können an dieser Stelle mit den Tasten  CTRL + C  abbrechen!      ║
  185. ECHO    ║                                                                       ║
  186. ECHO    ║ Wenn Sie wollen, daß das Programm auf Laufwerk  C:  im Verzeichnis    ║
  187. ECHO    ║ \GSADR installiert wird, drücken Sie bitte nur eine beliebige Taste.  ║
  188. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  189. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  190. ECHO    ║         Weiter mit beliebiger Taste - Abbruch mit (CTRL)+(C)          ║
  191. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  192. ECHO.
  193. PAUSE > NUL
  194. GOTO fangean
  195.  
  196. :lwda
  197. CLS
  198. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  199. ECHO    ║       Installationsprogramm der Adressen- und Textverwaltung 1.80     ║
  200. ECHO    ║                                                                       ║
  201. ECHO    ║            (c) 1993 Gandke & Schubert   Computerprogramme             ║
  202. ECHO    ║                                                                       ║
  203. ECHO    ║ Zur Kontrolle zeigen wir Ihnen das gewünschte Laufwerk und Ver-       ║
  204. ECHO    ║ zeichnis:                                                             ║
  205. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  206. ECHO.
  207. ECHO         Laufwerk ist ...... : %1
  208. ECHO         Verzeichnis ist ... : %2
  209. ECHO.
  210. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  211. ECHO    ║ Vor dem Verzeichnis muß ein "\" stehen! Alles ok?                     ║
  212. ECHO    ║                                                                       ║
  213. ECHO    ║ Sie können an dieser Stelle mit den Tasten  CTRL + C  abbrechen!      ║
  214. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  215. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  216. ECHO    ║         Weiter mit beliebiger Taste - Abbruch mit (CTRL)+(C)          ║
  217. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  218. ECHO.
  219. PAUSE > NUL
  220. GOTO fangean
  221.  
  222. :disk2
  223. CLS
  224. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  225. ECHO    ║       Installationsprogramm der Adressen- und Textverwaltung 1.80     ║
  226. ECHO    ║                                                                       ║
  227. ECHO    ║            (c) 1993 Gandke & Schubert   Computerprogramme             ║
  228. ECHO    ║                                                                       ║
  229. ECHO    ║            Legen Sie bitte Diskette 2 ins Laufwerk ein!               ║
  230. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  231. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  232. ECHO    ║                     Weiter mit beliebiger Taste!                      ║
  233. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  234. ECHO.
  235. PAUSE > NUL
  236.  
  237. IF NOT EXIST orteddr GOTO disk2
  238.  
  239. CLS
  240. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  241. ECHO    ║       Installationsprogramm der Adressen- und Textverwaltung 1.80     ║
  242. ECHO    ║                                                                       ║
  243. ECHO    ║            (c) 1993 Gandke & Schubert   Computerprogramme             ║
  244. ECHO    ║                                                                       ║
  245. ECHO    ║       Die Diskette wird in das gewünschte Verzeichnis kopiert!        ║
  246. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  247. ECHO.
  248. GOTO orteddr
  249.  
  250.  
  251. :disk3
  252. CLS
  253. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  254. ECHO    ║       Installationsprogramm der Adressen- und Textverwaltung 1.80     ║
  255. ECHO    ║                                                                       ║
  256. ECHO    ║            (c) 1993 Gandke & Schubert   Computerprogramme             ║
  257. ECHO    ║                                                                       ║
  258. ECHO    ║            Legen Sie bitte Diskette 3 ins Laufwerk ein!               ║
  259. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  260. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  261. ECHO    ║                     Weiter mit beliebiger Taste!                      ║
  262. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  263. ECHO.
  264. PAUSE > NUL
  265.  
  266. IF NOT EXIST ortebrd GOTO disk3
  267.  
  268. CLS
  269. ECHO    ╔═══════════════════════════════════════════════════════════════════════╗
  270. ECHO    ║       Installationsprogramm der Adressen- und Textverwaltung 1.80     ║
  271. ECHO    ║                                                                       ║
  272. ECHO    ║            (c) 1993 Gandke & Schubert   Computerprogramme             ║
  273. ECHO    ║                                                                       ║
  274. ECHO    ║        Die Diskette wird in das gewünschte Verzeichnis kopiert        ║
  275. ECHO    ╚═══════════════════════════════════════════════════════════════════════╝
  276. ECHO.
  277.  
  278. GOTO orterest
  279.  
  280.  
  281. :dateiloesch
  282. IF EXIST *.NTX DEL *.ntx > NUL
  283. IF EXIST gsadr.exe DEL gsadr.exe > NUL
  284. IF EXIST *.ovl DEL *.ovl > NUL
  285.  
  286. IF EXIST hilfe.dbf    DEL HILFE.DBF > NUL
  287. IF EXIST hilfe.dbt    DEL HILFE.DBT > NUL
  288. IF EXIST druckvar.dbf DEL DRUCKVAR.DBF > NUL
  289. IF EXIST madr.dbf     DEL MADR.DBF > NUL
  290. IF EXIST madr.dbt     DEL MADR.DBT > NUL
  291. IF EXIST menu.dbf     DEL MENU.DBF > NUL
  292. IF EXIST suchpara.dbf DEL SUCHPARA.DBF > NUL
  293. IF EXIST aphogef.dbf  DEL APHOGEF.DBF > NUL
  294. IF EXIST adrgef.dbf   DEL ADRGEF.DBF > NUL
  295. IF EXIST sichern.bat  DEL sichern.bat >NUL
  296. IF EXIST rsichern.bat DEL rsichern.bat >NUL
  297.  
  298. IF EXIST orte  .dbf   DEL orte  .dbf > NUL
  299. IF EXIST vorwahl .dbf DEL vorwahl .dbf > NUL
  300.  
  301. IF EXIST dok.txt        DEL dok.txt > NUL
  302. IF EXIST dok.bat        DEL dok.bat > NUL
  303. IF EXIST info.txt       DEL info.txt > NUL
  304. IF EXIST werbung.txt    DEL werbung.txt > NUL
  305. IF EXIST aender.txt     DEL aender.txt > NUL
  306. IF EXIST formular.txt   DEL formular.txt > NUL
  307. IF EXIST netz.txt       DEL netz.txt > NUL
  308. IF EXIST probleme.txt   DEL probleme.txt > NUL
  309. IF EXIST sharewar.txt   DEL sharewar.txt > NUL
  310.  
  311. IF EXIST list.com       DEL list.com > NUL
  312. IF EXIST umlaute.com    DEL umlaute.com > NUL
  313. IF EXIST roman8.com     DEL roman8.com > NUL
  314.  
  315. GOTO jetztgehtslos
  316.  
  317. :allesfalsch
  318. CLS
  319. ECHO.
  320. ECHO ACHTUNG: Bitte wechseln Sie auf das Diskettenlaufwerk, und legen
  321. ECHO          Sie die Diskette "GS-Adressen 1 von x" ein!
  322. ECHO.
  323. GOTO ganzamschluss
  324.  
  325. :parafehler
  326. CLS
  327. ECHO.
  328. ECHO ACHTUNG: Parameter sind nicht korrekt angegeben!
  329. ECHO.
  330. GOTO ganzamschluss
  331.  
  332. :verzeichnisfehler
  333. CLS
  334. ECHO.
  335. ECHO ACHTUNG: Fehler beim Anlegen des Verzeichnisses!
  336. ECHO.
  337. GOTO ganzamschluss
  338.  
  339. :doppeltupdate
  340. CLS
  341. ECHO.
  342. ECHO ACHTUNG: Neue Installation ist erst nach Aufruf des Programmes möglich!
  343. ECHO.
  344. IF EXIST *.ntx del *.ntx
  345. GOTO ganzamschluss
  346.  
  347. :ende
  348. :ganzamschluss
  349. ECHO ON
  350.