Benutzer mit den meisten Antworten
Datum in ein DataGridView Feld automatisch anzeigen lassen

Frage
Antworten
-
Wenn dies eine statische anzeige sein soll kannst Du einfach in den Query GetDate() reinpacken. Dann liefert Dir der SQL Server das Datum.
Martin Richter -- MVP for VC++ [Germany] -- http://blog.m-ri.de- Als Antwort vorgeschlagen Robert BreitenhoferModerator Dienstag, 22. September 2009 10:10
- Als Antwort markiert Robert BreitenhoferModerator Montag, 28. September 2009 07:06
Freitag, 18. September 2009 05:30
Alle Antworten
-
Wenn dies eine statische anzeige sein soll kannst Du einfach in den Query GetDate() reinpacken. Dann liefert Dir der SQL Server das Datum.
Martin Richter -- MVP for VC++ [Germany] -- http://blog.m-ri.de- Als Antwort vorgeschlagen Robert BreitenhoferModerator Dienstag, 22. September 2009 10:10
- Als Antwort markiert Robert BreitenhoferModerator Montag, 28. September 2009 07:06
Freitag, 18. September 2009 05:30 -
Hallo Manfred,
Für eine Access Datenbank kannst Du zum Beispiel die Date.Today Methode verwenden.
Idem folgenden Code Beispiel schließe ich mich an der Northwind.mdb Datei an und jede dritte Zeile enthält das aktuelle Tagesdatum.
Imports System.Data.OleDb Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Temp\Northwind.mdb") Dim sqlstr As String = "SELECT FirstName,LastName,BirthDate,HireDate,#" & Date.Today & "# AS DateCreated1,#" & Today.Date() & "# AS DateCreated2 FROM Employees" Dim command As New OleDbCommand(sqlstr, conn) Dim dt As New DataTable dt.Columns.Add("c1", GetType(System.String)) dt.Columns.Add("c2", GetType(System.String)) conn.Open() Dim reader As OleDbDataReader = command.ExecuteReader() While reader.Read() Dim line, line1 As String line = reader.GetString(0).ToString() line1 = reader.GetString(1).ToString() dt.Rows.Add(line, line1) Dim line2, line3 As String line2 = reader.GetDateTime(2).ToString line3 = reader.GetDateTime(3).ToString() dt.Rows.Add(line2, line3) Dim line4, line5 As String line4 = reader.GetDateTime(4).ToString line5 = reader.GetDateTime(5).ToString() dt.Rows.Add(line4, line5) End While conn.Close() Me.DataGridView1.DataSource = dt End Sub End Class
Grüße,Robert
Dienstag, 22. September 2009 10:08Moderator