| |

Fragen & Antworten rund um sev-KomponentenCheckbox und MySQL | |  | Autor: melodoi66 | Datum: 23.10.05 11:42 |
| Hi,
ich benutzte das sevGrid 2.1.0.30 unter Access 2000 im Recordset-Modus. Ich kann sowohl Access (verknüpfte Tabellen) als auch MySQL (ODBC) als Datenbank verwenden.
Wenn ich Access anbinde sind die Checkboxen als Checkbocken dargestellt. Unter MySQL sehe ich nur 0 und -1, obwohl ich es mit CBool(Feldname) und IIf(Feldname,TRUE,FALSE) versucht habe. Wo liegt hier der Fehler?
Gruß Sylvio
Der Code dazu:
With grdWarengruppe
strSQL = "SELECT W.ID_Warengruppe, CBool(W.Selekt), W.Warengruppe " _
& "FROM tbl_P_Warengruppe W WHERE W.Deleted=0"
Set rsW = db.OpenRecordset(strSQL, dbOpenDynaset, dbSeeChanges)
' autom. Neuzeichnen des DataGrids unterbinden
.LockUpdate True
.FilterMoveTAB = True
' Erweiterte Eigenschaften
.AllowColumnClick = True
.AllowColumnSizing = True
.AllowDelete = True
.AllowEdit = True
.AllowMultiSelect = False
.AllowColumnReorder = True
.AutoSort = True
.AutoUpdate = True
.CheckBoxStyle = 2 ' XP-Style
.ShowSortSymbols = True
.ColumnHeadersVisible = False
.ScrollBars = 4
.StartEditWith = 2
.Caption = "Warengruppe"
.CaptionFont.Name = "Tahoma"
.CaptionFont.Bold = True
.CaptionFont.Size = 10
.ColumnHeaderFont.Name = "Tahoma"
.Font.Name = "Tahoma"
.FooterFont.Name = "Tahoma"
.FilterFont.Name = "Tahoma"
' Spalten hinzufügen (bei DB-Anbindung nicht
' unbedingt notwendig!)
.ColumnAdd rsW.Fields(0).Name, rsW.Fields(0).Name, 0, , False
.ColumnAdd rsW.Fields(1).Name, rsW.Fields(1).Name, 300, , , , , 2
.ColumnAdd rsW.Fields(2).Name, rsW.Fields(2).Name, 2450
.Columns(rsW.Fields(1).Name).DisplayFormat = dbBoolean
' Recordset zuweisen
.CreateClone = True
Set .Recordset = rsW
' Wheelmaus-Unterstützung aktivieren
.WheelMouse = True
' Neuzeichnen des DataGrids wieder aktivieren
.LockUpdate False
.Refresh
.Row = 1
End With |  |
 | Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
  |
|
vb@rchiv CD Vol.6 vb@rchiv Vol.6
Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
Online-Update-Funktion Entwickler-Vollversionen u.v.m.Jetzt zugreifen Tipp des Monats Oktober 2025 Matthias KozlowskiUmlaute konvertierenErsetzt die Umlaute in einer Zeichenkette durch die entsprechenden Doppelbuchstaben (aus ä wird ae, usw.) sevWizard für VB5/6 
Professionelle Assistenten im Handumdrehen
Erstellen Sie eigene Assistenten (Wizards) im Look & Feel von Windows 2000/XP - mit allem Komfort und zwar in Windeseile :-) Weitere Infos
|
|
|
Copyright ©2000-2025 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|