Hirdetés
- Macrodroid
- Hét évig frissül az új iQOO
- Xiaomi 15T Pro - a téma nincs lezárva
- Amazfit Helio Strap – képernyőmentesen
- Mobil flották
- Beépül a Nano Banana a Google Fotókba
- Xiaomi 15T - reakció nélkül nincs egyensúly
- Apple iPhone 13 Pro Max - őnagysága
- Milyen okostelefont vegyek?
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
Új hozzászólás Aktív témák
-
Gh0sT
addikt
Sikerült kiolvasnom az adatbázisból a lekérdezés fejléceit, de adatokat valamiért nem tudok.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Connection1 As New System.Data.SqlClient.SqlConnection(''Data Source=kisg\sqlexpress; Initial Catalog=Babel;Integrated Security=SSPI;'')
Dim Command1 As New System.Data.SqlClient.SqlCommand(''Select * from UKM'', Connection1)
Connection1.Open()
Dim Reader1 As System.Data.SqlClient.SqlDataReader = Command1.ExecuteReader()
Dim Table As DataTable = Reader1.GetSchemaTable()
Dim index As Integer
For index = 0 To Table.Rows.Count - 1
TextBox1.Text &= Reader1.GetName(index) & ControlChars.Tab
Next
Egészen eddig működik is, a TextBoxban megjelennek a tábla fejlécei
'For index = 0 To Table.Rows.Count - 1
'TextBox1.Text &= Reader1.GetString(index) & ControlChars.Tab
'Next
End Sub
Gondolom itt lehet valami hiba, mert úgy viselkedik, mintha nem lenne találat. Pedig fel van töltve adatokkal. Ezek szerint nem a GetStringgel kellene adatokat kinyernem a táblából?
Új hozzászólás Aktív témák
- Fotó állvány eladó
- ÁRGARANCIA! Épített KomPhone Ultra 9 285K 64GB RAM RTX 5090 32GB GAMER PC termékbeszámítással
- AKCIÓ! Apple MacBook Pro 16 M4 Max 36GB RAM 1TB SSD macbook garanciával hibátlan működéssel
- GYÖNYÖRŰ iPhone 15 Plus 128GB Black -1 ÉV GARANCIA - Kártyafüggetlen, MS3355, 100% Akkumulátor
- HIBÁTLAN iPhone 13 256GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3421
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


