XProfan

Kompilieren Marque Séparation

Hab cela Beispiel aus qui Aider de S. vite la fois ergänzt um Erstellung qui banque de données (Beispiel1.mdb), sowie Anzeige. DSN wird on le fly erstellt et gelöscht

### hinzugefügt
 $U dbHelper.pcu = db.
Declare DSN$
DSN$ = db.CreateMDB(Beispiel1.mdb)

If DSN$ =  : End : EndIf

    ### ende
    -Begin-----------------------------------------------------------------
    -VariablesDeclaration------------------------------------------------
    Declare hDb&
    Declare MemoFeld$
    -Main----------------------------------------------------------------
    ### geändert
    hDb& = @SQLInit(DSN=Microsoft Access-Datenbank)
    hDb& = @SQLInit(DSN= + DSN$)
    ### ende

    If hDb&

        -Tabelle erzeugen------------------------------------------------
        -
        -  AUTOINCREMENT = Autowert
        -  CHAR          = Text
        -  CURRENCY      = Waehrung
        -  DATE          = Datum/Uhrzeit
        -  FLOAT         = Double
        -  INT           = Long Integer
        -  MEMO          = Memory
        -  NUMBER        = Double
        -
        -----------------------------------------------------------------
        SQLExec CREATE TABLE test1 (Nummer AUTOINCREMENT,  +
        Name CHAR(50) PRIMARY KEY,  +
        Vorname CHAR(30),  +
        GebDatum DATE,  +
        Groesse INT,  +
        Gehalt CURRENCY,  +
        Faktor FLOAT,  +
        Bemerkung MEMO);, 0
        -Einen Datensatz anlegen-----------------------------------------
        MemoFeld$ = Dies ist ein Memo-Feld in dem eine Menge Text  +
        gespeichert werden kann und das fast keine  +
        Grenzen kennt.
        SQLExec INSERT INTO test1 (Name, Vorname, GebDatum,  +
        Groesse, Gehalt, Faktor,  +
        Bemerkung)  +
        VALUES (Schnell,  +
        Stefan,  +
        #6/16/1964#,  +
        189,  +
        3141.59,  +
        2.473,  +
        :MemoFeld$);, 0
        -Datensaetze anzeigen--------------------------------------------
        SQLExec SELECT * FROM test1;, 1
        ### hinzugefügt
        @ListBox$(TABLE, 2)
        ### ende
        -Tabelle loeschen------------------------------------------------
        SQLExec DROP TABLE test1;, 0
        SQLDone

    EndIf

    ### hinzugefügt
    db.RemoveDSN(DSN$)
    WaitKey
    ### ende
    -End-------------------------------------------------------------------

class=s4 href='./../../function-references/XProfan/end/'>Fin

30.09.2006 ▲

Update sur Beta 0.2
quelques Syntaxänderungen, siehe erstes Posting
Beispiel hinzugefügt

Michael
Wodrich

Werds im Laufe des Tages la fois testen.
peux on sich là aussi rien zerschiessen, si on quelque chose entfernt?

pas cela là après wichtige Einträge manquer...

Programmieren, das spannendste Detektivspiel der Welt.

Michael Wodrich

Werds im Laufe des Tages la fois testen.
peux on sich là aussi rien zerschiessen, si on quelque chose entfernt?

pas cela là après wichtige Einträge manquer...

Entfernt seulement DSN-Einträge qui avec XPRF commencer. alors devrait es seulement vom Programme erstellte son. Solltest Du cependant une Access DB Namens Test.mdb et une Excel Tabelle Test.xls avons, so überschreiben qui sich.

on sollte alors beim Programstart DSN erzeugen et am Ende endfernen, pourrait ensuite rien passer, solange on pas avec gleichnamigen Datenbanken paralell arbeitet, avec cette PCU!

DSN-Einträge sommes im allgemeinen pas important, peux on jederzeit dans qui Systemsteuerung récente anlegen. (seulement Benutzerquellen volonté benutzt, aucun System-DNS usw.!)

Wäre joli, si Du la fois testest

Update sur Beta 0.3

PCU taille optimiert (70%) et Geschwindigkeit gesteigert

Michael
Wodrich

Zugriff sur Access klappt, mais comment bekomme je Zugriff sur une MySQL-Dossier?

Programmieren, das spannendste Detektivspiel der Welt.

[quote-part:817fe34677=Michael Wodrich]Zugriff sur Access klappt, mais comment bekomme je Zugriff sur une MySQL-Dossier?[/quote-part:817fe34677]
MyODBC doit installiert son, comme Adresse ensuite z.B. den localhost angeben. (127.0.0.1) et Driver = MySQL ODBC 3.51 Driver
Tricolore mais encore pas getestet, sollte mais aller, si MySQL bistrot fonctionne

Update Beta 0.5

Alle 3 Funktion avons maintenant une zusätzlichen optionalen paramètre. si cette sur 1 gesetzt ist, wird qui DSN-Eintrag dans den Systemdatenquellen erstellt, bzw. gelöscht. là avons aussi autre Nutzer des Systems zugriff sur qui DB

PS: qui un paire gentille Beispiele posten pourrait, qui erhält de mir per PM den Source, qui mais pas weitergegeben volonté darf. alors haut rein

03.10.2006 ▲

Michael
Wodrich

XAMPP hat den MyODBC wohl pas gebraucht. qui Treiber ist chez mir garnicht installiert, hole je justement pour.

sais quelqu'un wohin chez XP Home qui hosts. et lmhosts. oui c'est ca hingehören avec cela vous korrekt ausgewertet volonté? j'ai sur meinem System Schwierigkeiten avec qui localhost Angabe - qui führt ständig ins le vide. je helfe mir avec 127.0.0.1.

qui Templates liegen sous WindowsSystem32Driveretc
hosts.sam et lmhosts.sam.

belle Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

04.10.2006 ▲

Pour System32/Drivers/etc

seulement débaptiser, alors extension weg

MySQL allez aussi sans ODBC, indem on qui DLL libmysql.dll direct verwendet. mais pour ODBC ist MyODBC erforderlich!

04.10.2006 ▲

Michael
Wodrich

je schaff es simple pas. Access-Fichiers ne...aucune Problem mais MySql veux pas. ou bien habe je avec *.myd qui falsche Dossier am Wickel.

voilà *.myd, *.myi, *.frm zur sélection.
d=datenbank, i=index ?!!

Erstellt habe je qui banque de données comment toujours: avec phpMyAdmin - avec cela arbeite je eigentlich seulement. mais un Programmzugriff via XProfan wäre naturellement bien...

belle Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

04.10.2006 ▲