vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Erstellen von dynamischen Kontextmen?s - wann immer Sie sie brauchen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB & Datenbanken
sevDatagrid Datum/Uhrzeit kann nicht aktualisert werden ADO 
Autor: HarryPotter
Datum: 04.05.06 12:00

Hallo zusammen,

Randbedingungen:

Programmiersprache : VB6
Datenbank: Oracle 9i
Datenzugriff ADO über Ole DB Provider von Oracle

Ich schreibe gerade ein Programm zur Zeiterfassung und möchte nun die Möglichkeit schaffen, die gebuchten Zeiten zu korrigieren. Dazu erstelle ich eine Abfrage die ich in ein sevdatagrid lade.

Jedoch kann ich die Felder nicht editieren ich erhalte dann die Fehlermeldung:

-2147217887 Fehler der aus mehreren Schritten besteht. Beim Aufdröseln der ADO Fehler erhalte ich die Fehlermeldung 0 , also auch keine Hilfe.

Hier der Code mit dem ich das Recordset erstelle und das laden ins Grid.

Hat jemand eine Idee, wie ich die Daten editieren kann. AddNew geht übrigens auch nicht.

SQL = " select man_id, dbuser, man_name1, to_char(his_start,'dd.mm.yyyy') as Datum , to_char(his_start,'hh24:mi:ss') as his_start2, to_char(his_end,'hh24:mi:ss') as his_end2, " & _
" memo,log_id as log from im$_project_time where dbuser = " & Chr(39) & Uebergabe(0) & Chr(39) & _
" and trunc(his_start) " & Uebergabe(1) & _
" order by his_start"


DBuser = Uebergabe(0)


Set Zeiten = New ADODB.Recordset
With Zeiten
.ActiveConnection = myk
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Source = SQL
.Open
Set .ActiveConnection = Nothing
End With


With gridKorrektur
.ColumnAdd "man_id", "ID", 10, ALIGNMENT_RIGHT, False
.ColumnAdd "dbuser", "User", 10, ALIGNMENT_RIGHT, False
.ColumnAdd "man_name1", "PROJEKT", 1500, ALIGNMENT_LEFT, True, TYPE_COMBOBOX
.ColumnAdd "his_start", "Datum", 1500, ALIGNMENT_RIGHT, True, TYPE_TEXT, ALIGNMENT_CENTER, , SORT_DATETIME
.ColumnAdd "his_start2", "BEGINN", 1500, ALIGNMENT_RIGHT, True, TYPE_TEXT, ALIGNMENT_CENTER, , SORT_DATETIME
.ColumnAdd "his_end2", "ENDE", 1500, ALIGNMENT_RIGHT, True, TYPE_TEXT, ALIGNMENT_CENTER, , SORT_DATETIME
.ColumnAdd "memo", "BEMERKUNG", 2500, ALIGNMENT_LEFT, True
.ColumnAdd "log_id", "ID", 700, ALIGNMENT_RIGHT, False
Set .Recordset = Zeiten
.CreateClone = True
.Caption = Uebergabe(3) & "," & Uebergabe(4)
.Refresh
End With
Zeiten.Close


____________________________

Der Fehler dessen Name nicht genannt werden darf

alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
sevDatagrid Datum/Uhrzeit kann nicht aktualisert werden ADO1.102HarryPotter04.05.06 12:00
Re: sevDatagrid Datum/Uhrzeit kann nicht aktualisert werden ...616Prian081505.05.06 12:34
Re: sevDatagrid Datum/Uhrzeit kann nicht aktualisert werden ...636HarryPotter08.05.06 08:58

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

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

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