Új hozzászólás Aktív témák

• martonx veterán

  #1333

  #1332 dani850430

  2010-12-18 21:27:53

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  martonx

  veterán

  #1332 dani850430

  #1332 dani850430

  Sziasztok!

  VB6.0-t használok. Adatbázisok tárgy keretében irtam egy progit, ami egy access adatbázisból szed ki adatok, és helyez el textboxokban, hogy aztán ezekkel számításokat végezzen a program.(tengely méretező program.) Ez igy néz ki:
  Dim cn As New ADODB.Connection
  Dim Qy As New ADODB.Command
  Dim rs As New ADODB.Recordset
  Dim Ta As New BindingCollection
  Dim Tav As New BindingCollection
  Dim Szija As New BindingCollection
  Dim Tt As New BindingCollection
  Dim Szt As New BindingCollection

  Private Sub Command1_Click()
  cn.Close
  End Sub

  Private Sub Form_Load()
  cn.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0 ;User ID=;Data Source=" + App.Path + "\anyagok.mdb;"
  cn.Open
  Set Qy.ActiveConnection = cn
  Qy.CommandText = "SELECT * FROM tengely"
  rs.CursorLocation = adUseClient
  rs.Open Qy, , adOpenDynamic, adLockBatchOptimistic
  Set DataGrid1.DataSource = rs
  DataGrid1.Refresh
  Set Ta.DataSource = rs
  Ta.Add Form1.Text6, "Text", "Tengely atmero"
  Set Tav.DataSource = rs
  Tav.Add Form1.Text7, "Text", "Tavolsag"
  Set Szija.DataSource = rs
  Szija.Add Form1.Text5, "Text", "Szijtarcsa atmero"
  Set Tt.DataSource = rs
  Tt.Add Form1.Text4, "Text", "Tengely tomeg"
  Set Szt.DataSource = rs
  Szt.Add Form1.Text3, "Text", "Szijtarcsa tomeg"
  End Sub

  Az lenne a kérdésem, hogy működik e dolog visszafele? Arra gondolok, hogy textboxok tartalmát kiirja egy adatbázisba. Mondjuk van 3 textboxom, amikbe a program futása során végzett számítások eredménye van. És ezeket szeretném egy adatbázis megfelelő oszlopaiba beirni. Illetve, ha ez megvan, hogyan tudom elérni, hogy az adatbázis sorait léptesse, illetve, hogy mentse el?

  Előre is köszönöm a segítséget

  Az biztos, hogy működik a dolog visszafelé is, INSERT sql paranccsal tudsz az adatbázisodba adatokat írni.

  Léptetést rs.next-el tudsz csinálni, ha jól sejtem, vagy valami ilyesmivel, sose használtam VB6-ot.

Új hozzászólás Aktív témák