2. Fórumok
  3. Szoftverfejlesztés
  4. Visual Basic

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

  • #1280 Kafi csendes tag martonx #1279
    Új Válasz #1280
    Ú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
    Privát üzenet küldése

    Kafi

    csendes tag

    válasz martonx #1279 üzenetére

    Szia!
    Dataset-el létrehozom az adat forrását, kapcsolatát. Ez megy.
    Datagridview-t lerakom kiválasztom az adatforrást és szépen be is rakja az access táblázatomat. Ez is megy.
    De nem ezt szeretném elérni, megpróbálom kicsit bővebben kifejteni:
    Programom:
    Egy mdb fájlban tárolom az adatokat. Ezeket előre megszerkesztem és időnként hozzáírok majd Office Access-ben. Van kb. 5 alkatrésztípus ezeknek kb. 8 paramétere (neve, értékek = szám). A programban nem szeretném se szerkeszteni se megjeleníteni is csak a nevét legfeljebb.
    Így gondoltam a programom:
    -Indítás után betöltöm az adatbázist egy "belső" adatbázisba. (azért mert a továbbiakban ebből a belső adatbázisból dolgozom és nem az mdb-ből)
    -Összeválogatom a megfelelő alkatrészkombinációt. Különbözö alkatrészek értékei között matematikai műveletek vannak. Az összeválogatás egy vizuális felületen történik vagy combobox vagy treeview stb.
    -Kinyomtatom pdf-be a végeredményt. Kb.: Név + Alkatrész(1).magasság+Alkatrész(2).magasság*1,5

    Ami nem megy:
    Van: access mdb fájl pl.:
    Alkatrész nev; Magasság; Szélesség
    asztal; 100; 200
    szék; 150, 250

    Van: "belső" adatbázisom:
    Alkatrész(1).Nev: asztal
    Alkatrész(1).Magasság: 100
    Alkatrész(1).Szélesség: 250
    stb.

    Vagyis mdb első sora -> alkatrész(1)-be

    Szeretném induláskor áttölteni az mdb tábláját a saját változóimba és ezt használni utána. (nem megjeleníteni, nem szerkeszteni csak áttölteni)

    Eddig egy megoldással találkoztam ami működik, de ne szép:
    For Next ciklusban végigmenni a táblázat sorain (0->Row-1) és:
    txtAlkatrészNév.DataBindings.Add("Text", AlkatrészTable, "Alkatrész Név")
    Alkatrész(Row).Név = txtAlkatrészNév.Text
    a textbox invisible

    Köszönöm!

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