Internet- und CD-Publishing
mit VFP und Multimedia

Neue Datenbankmärkte

• CD - Kataloge für Produktvorstellungen
• CD - Software im Home-Bereich
• Internet - Seiten mit Datenbankzugriff
• Visual FoxPro ist für CD- und Internet-Datenbanken geeignet

Internet - Nutzung

3,8 Mio. Anwender besitzen einen Internet-Zugang. Einsatzgebiete:

Quelle: Online-Offline-Studie, Der Spiegel und manager magazin

CD - Nutzung

• 5,5 Mio. Anwender nutzen ein CD-ROM-Laufwerk. Einsatzgebiete:
  
  Quelle: Online-Offline-Studie, Der Spiegel und manager magazin

CD - Datenbanken mit Multimedia

• Datenbankdesign für CD - Datenbanken
• Laufwerk-Scan für DBF - Dateien
• Multimedia am Beispiel eines CD-Players

Beispiel: Sybex Musik-Info

• 120.000 Audio-CDs
• 1.000.000 Musikstücke
• 60 MByte Daten
• Integrierter CD-Player
• Plattformen: Win 3.x, Win 95, NT

Design der CD - Datenbank

• DBF- und FPT-Dateien auf die CD
• Indexdateien auf die Festplatte
• Datenbank und Index öffnen: USE e:\daten\name.dbf INDEX c:\index\name.cdx
• Nutzen Sie freie Tabellen, um Probleme mit DBC-Datenbanken zu vermeiden
• CDX-Markierung der DBF-Datei löschen!

Laufwerk - Scan

• In welchem Laufwerk liegt die CD? Nach CD-Wechsel Laufwerke durchsuchen
• VFP-Lösung: LfwScan.prg
• API-Funktionen deklarieren:
• DECLARE INTEGER GetDriveType IN kernel32 STRING

Listing: Laufwerke scannen

*****************
** LfwScan.Prg **
*****************
* Das Visual FoxPro 5.0 Buch, Sybex
*
* Disketten-, Netz-, CD-, RAM- und Festplattenlaufwerke
* nach einer Datei durchsuchen.
*
* Rückgabewert: Lfw., Pfad und Name der ersten gefundenen Datei oder ""
* Parameter1: Pfad und Dateiname ohne Laufwerksangabe
* Parameter2: Byte, das zu durchsuchende Lfw. definiert
(vgl.Rückgabewerte)

PARAMETERS tcGesucht, tnLfwTyp
LOCAL lcGefunden, lcLfw

* API-Funktion deklarieren
DECLARE INTEGER GetDriveType IN kernel32 STRING
* Rückgabewerte der API-Fkt. GetDriveType
* DriveNone = 0
* DriveNoRoot = 1
* DriveRemove = 2 && tnLfwTyp Bit 2 = 4
* DriveHDD = 3 && tnLfwTyp Bit 3 = 8
* DriveRemote = 4 && tnLfwTyp Bit 4 = 16
* DriveCDROM = 5 && tnLfwTyp Bit 5 = 32
* DriveRAM = 6 && tnLfwTyp Bit 6 = 64

lnParam = PARAMETERS()
tcGesucht= UPPER (ALLTRIM (tcGesucht))

IF lnParam < 1 OR lnParam > 2 OR LEN (tcGesucht) = 0 THEN lcGefunden = "Fehler bei Parameterübergabe!"
ELSE
IF lnParam = 1 THEN
* Wenn Parameter Typ fehlt, alle Lfw. Durchsuchen
tnLfwTyp = 126
ENDIF
*
** Im Dateinamen ggf. den Laufwerksbuchstaben entfernen
tcGesucht = RIGHT (tcGesucht, LEN (tcGesucht) - AT (":", tcGesucht))
IF LEFT (tcGesucht, 1) = "\"
tcGesucht = RIGHT (tcGesucht, LEN (tcGesucht) - 1)
ENDIF
*
** Datei suchen
lcGefunden = ""
FOR i = 65 TO 90
lcLfw = CHR (i) + ":\"
IF BITTEST (tnLfwTyp, GetDriveType (lcLfw)) OR tnLfwTyp=0 THEN
IF FILE (lcLfw + tcGesucht) THEN
lcGefunden = lcLfw + tcGesucht
i = 91 && FOR-Schleife beenden
ENDIF
ENDIF
ENDFOR
RETURN lcGefunden
ENDIF

FoxPro & Multimedia

• Windows-API für Multimedia-Funktionen
  • MMSystem.dll für 16-Bit-Programme unter Win 3.x
  • WinMM.dll für 32-Bit-Programme wie VFP
• MCI: Multimedia Control Interface für
  • CD-Audio
  • Midi-Sequenzer
  • Klangdateien
  • Video

MCI - Zugriff via API

• Die Schlüsselfunktion: mciSendString

  = mciSendString („open cdaudio“, cMCIWert, LEN (cMCIWert), 0)
  = mciSendString („play cdaudio from 2 to 5“, cMCIWert, LEN (cMCIWert) , 0)

• API-Funktion deklarieren:
  DECLARE INTEGER mciSendString IN WinMM.dll ;
  STRING cMCIBefehl ;
  STRING cMCIRückgabe ;
  INTEGER nLenMCIBefehl ;
  INTEGER hInstanz

Zusammenfassung CD & Multimedia mit VFP

• DBF- und FPT-Dateien gehören auf die CD, Indexdateien auf die Festplatte
• Nutzen Sie LfwScan.prg, um die Dateien nach dem CD-Wechsel wiederzufinden
• Steuern Sie Multimedia-Geräte mit der API-Funktion mciSendString (WinMM.dll)

Internet - Publishing mit VFP

Die Technologien

• Internet Database Connector (IDC)
• ActiveX
• FoxISAPI (OLE)
• FoxPro als Web Data Server

Die Web - Server - Architektur
Fehler! kein gültiger Dateiname.

Internet - Publishing mit VFP
am Beispiel Musik - Info

• Entwicklungsumgebung:
  • Visual FoxPro 5.0
  • Internet Information Server
• VFP: Führung durch die Web-Datenbank...