<%@ LANGUAGE=VBScript %> <% Option Explicit %> <% Dim cnn, rst, curDir, strSQL '--------------------------------------------- curDir = Server.MapPath("./database/fachinfos/database/fachinfos.mdb") Set cnn = Server.CreateObject("ADODB.Connection") cnn.Open "DBQ="& curDir &";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;" Set rst = Server.CreateObject("ADODB.Recordset") Set rst.ActiveConnection = cnn strSQL = "SELECT * FROM Kategorien ORDER BY Kategorie" rst.Source = strSQL rst.CursorType = adOpenStatic rst.LockType = adLockOptimistic rst.Open '--------------------------------------------- %> LIPPEDENT Fachinformationen Übersichtsseite

            Patienten-Informationen

Wählen Sie einen Bereich aus und klicken Sie diesen an. Wenn Sie nicht wissen, wo sie etwas finden, können Sie einen Suchbegriff in die Suchmaschine eingeben.









ein Leben lang











Geben Sie einen Suchbegriff ein, wenn Sie weitergehende Informationen wünschen!

Suchbegriff: