Tiana

Hi, eine komplette Lösung kann ich Dir nicht anbieten, aber so in etwa müsste es funktionieren. 1. in VB-Scribt / VBA eine Abfrage stricken, die deine Daten aus den Tabellen in entsprechneder Sortierung ausgibt 2. das ganze in einem Recordset speichern 3. MIt einem FileSystemObject eine Textdatei erzeugen bzw. eine vorhandene Datei öffnen 4. Inhalt des Recordsets in die Datei schreiben (mittels Schleife) 5. Datei speichern und mit anderem Namen kopieren Fertig Zu den eigenen Punkten musst du in der Hilfedatei nachschlagen. Ich hoffe, das dir dieses Stubs in die richtige Richtung geholfen hat. Gruß, Tiana P.S. Bei Rückfragen helfe ich natürlich gerne

Hallo, kennt jemand von euch entsprechende PC-Kompiler (Freeware & Salesware)??? Unterstützt werden sollte ANSI 85. Gruß, Tiana

Hallo, Variabeln können nicht in einem Unterprogramm (sub oder Makro) als Public deklarert werden. In VB Programmen deklariert man Variabeln in Modulen. Wie man die Variabeln in VBA öffentlich deklariert weiss ich nicht, es kann aber durchaus sein, das Du dafür auch ein Modul anlegen musst. Gruß, Tiana

... Du kannst nur über das ConnectionObjekt arbeiten, das müsste auf jeden Fall funktinieren. Evtl musst Du hier noch Libaries hinzufügen (es gibt auch ADO Lib`s). Ich kenn mich mit VBA nicht ganz so doll aus (nur bei Access). Ich hoffe es hilft Dir weiter. Gruß, Tiana

Hi, Public <CONNECTIONNAME> As New ADODB.Connection Public <COMMANDNAME> As Command Public <Recordsetname> As ADODB.Recordset '************************************************ '* Verbindung zur ODBC herstellen * '************************************************ Set <Connectionname> = New Connection <Connectionname>.CursorLocation = adUseClient <Connectionname>.Open "<ODBC-Name>", "<User>", "<Passwort>" 'COMMAND OBJEKT DEFINIEREN Set <COMMANDNAME> = New Command <COMMANDNAME>.ActiveConnection = <Connectionname> <COMMANDNAME>.CommandType = adCmdText <COMMANDNAME>.CommandText = "Select * from <Tabellenname>" Set <Recordsetname> = <COMMANDNAME>.Execute() Dann kannst Du ganz normal mit dem Recordset arbeiten (am besten liest Du dazu mal ein wenig in einem VB-Buch, wenn du noch nicht damit gearbeitet hast!) Noch Fragen? Schreib mir! Gruß, Tiana

---siehe Mail

Hi, du kannst am besten darauf zugreifen, wenn Du mit ODBC und ADO arbeitest. Gruß, Tiana

Hi, bin mir nicht sicher. Hast Du es mal mit eienem Formelfeld versucht? Gruß, Tia

Hi,, also, beim Programmstart würde ich eine sub "Farben löschen" aufrufen, die die Farbe aller Felder auf weiß setzt. Dann eine sub "Datenfelder Färben", wo du mit einer Schleife die einzelnen Felder durchgehst und mit If abfragst, ob Sie gefüllt sind, wenn Ja, dann einfärben wenn nicht, dann weiter... Hilft das weiter??? Gruß, Tiana

Hi, also in dem Fall (dein Wert ist mit der Option auf führende Nullen ja ein alphanumerischer wert) mach doch einfach folgendes (einfach ist am Besten): if len(textfeld.text)<10 then msgbox "Eyyyyy!" GRuß, Tiana

Hi, mhhh, also, Du kanst prüfen, ob es sich um einen Datumswert handelt if isdate(feld)=true then bei der Länge kannst Du folgendes machen: if len(year(feld))<>4 then MsgBOX "Jahr bitte 4stellig" das gleiche kannste für Tag und Monat machen Gruß, Tiana

Hi, kann sein. Ich kenne es noch nicht so gut in Verbindung mit VB oder anderen Programmen, weil wir CR nicht in ZUsammenhang mit diesen Prog einsetzen, sondern nur für unser neues Finanzmanagement! Aber wenn Du hast, würde ich gerne mal einen VB-Beispielcode sehen. Das interessiert mich dann doch! Gruß, Tiana

Hi, hast Du denn führende Nullen dabei (z.B. 001476225614)? Gruß, Tiana

Hi, mhhh vielleicht mit If Format(textbox,##########)=false Then ... muss Du mal ausprobieren! GRuß, Tiana

Hi, also, eine Verbindung von Anwendung und Report ist in der Regel nur möglich, wenn der Report in der Entw.Umg. integriert ist. Du kannst aber auch folgendes machen, vielleicht hilft`s: Bearbeite dein Parameterfeld so, das Du Standardwerte voreinstellst (z.B. ID`s aus deinem Datenbankfeld). Eine andere Lösung kann ich mir momentan nicht vorstellen! Gruß, Tiana

Hi, mhhhkannst Du mal genau erläutern, wofür Du das brauchst? Muss der Textinhalt eine bestimme Länge haben und muss der Punkt immer an der selben Stelle stehen? Gruß, Tiana

Hi, normalerweise kannst Du in Crystal mit dem Auswahlmanager arbeiten. Einfach ein Parameterfeld anlegen und dann mit dem Auswahlmanager darauf verweisen. Arbeitest Du mit einer Vollversion von Crystal oder mit einer in der Entwicklungsumgebung eingebetteten? Gruß, Tiana

Hi, ich weiss zwar nicht, was Du schon alles versucht hast, aber hast Du schon mal mit einer Schleife probiert, die die einzelnen Listenelemente durchgeht und dann nach list.index[x].selected abfragt? Gruß, Tia

Hi, wie Wäre es mit einem Trick. Frag doch einfach auf Textbox<1000000000 ab. alles was kleiner ist hat nur neun Stellen, oder werden hier führende Nullen mitgegeben? Gruß, Tiana

Hi, über "Datei->Drucker Einrichten". Dort muss Du das Format auf Querformat einstellen. Dann ändert sich auch die Ansicht im Entwurf. CR arbeitet nämlich auf Basis des Standarddruckertreibers. Wenn Du den Drucker änderst können sich auch leichte Abweichungen im Design ergeben! Gruß, Tiana

Hi, meiner Meinung nach geht das gar nicht. Aber vielleicht erklärst Du dein Problem mal näher, dann kann man eine andere Lösung suchen. Gruß, Tiana

Hi, Zu "Grid" bzw. MSFlexGrid sagt uns die VB-Hilfe folgendes: MSFlexGrid-Steuerelement Das Microsoft FlexGrid (MSFlexGrid)-Steuerelement zeigt tabellarische Daten an und operiert mit diesen. Es ermöglicht das Sortieren, Gruppieren von Zellen in und Formatieren von Tabellen, die Zeichenfolgen und Bilder enthalten. Ist MSFlexGrid an ein Daten-Steuerelement gebunden, so zeigt es nur schreibgeschützte Daten an. Syntax MSFlexGrid Anmerkungen Sie können Text, ein Bild oder auch beides in jeder Zelle MSFlexGrid-Steuerelements einfügen. Die Row- und Col-Eigenschaften bestimmen die aktuelle Zelle in einem MSFlexGrid-Steuerelement. Sie können die aktuelle Zelle im Code festlegen, oder der Benutzer kann diese zurLaufzeit über die Maus oder die Pfeiltasten verändern. Die Text-Eigenschaft verweist auf die Inhalte der aktuellen Zelle. Ist der Text in einer Zelle zu lang, so daß dieser nicht angezeigt werden kann, und wurde die WordWrap-Eigenschaft auf True gesetzt, so wird der Text auf die nächste Zeile innerhalb derselben Zelle umgebrochen. Damit der umgebrochene Text angezeigt wird, müssen Sie eventuell die Spaltenbreite (ColWidth-Eigenschaft) oder die Zeilenhöhe (RowHeight-Eigenschaft) der Zelle vergrößern. Verwenden Sie die Col- und Row-Eigenschaft zur Bestimmung der Anzahl von Spalten und Zeilen in einem MSFlexGrid. Anmerkung Bevor Sie ein MSFlexGrid-Steuerelement in Ihrer Anwendung verwenden können, müssen Sie die Datei MSFlxGrd.ocx zu Ihrem Projekt hinzufügen. Sie können diese Datei automatisch in Ihr Projekt aufnehmen, indem Sie sie in die Datei Autoload einfügen. Beim Vertrieb Ihrer Anwendung sollten Sie die Datei MSFlxGrd.ocx im Microsoft Windows-Systemverzeichnis des Benutzers installieren. Weitere Informationen zum Hinzufügen ActiveX-Steuerelements zu einem Projekt finden Sie unter "Standard-ActiveX-Steuerelemente" im Programmierhandbuch.

Hi, klingt gut, allerdings wäre es hilfreich zu wissen, für welchen Beruf das Projekt gilt, denn für einen AE wäre das nix. es sei denn, Du würdest das Programm selber schreiben! Gruß, Tiana

Hi, Du kannst alle Access-Elemente mit VBA bearbeiten, auch wenn Du als Tabellen MySql-Tabellen eingebunden hast oder importiert hast. Gruß, Tiana

Hi, du kannst es mal mit folgendem Befehl versuchen: if ListView.Selected(i)=true then .. end if i ist eine Zählvariabel, die den Index der angezeigten Elemente darstellt. Wenn Du dein Listview durchgehst und überprüfst, ob das Element ausgewählt ist, musst du eine Schleife bauen. Könnte so aussehen: x=ListView.Listcount Do until i>=x if ListView.Selected=true then String=listview.list(i) end if i=i+1 loop Ich hoffe es funktioniert! Gruß, Tia