/********************************************************************/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Datei / Version|.../fahrzeuge.cpp&nbsp;&nbsp;&nbsp;&nbsp;/ 1.0&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Autor / Erstellt|Christian Hayer / 31.05.2003&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;|Markus Strobel&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  Autor / Update|&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*----------------------|-------------------------------------------*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;   Copyright|FHTE - IT2a (Gruppe: PetrolSoft)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Internet|http://it.chayer.de/petrolsoft&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;   Email|petrolsoft@it.chayer.de&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*----------------------|-------------------------------------------*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Aufgabe|Verwaltung der Fahrzeuge&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*----------------------|-------------------------------------------*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Eingang|Fahrzeugdaten&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*----------------------|-------------------------------------------*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Ausgang|Fahrzeugdaten&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*----------------------|-------------------------------------------*/
<BR>/* Verwendete Funktionen|OnFahrzeugCreate(); OnFahrzeugDelete();&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;|OnFahrzeugEdit(); OnFahrzeugNext();&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;|OnFahrzeugPrev(); OnCreate();&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;|OnKillFocus(); OnPaint()&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*----------------------|-------------------------------------------*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;   Globale Variablen|db1, frzset1, tdset1, frzanzahl&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*----------------------|-------------------------------------------*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Fehlerbehandlung|Abfangen von falschen Formateingaben&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/********************************************************************/
<BR>
<BR>/********************************************************************/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*   This program is free software; you can redistribute it and/or&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*   modify it under the terms of the GNU General Public License as */
<BR>/*   published by the Free Software Foundation; either version 2&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*   of the License, or (at your option) any later version.&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/
<BR>/********************************************************************/
<BR>
<BR>/////////////////////////////////////////////////////////////////////////////
<BR>// Fahrzeuge.cpp : implementation file
<BR>//
<BR>
<BR>#include "stdafx.h"
<BR>#include "Spritkostenverwaltung.h"
<BR>#include "SpritkostenverwaltungView.h"
<BR>
<BR>#include "Fahrzeuge.h"
<BR>
<BR>#ifdef _DEBUG
<BR>#define new DEBUG_NEW
<BR>#undef THIS_FILE
<BR>static char THIS_FILE[] = __FILE__;
<BR>#endif
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CDaoDatabase db1;&nbsp;&nbsp;&nbsp;&nbsp;// Datenbank-Variable
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CDaoRecordset frzset1(&db1);&nbsp;&nbsp;&nbsp;&nbsp;// RecordSet für Fahrzeuge zuweisen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CDaoRecordset tdset1(&db1);&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// RecordSet für Tankdaten zuweisen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;long frzanzahl;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Variable für Anzahl der Fahrzeuge, die in der DB abgelegt sind
<BR>
<BR>/////////////////////////////////////////////////////////////////////////////
<BR>// Fahrzeugverwaltung
<BR>
<BR>IMPLEMENT_DYNCREATE(CFahrzeugeView, CDialog)
<BR>
<BR>void CFahrzeugeView::DoDataExchange(CDataExchange* pDX)
<BR>{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CDialog::DoDataExchange(pDX);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;//{{AFX_DATA_MAP(CFahrzeugeView)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Control(pDX, IDC_FahrzeugDelete, m_FrzDelete);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Control(pDX, IDC_FahrzeugEdit, m_FrzEdit);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Control(pDX, IDC_FrzStand, m_FrzStandC);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Control(pDX, IDC_FrzDaten, m_FrzDatenC);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Control(pDX, IDC_FrzBezeichnung, m_FrzBezeichnungC);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Control(pDX, IDC_FrzBesitzer, m_FrzBesitzerC);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Control(pDX, IDC_FrzAnmerkung, m_FrzAnmerkungC);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Control(pDX, IDC_FrzID, m_FrzIDC);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Control(pDX, IDC_FahrzeugPrev, m_FrzPrev);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Control(pDX, IDC_FahrzeugNext, m_FrzNext);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Text(pDX, IDC_FrzBesitzer, m_FrzBesitzer);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDV_MaxChars(pDX, m_FrzBesitzer, 25);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Text(pDX, IDC_FrzBezeichnung, m_FrzBezeichnung);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDV_MaxChars(pDX, m_FrzBezeichnung, 25);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Text(pDX, IDC_FrzDaten, m_FrzDaten);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDV_MaxChars(pDX, m_FrzDaten, 25);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Text(pDX, IDC_FrzID, m_FrzID);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Text(pDX, IDC_FrzStand, m_FrzStand);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDV_MinMaxUInt(pDX, m_FrzStand, 0, 99999999);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDX_Text(pDX, IDC_FrzAnmerkung, m_FrzAnmerkung);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;DDV_MaxChars(pDX, m_FrzAnmerkung, 50);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;//}}AFX_DATA_MAP
<BR>}
<BR>
<BR>/////////////////////////////////////////////////////////////////////////////
<BR>// CFahrzeugeView dialog
<BR>
<BR>
<BR>CFahrzeugeView::CFahrzeugeView(CWnd* pParent /*=NULL*/)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;: CDialog(CFahrzeugeView::IDD, pParent)
<BR>{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;//{{AFX_DATA_INIT(CFahrzeugeView)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBesitzer = _T("");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBezeichnung = _T("");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDaten = _T("");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzID = 0;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzStand = 0;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzAnmerkung = _T("");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;//}}AFX_DATA_INIT
<BR>}
<BR>
<BR>BEGIN_MESSAGE_MAP(CFahrzeugeView, CDialog)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;//{{AFX_MSG_MAP(CFahrzeugeView)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;ON_BN_CLICKED(IDC_FahrzeugCreate, OnFahrzeugCreate)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;ON_BN_CLICKED(IDC_FahrzeugDelete, OnFahrzeugDelete)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;ON_BN_CLICKED(IDC_FahrzeugEdit, OnFahrzeugEdit)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;ON_BN_CLICKED(IDC_FahrzeugNext, OnFahrzeugNext)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;ON_BN_CLICKED(IDC_FahrzeugPrev, OnFahrzeugPrev)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;ON_WM_CREATE()
<BR>&nbsp;&nbsp;&nbsp;&nbsp;ON_WM_KILLFOCUS()
<BR>&nbsp;&nbsp;&nbsp;&nbsp;ON_WM_PAINT()
<BR>&nbsp;&nbsp;&nbsp;&nbsp;//}}AFX_MSG_MAP
<BR>END_MESSAGE_MAP()
<BR>
<BR>/////////////////////////////////////////////////////////////////////////////
<BR>// Wird beim Aufruf des Dialogs ausgeführt
<BR>int CFahrzeugeView::OnCreate(LPCREATESTRUCT lpCreateStruct) 
<BR>{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if (CDialog::OnCreate(lpCreateStruct) == -1)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;return -1;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CString&nbsp;&nbsp;&nbsp;&nbsp;sql;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Variable für SQL-String
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CString Fahrzeug,Fahrzeugdaten,Besitzer,Anmerkung;&nbsp;&nbsp;&nbsp;&nbsp;// String-Variablen für Felder
<BR>&nbsp;&nbsp;&nbsp;&nbsp;long FrzID, kmStand;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Long-Variablen für Felder
<BR>&nbsp;&nbsp;&nbsp;&nbsp;COleVariant var,i_var;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Variablen für den Datenaustausch mit der DB
<BR>&nbsp;&nbsp;&nbsp;&nbsp;var.ChangeType(VT_BSTR, NULL);&nbsp;&nbsp;&nbsp;&nbsp;// Datentyp String
<BR>&nbsp;&nbsp;&nbsp;&nbsp;i_var.ChangeType(VT_I4, NULL);&nbsp;&nbsp;&nbsp;&nbsp;// Datentyp int-Werte
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;db1.Open("PetrolSoft_DB.mdb");&nbsp;&nbsp;&nbsp;&nbsp;// Datenbank öffnen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;sql.Format(_T("SELECT * FROM Fahrzeugdaten"));&nbsp;&nbsp;&nbsp;&nbsp;// SQL-Befehl für Datenbankabfrage
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.Open(AFX_DAO_USE_DEFAULT_TYPE,sql,NULL);&nbsp;&nbsp;&nbsp;&nbsp;// RecordSet öffnen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if(!frzset1.IsEOF()) // Wenn Datensatze vorhanden
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.MoveLast();&nbsp;&nbsp;&nbsp;&nbsp;// gehe zum letzten Datensatz
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzanzahl = frzset1.GetAbsolutePosition();&nbsp;&nbsp;&nbsp;&nbsp;// bestimme die Anzahl der Datensätze
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;sql.Format(_T("Fahrzeug_ID = %d"),searchID);&nbsp;&nbsp;&nbsp;&nbsp;// Kommando für Datensatzsuche
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.FindFirst(sql);&nbsp;&nbsp;&nbsp;&nbsp;// Finden des Datensatzes mit der entsprechenden Fahrzeug_ID
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Auslesen der Fahrzeugdaten aus dem RecordSet
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeug_ID",i_var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FrzID = (long)i_var.lVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeugbezeichnung",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Fahrzeug = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeugdaten",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Fahrzeugdaten = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Besitzer",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Besitzer = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("kmStand",i_var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;kmStand = (long)i_var.lVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Anmerkung",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (var.vt != 1) Anmerkung = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;else&nbsp;&nbsp;&nbsp;&nbsp;// wenn kein Datensatz vorhanden ist => Meldung ausgeben
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;AfxMessageBox(_T("Es sind keine Fahrzeugdaten verfügbar."));
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Fahrzeug = "";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Besitzer = "";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Fahrzeugdaten = "";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Anmerkung = "keine Fahrzeugdaten verfügbar";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;kmStand = 0;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FrzID = 0;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;// Variablen den Feldern zuweisen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBezeichnung = Fahrzeug;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBesitzer = Besitzer;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDaten = Fahrzeugdaten;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzAnmerkung = Anmerkung;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzStand = kmStand;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzID = FrzID;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;return 0;
<BR>}&nbsp;&nbsp;&nbsp;&nbsp;// OnCreate()
<BR>
<BR>/////////////////////////////////////////////////////////////////////////////
<BR>// Wird beim Zeichnen des Dialogs ausgeführt, hier werden die verschiedenen Buttons gesetzt
<BR>void CFahrzeugeView::OnPaint() 
<BR>{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CPaintDC dc(this); // device context for painting
<BR>&nbsp;&nbsp;&nbsp;&nbsp;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if (frzset1.GetAbsolutePosition() == -1)&nbsp;&nbsp;&nbsp;&nbsp;// wenn kein Datensatz vorhanden
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzNext.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzPrev.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDelete.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzEdit.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;else&nbsp;&nbsp;&nbsp;&nbsp;// wenn Datensatz vorhanden
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDelete.EnableWindow(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzEdit.EnableWindow(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if (frzset1.GetAbsolutePosition() == 0)&nbsp;&nbsp;&nbsp;&nbsp;// wenn beim 1. Datensatz
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzPrev.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (frzanzahl > 1) &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzNext.EnableWindow(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if (frzset1.GetAbsolutePosition() == frzanzahl)&nbsp;&nbsp;&nbsp;&nbsp;// wenn beim letzten Datensatz
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzNext.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>}&nbsp;&nbsp;&nbsp;&nbsp;// OnPaint()
<BR>
<BR>/////////////////////////////////////////////////////////////////////////////
<BR>// Wird beim "Schließen" des Dialogs ausgeführt
<BR>void CFahrzeugeView::OnKillFocus(CWnd* pNewWnd) 
<BR>{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CDialog::OnKillFocus(pNewWnd);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.Close();&nbsp;&nbsp;&nbsp;&nbsp;// RecordSet schließen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;db1.Close();&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Datenbank schließen
<BR>}&nbsp;&nbsp;&nbsp;&nbsp;// OnKillFocus()
<BR>
<BR>/////////////////////////////////////////////////////////////////////////////
<BR>// Anlegen eines neuen Fahrzeuges
<BR>void CFahrzeugeView::OnFahrzeugCreate() 
<BR>{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CString status,msg;&nbsp;&nbsp;&nbsp;&nbsp;// locale CString Variablen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;long FrzID;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Fahrzeug ID
<BR>&nbsp;&nbsp;&nbsp;&nbsp;BOOL fehler = 0;&nbsp;&nbsp;&nbsp;&nbsp;// Variable für Fehlerauswertung
<BR>&nbsp;&nbsp;&nbsp;&nbsp;COleVariant i_var;&nbsp;&nbsp;&nbsp;&nbsp;// Variable für Austausch mit RecSet (DB)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;i_var.ChangeType(VT_I4, NULL);&nbsp;&nbsp;&nbsp;&nbsp;// Typ auf int setzten
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;GetDlgItemText(IDC_FahrzeugCreate,status);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if (status=="Neu Anlegen")&nbsp;&nbsp;&nbsp;&nbsp;// In Neu Anlgen Modus wechseln
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (UpdateData(TRUE) == 0) return;&nbsp;&nbsp;&nbsp;&nbsp;// wenn UpdateData nicht erfolgreich Abbruch
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBesitzer = _T("");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBezeichnung = _T("");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDaten = _T("");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzID = 0;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzStand = 0;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzAnmerkung = _T("");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzNext.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzPrev.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBezeichnungC.SetReadOnly(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBesitzerC.SetReadOnly(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDatenC.SetReadOnly(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzStandC.SetReadOnly(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzAnmerkungC.SetReadOnly(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzEdit.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDelete.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;UpdateData(FALSE);
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;SetDlgItemText(IDC_FahrzeugCreate,"Speichern");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;else&nbsp;&nbsp;&nbsp;&nbsp;// Speichern und in Anzeigemodus wechseln
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (UpdateData(TRUE) == 0) return;&nbsp;&nbsp;&nbsp;&nbsp;// wenn UpdateData nicht erfolgreich Abbruch
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;msg = "Es wurden nicht alle Felder ausgefüllt:\n";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if ((CString)m_FrzBezeichnung == "")&nbsp;&nbsp;&nbsp;&nbsp;// Fehler wenn keine Bezeichnung eingetragen wurde
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;msg += "- Fahrzeugbezeichnung\n";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;fehler = 1;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if ((CString)m_FrzDaten == "")&nbsp;&nbsp;&nbsp;&nbsp;// Fehler wenn keine Fahrzeugdaten eingetragen wurden
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;msg += "- Fahrzeugdaten\n";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;fehler = 1;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if ((CString)m_FrzBesitzer == "")&nbsp;&nbsp;&nbsp;&nbsp;// Fehler wenn kein Besitzer eingetragen wurde
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;msg += "- Fahrzeugbesitzer\n";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;fehler = 1;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (fehler)&nbsp;&nbsp;&nbsp;&nbsp;// Wenn Fehler, entsprechende Fehlermeldung ausgeben
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;AfxMessageBox(msg);&nbsp;&nbsp;&nbsp;&nbsp;// Fehlermeldung ausgeben
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;return;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.AddNew();&nbsp;&nbsp;&nbsp;&nbsp;// Neuen Datensatz am Ende anfügen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Feldinhalte des Datensatzes beschreiben
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.SetFieldValue("Fahrzeugbezeichnung",(LPCSTR)m_FrzBezeichnung);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.SetFieldValue("Besitzer",(LPCSTR)m_FrzBesitzer);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.SetFieldValue("Fahrzeugdaten",(LPCSTR)m_FrzDaten);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.SetFieldValue("kmStand",(long)m_FrzStand);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if ((CString)m_FrzAnmerkung != "") frzset1.SetFieldValue("Anmerkung",(LPCSTR)m_FrzAnmerkung);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;UpdateData(FALSE);
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.Update();&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Datenbank mit RecordSet abgleichen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzanzahl = frzanzahl + 1;&nbsp;&nbsp;&nbsp;&nbsp;// Anzahl der Datensätze um eins erhöhen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.MoveLast();&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// gehe zum Letzten Datensatz (Eingefügtem)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;AfxMessageBox(_T("Neues Fahrzeug wurde angelegt."));
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeug_ID",i_var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FrzID = i_var.lVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzPrev.EnableWindow(TRUE);
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;UpdateData(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzID = FrzID;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Felder auf nur lesbar schalten
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBezeichnungC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBesitzerC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDatenC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzStandC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzAnmerkungC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzEdit.EnableWindow(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDelete.EnableWindow(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;UpdateData(FALSE);
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;SetDlgItemText(IDC_FahrzeugCreate,"Neu Anlegen");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;OnPaint();&nbsp;&nbsp;&nbsp;&nbsp;// Button aktualisieren
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>}&nbsp;&nbsp;&nbsp;&nbsp;// OnFahrzeugCreate()
<BR>
<BR>/////////////////////////////////////////////////////////////////////////////
<BR>// Ein vorhandenes Fahrzeug editieren
<BR>void CFahrzeugeView::OnFahrzeugEdit() 
<BR>{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CString status,msg;&nbsp;&nbsp;&nbsp;&nbsp;// locale CString-Variablen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;BOOL fehler = 0;&nbsp;&nbsp;&nbsp;&nbsp;// Variable für die locale Fehlerauswertung
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;GetDlgItemText(IDC_FahrzeugEdit,status);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if (status=="Ändern")&nbsp;&nbsp;&nbsp;&nbsp;// In Editiermodus wechseln
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Felder auf editierbar stellen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBezeichnungC.SetReadOnly(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBesitzerC.SetReadOnly(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDatenC.SetReadOnly(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzStandC.SetReadOnly(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzAnmerkungC.SetReadOnly(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;SetDlgItemText(IDC_FahrzeugEdit,"Speichern");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;else&nbsp;&nbsp;&nbsp;&nbsp;// Speichern und in Anzeigemodus wechseln
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.Edit();&nbsp;&nbsp;&nbsp;&nbsp;// RecordSet auf Edit-Status schalten
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (UpdateData(TRUE) == 0) return;&nbsp;&nbsp;&nbsp;&nbsp;// wenn UpdateData nicht erfolgreich Abbruch
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;msg = "Es wurden nicht alle Felder ausgefüllt:\n";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if ((CString)m_FrzBezeichnung == "")// Fehler wenn keine Bezeichnung eingegeben wurde
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;msg += "- Fahrzeugbezeichnung\n";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;fehler = 1;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if ((CString)m_FrzDaten == "")&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Fehler wenn keine Fahrzeugdaten eingetragen wurden
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;msg += "- Fahrzeugdaten\n";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;fehler = 1;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if ((CString)m_FrzBesitzer == "")&nbsp;&nbsp;&nbsp;&nbsp;// Fehler wenn kein Besitzer eingegeben wurde
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;msg += "- Fahrzeugbesitzer\n";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;fehler = 1;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (fehler)&nbsp;&nbsp;&nbsp;&nbsp;// Wenn Fehler, entsprechende Fehlermeldung ausgeben
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;AfxMessageBox(msg);&nbsp;&nbsp;&nbsp;&nbsp;// Fehlermeldung ausgeben
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;return;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// RecordSet mit Felddaten abgleichen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.SetFieldValue("Fahrzeugbezeichnung",(LPCSTR)m_FrzBezeichnung);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.SetFieldValue("Besitzer",(LPCSTR)m_FrzBesitzer);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.SetFieldValue("Fahrzeugdaten",(LPCSTR)m_FrzDaten);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.SetFieldValue("kmStand",(long)m_FrzStand);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if ((CString)m_FrzAnmerkung != "") frzset1.SetFieldValue("Anmerkung",(LPCSTR)m_FrzAnmerkung);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;else frzset1.SetFieldValueNull("Anmerkung");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Felder auf nur lesbar schalten
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBezeichnungC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBesitzerC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDatenC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzStandC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzAnmerkungC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;UpdateData(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;OnPaint();&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Button aktualisieren
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.Update();&nbsp;&nbsp;&nbsp;&nbsp;// Datenbank mit RecordSet abgleichen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;AfxMessageBox(_T("Fahrzeugdaten wurde geändert."));
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;SetDlgItemText(IDC_FahrzeugEdit,"Ändern");
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>}&nbsp;&nbsp;&nbsp;&nbsp;// OnFahrzeugEdit()
<BR>
<BR>/////////////////////////////////////////////////////////////////////////////
<BR>// Im RecordSet ein Fahrzeug nach vorne gehen
<BR>void CFahrzeugeView::OnFahrzeugNext() 
<BR>{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CString&nbsp;&nbsp;&nbsp;&nbsp;sql;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Variable für SQL-String
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CString Fahrzeug,Fahrzeugdaten,Besitzer,Anmerkung;&nbsp;&nbsp;&nbsp;&nbsp;// String-Variablen für Felder
<BR>&nbsp;&nbsp;&nbsp;&nbsp;long FrzID, kmStand;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Long-Variablen für Felder
<BR>&nbsp;&nbsp;&nbsp;&nbsp;COleVariant var,i_var;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Variablen für den Datenaustausch mit der DB
<BR>&nbsp;&nbsp;&nbsp;&nbsp;var.ChangeType(VT_BSTR, NULL);&nbsp;&nbsp;&nbsp;&nbsp;// Datentyp String
<BR>&nbsp;&nbsp;&nbsp;&nbsp;i_var.ChangeType(VT_I4, NULL);&nbsp;&nbsp;&nbsp;&nbsp;// Datentyp int-Werte
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.MoveNext();&nbsp;&nbsp;&nbsp;&nbsp;// zum nächsten Datensatz gehen
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;// Wenn beim Letzten Datensatz, Button >> deaktivieren
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if (frzanzahl == frzset1.GetAbsolutePosition())
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzNext.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;// Werte aus der Datenbank lesen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeug_ID",i_var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;FrzID = (UINT)i_var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeugbezeichnung",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;Fahrzeug = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeugdaten",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;Fahrzeugdaten = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Besitzer",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;Besitzer = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("kmStand",i_var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;kmStand = (long)i_var.lVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Anmerkung",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if (var.vt != 1) Anmerkung = (LPCSTR)var.pbstrVal;
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;// Felder und Buttons aktualisieren
<BR>&nbsp;&nbsp;&nbsp;&nbsp;UpdateData(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBezeichnung = Fahrzeug;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBesitzer = Besitzer;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDaten = Fahrzeugdaten;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzAnmerkung = Anmerkung;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzStand = kmStand;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzID = FrzID;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzPrev.EnableWindow(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;UpdateData(FALSE);
<BR>}&nbsp;&nbsp;&nbsp;&nbsp;// OnFahrzeugNext()
<BR>
<BR>/////////////////////////////////////////////////////////////////////////////
<BR>// Im RecordSet ein Fahrzeug nach hinten gehen
<BR>void CFahrzeugeView::OnFahrzeugPrev() 
<BR>{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CString&nbsp;&nbsp;&nbsp;&nbsp;sql;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Variable für SQL-String
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CString Fahrzeug,Fahrzeugdaten,Besitzer,Anmerkung;&nbsp;&nbsp;&nbsp;&nbsp;// String-Variablen für Felder
<BR>&nbsp;&nbsp;&nbsp;&nbsp;long FrzID, kmStand;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Long-Variablen für Felder
<BR>&nbsp;&nbsp;&nbsp;&nbsp;COleVariant var,i_var;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Variablen für den Datenaustausch mit der DB
<BR>&nbsp;&nbsp;&nbsp;&nbsp;var.ChangeType(VT_BSTR, NULL);&nbsp;&nbsp;&nbsp;&nbsp;// Datentyp String
<BR>&nbsp;&nbsp;&nbsp;&nbsp;i_var.ChangeType(VT_I4, NULL);&nbsp;&nbsp;&nbsp;&nbsp;// Datentyp int-Werte
<BR>&nbsp;&nbsp;&nbsp;&nbsp;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.MovePrev();&nbsp;&nbsp;&nbsp;&nbsp;// zum vorherigen Datensatz gehen
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;// Wenn beim Ersten Datensatz, Button << deaktivieren
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if (frzset1.GetAbsolutePosition() == 0)
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzPrev.EnableWindow(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;// Werte aus der Datenbank lesen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeug_ID",i_var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;FrzID = (UINT)i_var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeugbezeichnung",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;Fahrzeug = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeugdaten",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;Fahrzeugdaten = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Besitzer",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;Besitzer = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("kmStand",i_var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;kmStand = (long)i_var.lVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Anmerkung",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if (var.vt != 1) Anmerkung = (LPCSTR)var.pbstrVal;
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;// Felder und Buttons aktualisieren
<BR>&nbsp;&nbsp;&nbsp;&nbsp;UpdateData(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBezeichnung = Fahrzeug;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBesitzer = Besitzer;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDaten = Fahrzeugdaten;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzAnmerkung = Anmerkung;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzStand = kmStand;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzID = FrzID;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;m_FrzNext.EnableWindow(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;UpdateData(FALSE);
<BR>}&nbsp;&nbsp;&nbsp;&nbsp;// OnFahrzeugPrev()
<BR>
<BR>/////////////////////////////////////////////////////////////////////////////
<BR>// Ein Fahrzeug aus der Datenbank löschen (Tankdaten werden auch gelöscht)
<BR>void CFahrzeugeView::OnFahrzeugDelete() 
<BR>{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CString&nbsp;&nbsp;&nbsp;&nbsp;sql;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Variable für SQL-String
<BR>&nbsp;&nbsp;&nbsp;&nbsp;int msg;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Variable für die Abfrage der Messagebox
<BR>&nbsp;&nbsp;&nbsp;&nbsp;CString Fahrzeug,Fahrzeugdaten,Besitzer,Anmerkung;&nbsp;&nbsp;&nbsp;&nbsp;// String-Variablen für Felder
<BR>&nbsp;&nbsp;&nbsp;&nbsp;long FrzID, kmStand;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Long-Variablen für Felder
<BR>&nbsp;&nbsp;&nbsp;&nbsp;COleVariant var,i_var;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Variablen für den Datenaustausch mit der DB
<BR>&nbsp;&nbsp;&nbsp;&nbsp;var.ChangeType(VT_BSTR, NULL);&nbsp;&nbsp;&nbsp;&nbsp;// Datentyp String
<BR>&nbsp;&nbsp;&nbsp;&nbsp;i_var.ChangeType(VT_I4, NULL);&nbsp;&nbsp;&nbsp;&nbsp;// Datentyp int-Werte
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;GetDlgItemText(IDC_FrzBezeichnung,Fahrzeug);&nbsp;&nbsp;&nbsp;&nbsp;// Fahrzeugbezeichnung aus Feld auslesen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;msg = AfxMessageBox(_T("Soll das Fahrzeug '" + Fahrzeug +"' wirklich gelöscht werden?\nEs werden auch die entsprechenden Tankdaten gelöscht."),MB_OKCANCEL);
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;if (msg == 1)&nbsp;&nbsp;&nbsp;&nbsp;// Wenn Meldung mit OK bestätigt wird der Datensatz gelöscht
<BR>&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.Delete();&nbsp;&nbsp;&nbsp;&nbsp;// Fahrzeug-Datensatz löschen
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Entsprechende Tankdaten des Fahrzeuges löschen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FrzID = m_FrzID;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;sql.Format(_T("SELECT * FROM Tankdaten WHERE Fahrzeug_ID = %d"),FrzID);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tdset1.Open(AFX_DAO_USE_DEFAULT_TYPE,sql,NULL);&nbsp;&nbsp;&nbsp;&nbsp;// Tankdaten-RecordSet öffnen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;while(!tdset1.IsEOF()) // While not EOF
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tdset1.Delete();&nbsp;&nbsp;&nbsp;&nbsp;// Tankdaten-Datensatz löschen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tdset1.MoveNext();&nbsp;&nbsp;&nbsp;&nbsp;// gehe zum nächsten Datensatz
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tdset1.Close();&nbsp;&nbsp;&nbsp;&nbsp;// Tankdaten-RecordSet schließen
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzanzahl = frzanzahl - 1 ;&nbsp;&nbsp;&nbsp;&nbsp;// Anzahl der Datensätze um eins vermindern
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (frzanzahl > 0)&nbsp;&nbsp;&nbsp;&nbsp;// Wenn Datensatz vorhanden, gehe zum letzten Datensatz
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.MoveLast();&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// gehe zum letzten Datensatz
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Werte aus der Datenbank lesen
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeug_ID",i_var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FrzID = i_var.lVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeugbezeichnung",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Fahrzeug = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Fahrzeugdaten",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Fahrzeugdaten = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Besitzer",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Besitzer = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("kmStand",i_var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;kmStand = (long)i_var.lVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;frzset1.GetFieldValue("Anmerkung",var);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (var.vt != 1) Anmerkung = (LPCSTR)var.pbstrVal;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;else&nbsp;&nbsp;&nbsp;&nbsp;// Wenn kein Datensatz vorhanden, entsprechende Ausgabe der Felder
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Fahrzeug = "";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Besitzer = "";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FrzID = 0;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;kmStand = 0;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Anmerkung = "keine Fahrzeuge vorhanden !";
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;OnPaint();&nbsp;&nbsp;&nbsp;&nbsp;// Button aktualisieren
<BR>
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;// Felder und Buttons aktualisieren
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;UpdateData(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBezeichnung = Fahrzeug;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBesitzer = Besitzer;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDaten = Fahrzeugdaten;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzAnmerkung = Anmerkung;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzStand = kmStand;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzID = FrzID;
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBezeichnungC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzBesitzerC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzDatenC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzStandC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_FrzAnmerkungC.SetReadOnly(TRUE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;UpdateData(FALSE);
<BR>&nbsp;&nbsp;&nbsp;&nbsp;}
<BR>}&nbsp;&nbsp;&nbsp;&nbsp;// OnFahrzeugDelete()
<BR>