function vorhanden ( str ) {
    if ( str )
      return str;
    else
      return "nicht vorhanden";
  }

  function checkValue ( value, name, regclear) {
    if ( value ) {
      document.write("<br>Registry Wert für " + name + " ist vorhanden! (FALSCH)");
      regclear = 0;
    }
    return regclear;
  }

  if ( window.navigator.appName == "Netscape" )
  {
    mnycheck = document.mnycheck;
  }
  
  ret = mnycheck.init();
  
  if ( ret ) {
    document.write("<p>Initialisierung des Mnycheck Objects ist fehlgeschlagen</p>");
    document.write("<p>StatusText: " + mnycheck.statusText + "</p>");
  } else {
    document.write("<h1>Money 99V2000 Installations-Check Version " + mnycheck.getVersion() + "</h1>");
    
    document.write("<table>");
    document.write("<tr><td>Windows Version:</td><td>" + mnycheck.osVersion + "</td></tr>");
    document.write("<tr><td>Windows Dir:</td><td>" + mnycheck.windowsDir + "</td></tr>");
    document.write("<tr><td>System Dir:</td><td>" + mnycheck.systemDir + "</td></tr>");
    document.write("<tr><td>CommonFilesDir:</td><td>" + mnycheck.commonFilesDir + "</td></tr>");
    document.write("<tr><td>Money 7.0 Dir:</td><td>" + mnycheck.moneyPath + "</td></tr></table>");
    document.write("<table><tr><td>MSMONEY.EXE Version:</td><td>" + mnycheck.moneyVersion + "</td></tr>");
    
    document.write("<tr><td>MFC42.DLL im Money-Verz. Version:</td><td>" + vorhanden(mnycheck.mfcVersion) + "</td></tr>");

    if ( mnycheck.mfcWinVersion ) 
      document.write("<tr><td>MFC42.DLL im Windows-Verz. Version:</td><td>" + mnycheck.mfcWinVersion + "</td></tr>");
        
    if ( mnycheck.mfcSysVersion )
      document.write("<tr><td>MFC42.DLL im System-Verz. Version:</td><td>" + mnycheck.mfcSysVersion + "</td></tr>");
        
    document.write("</table>");
    
    vipzka = mnycheck.vipzkaVersion;
    
    document.write("<table><tr><td>vipzka.exe Version:</td><td>" + vorhanden(vipzka));
    
	if ( vipzka == "3.0.0.17" ) {
	  document.write(" (Orig. Money 99V2000 Decoder)");
	} else if ( vipzka == "3.0.0.54" ) {
	  document.write(" (Money 99V2000 SP1 Decoder)");
	} else if ( ( vipzka.substr(0, 5) != "3.0.0" ) && ( vipzka.substr(0, 2) == "3.0" ) ) {
	  document.write(" (Stöckl Decoder)");
	}
    
    document.write("</td></tr></table>");
    
    document.write("<table><tr><td>HBCI Version:</td><td>" + vorhanden(mnycheck.hbciVersion) + "</td></tr>");
    document.write("<tr><td>DDBAC Version:</td><td>" + vorhanden(mnycheck.ddbacVersion) + "</td></tr>");
    document.write("<tr><td>MDAC (OLE DB) Version:</td><td>" + vorhanden(mnycheck.mdacVersion) + "</td></tr>");
    document.write("<tr><td>Jet 3.5 Version:</td><td>" + vorhanden(mnycheck.jet35Version) + "</td></tr>");
    
    document.write("<tr><td>Jet 4.0 Version:</td><td>" + vorhanden(mnycheck.jet40Version) + " ");
    
    switch ( mnycheck.jet40Version ) {
     case "4.0.2927.4":
        document.write("(SP3)");
        break;
        
     case "4.0.2927.17":
       document.write("(SP3 Office 2000 SR1)");
       break;
       
     case "4.0.3714.7":
       document.write("(SP4)");
       break;
       
     case "4.0.4431.1":
       document.write("(SP5)");
       break;
       
     case "4.0.4431.3":
       document.write("(SP5)");
       break;
       
     case "4.0.6218.0":
       document.write("(SP6)");
       break;
       
     case "4.0.6807.0":
       document.write("(SP6 Windows Server 2003)");
       break;
       
     case "4.0.7328.0":
       document.write("(SP7)");
       break;
       
     case "4.0.8015.0":
       document.write("(SP8)");
       break;
     
     default:
       if ( mnycheck.jet40Version ) document.write("(unbekannter SP)");
       break;
   }

    document.write("</td></tr>");
    document.write("<tr><td>ODBC Jet Version:</td><td>" + vorhanden(mnycheck.odbcjetVersion) + "</td></tr>");
    document.write("</table>");

    ofd = mnycheck.oldestFiledate;
    
    oldestFiledate = new Date(ofd.substr(6, 4), ofd.substr(3, 2), ofd.substr(0, 2), ofd.substr(11, 2), ofd.substr(14, 2), ofd.substr(17, 2));
    
    document.write("<p>Älteste Datei im Money-Verzeichnis: <tt>" + mnycheck.oldestFilename + "</tt> " + oldestFiledate.toString());
    
    if ( ( oldestFiledate.getFullYear() < 1999 ) // vor 1999
         || ( oldestFiledate.getMonth() < 2 ) // vor März
         || ( oldestFiledate.getDate() < 15 ) ) // vor dem 15.
      document.write(" (FALSCH)</p>");
    else
      document.write(" (OK)</p>");

    document.write("<p>MS Setup Registry Key für Money: ");
    
    srk = mnycheck.moneySetupRegistryKey;
    
    switch ( srk ) {
      case "Microsoft Money 99@v7.01.01.2222 (1031) Plus":
        document.write("korrektes MS Money 99V2000 Plus (OK)");
        break;
        
      case "Microsoft Money@v8.0.10.1020 (1031) 2000":
		document.write("MS Money 2000 (A/CH) (OK)");
		break;
		
      case "Microsoft Money@v7.01.01.2222 (1031) 99":
		document.write("korrektes MS Money 99V2000 Standard (OK)")
		break;
		
      case "Microsoft Money 99@v7.00.01.0629 (1031) Testversion":
       document.write("Test Bugs-Money 99 (FALSCH)");
       break;
       
      case "Microsoft Money 99@v7.00.01.0629 (1031) Plus":
       document.write("Bugs-Money 99 Plus (FALSCH)");
       break;
       
      default:
        document.write(vorhanden(srk) + " (UNBEKANNT!)");
    }
    
    document.write("</p>");
    
    quoteserver = mnycheck.quoteServerURL;
    
    document.write("<p>QuoteServerURL: " + quoteserver);
    
    switch ( quoteserver ) {
      case "http://data.moneycentral.msn.com/Scripts/invisapi.dll/":
      	document.write(" (OK)");
      	break;
      	
      case "http://investor.msn.com/Scripts/invisapi.dll/":
        document.write(" (OK)");
        break;
        
      case "":
        document.write(" Nicht vorhanden");
        break;
        
      default:
       document.write(" (FALSCH)");
    }

    regclear = 1;
    
    regclear = checkValue(mnycheck.invFundCountries, "InvFundCountries", regclear);
    regclear = checkValue(mnycheck.InvStockCountries, "InvStockCountries", regclear);
    regclear = checkValue(mnycheck.WebQtSrvrName, "WebQtSrvrName", regclear);
    regclear = checkValue(mnycheck.WebQtSrvrURL, "WebQtSrvrURL", regclear);
    
	if ( regclear == 1 )
      document.write("<br>Alte Registry Werte sind entfernt. (OK)</p>");
    else
      document.write("</p>");
  }