Új hozzászólás Aktív témák
-
VB.NET hez kellene kis segítség.
Egy csv-ből olvasok be adatot datatable-be majd megjelenítem egy datagridviewbe. Megy oda vissza írás olvasás. Viszont valamiért az oszlopok adattípusát automatán változtatja a progi, pedig nincs megadva sehol hogy milyen típusú egy oszlop és én sem szeretném megváltoztatni.
Hogyan tudom kikapcsolni azt hogy a datagridview ne kezeljen automatán adattípust, vagy alapból legyen minden string típusú?
A csv-ből így olvasok be:
Dim CnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & CurDir() & "\Tablazat" & ";Extended Properties=""text;HDR=YES;FMT=Delimited"";"
Using Adp As New OleDbDataAdapter("select * from adat.csv", CnStr)
Adp.Fill(adat)
End Using
adattablamegjelenito.DataSource = adatEzzel meg írom vissza:
Sub SetDataTable_To_CSV(ByVal dtable As DataTable, ByVal path_filename As String, ByVal sep_char As String)
Dim writer As System.IO.StreamWriter
Try
writer = New System.IO.StreamWriter(path_filename, False, System.Text.Encoding.Default)
Dim _sep As String = ""
Dim builder As New System.Text.StringBuilder
For Each col As DataColumn In dtable.Columns
builder.Append(_sep).Append(col.ColumnName)
_sep = sep_char
Next
writer.WriteLine(builder.ToString())
For Each row As DataRow In dtable.Rows
_sep = ""
builder = New System.Text.StringBuilder
For Each col As DataColumn In dtable.Columns
builder.Append(_sep).Append(row(col.ColumnName))
_sep = sep_char
Next
writer.WriteLine(builder.ToString())
Next
Catch ex As Exception
Finally
If Not writer Is Nothing Then writer.Close()
End Try
End SubTehát ha beírok csak számot az oszlopba akkor utána ha elmentem majd betöltöm akkor hibával elszáll ha betűket akarok beírni. Ugyanígy ha a csv-be csak számok vannak egy oszloppba akkor szintén nem lehet betűt beírni. Én minden egyes oszlopot stringként akarok kezelni.
Új hozzászólás Aktív témák
- Azonnali fotós kérdések órája
- Formula-1
- ROG Xbox Ally X: Összefogás
- A fociról könnyedén, egy baráti társaságban
- Milyen autót vegyek?
- One otthoni szolgáltatások (TV, internet, telefon)
- Lecsap az S26 Ultra az Exynos 2600-ra
- Kerékpárosok, bringások ide!
- Milyen TV-t vegyek?
- Mibe tegyem a megtakarításaimat?
- További aktív témák...
- Hajszálvékony ÉRINTŐS Lenovo Thinkpad X1 Carbon G8 (10.gen Core I5 16Gb DDR 512Gb SSD) eladó!
- XBOX One X (2 controller)
- Eladó iPhone 16 Pro Desert Titanium 128 GB
- Samsung Galaxy Watch 8 44MM e-Sim LTE Fekete Színben 12 Hó Garancia Bontatlan
- Samsung Galaxy Watch 8 Classic 46MM eSim LTE Fekete Színben 12 Hó Garancia Bontatlan
- PlayStation 5 FAT DIGITAL + kontroller 6 hó garancia, számlával!
- Delta ADP-65VH D 65W töltő eladó
- ASUS TUF A15 FA506 -15,6"FHD 144Hz - Ryzen 5 7535HS - 16GB - 512GB -RTX 3050 - Win11 - 4 év garancia
- Lenovo Tab M10 64GB, Kártyafüggetlen, 1 Év Garanciával
- BESZÁMÍTÁS! Intel Core i7 4790 4 mag 8 szál processzor garanciával hibátlan működéssel
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: Promenade Publishing House Kft.
Város: Budapest