Korak po korak: VB 6, Access, ADO i SQL.

Korak po korak: VB 6, Access, ADO i SQL. 23.11.2003. u 09:32 · pre 279 meseci #1

Korak po korak: VB 6, Access, ADO i SQL.
------------------------------------------------------
Pre nego se upustimo u pojašnjenje teme da navedem koji sistem ja imam kako bi se izbegli bar neki problemi:

- Visual Basic 6 + Service Pack 5 (SP5 potražite na www.microsoft.com/vstudio)
- Access 2000
- Windows 2000 + Service Pack 4
- ADO 2.5, 2.5 Service Pack 2, 2.6, 2.7 (odgovarajući ADO/MDAC skinite sa www.microsoft.com/data)

Sve u svemu, instalirajte Visual Basic 6 i stavite Service Pack 5, instalirajte Access 2000 (ili noviji) kao i ADO 2.5 Service Pack 2 i ne bi trebalo da imate problema sa praćenjem teksta. Savetujem i da pređete na Windows 2000 (Professional ili Server) ili XP Professional.

Da vidimo šta možete ovde da nađete:

1. Pravljenje proste baze podataka u Access-u 2000
1.1. Pravljenje tabele tbl_Korisnici,
1.2. Pravljenje tabele tbl_Tekstovi,
1.3. Povezivanje tabela - PRIMARY i FOREIGN KEY,
1.4. Pravljenje query-ja qry_Korisnici.
1.5. Pravljenje query-ja qry_Tekstovi

2. Osnove SQL-a
2.1. SELECT, (WHERE, ORDER BY)
2.2. COUNT, MAX, MIN,
2.3. GROUP BY, HAVING,
2.4. "Spajanje" podataka iz više tabela: JOIN,
2.5. DELETE,
2.6. UPDATE,
2.7. INSERT.

3. Visual Basic 6 kod za rad sa bazom - ADO 2.5
3.1. Povezivanje sa bazom podataka - connection string,
3.2. Otvaranje konekcije, preuzimanje podataka, zatvaranje konekcije,
3.3. Prikazivanje podataka u DataGrid kontroli,
3.4. Prolazak kroz recordset "ručno",
3.5. Izmena podataka (UPDATE, DELETE, INSERT),
3.6. Slanje podataka nazad u bazu.

[Ovu poruku je menjao degojs dana 24.11.2003. u 03:26 GMT]

Potpis

Commercial-Free !!!

Re: Korak po korak: VB 6, Access, ADO i SQL. 24.11.2003. u 22:53 · pre 278 meseci #2

Bitje ovde> http://es.verat.net/pub/degojs

Blavo za degojs-a!

/edit - degojs:

Dakle, prvi deo uputstva (pravljenje baze u Access-u) nalazi se na http://es.verat.net/pub/degojs/Korak_po_korak_1.zip

Kraća pauza pa nastavljamo sa drugim delom - osnove SQL-a.

Re: Korak po korak: VB 6, Access, ADO i SQL. 09.12.2003. u 23:40 · pre 278 meseci #3

Završio drugi deo, sutra (ili večeras) šaljem Gojku da postavi negde.

Potpis

Commercial-Free !!!

Re: Korak po korak: VB 6, Access, ADO i SQL. 11.12.2003. u 22:05 · pre 278 meseci #4

Dakle drugi deo je ovde

Potpis

Commercial-Free !!!

Re: Korak po korak: VB 6, Access, ADO i SQL. 12.12.2003. u 00:03 · pre 278 meseci #5

Pardon, nisam postavio ceo fajl, pukao upload a ja otišao od kuće. Sad sam uploadovao svih 200k. Ponovite download vi koji ste do sada probali da skinete ovo.

Još jednom bravo za Degojs-a, nadam se da ćemo uskoro imati i onu file arhivu da sve ovo bude integrisano sa forumom (uploadi moderatora, korsnika, itd).

Re: Korak po korak: VB 6, Access, ADO i SQL. 06.01.2004. u 10:12 · pre 277 meseci #6

Treci deo

Potpis

Blue Man Group

Re: Korak po korak: VB 6, Access, ADO i SQL. 14.01.2004. u 12:58 · pre 277 meseci #7

Kako da pokupim sve fajlove koji koristi program sa bazom
i sta je sve potrebno da se instalirala da bi sve radilo na nekom drugom kao
na mom comp-u !!!

Potpis

www.cicevac.com
†StEEwSc†

Re: Korak po korak: VB 6, Access, ADO i SQL. 14.01.2004. u 13:31 · pre 277 meseci #8

Imas na pocetku teme sta moras da imas instalirano (SPovi, ADO verzija). Da bi instalirao na drugom kompu, napravi setup sa PDW ili InstallShieldom ili cim vec hoces. Osim onoga sto prepozna PDW, treba dodati mdb fajl.

Potpis

Blue Man Group

Re: Korak po korak: VB 6, Access, ADO i SQL. 01.02.2004. u 08:48 · pre 276 meseci #9

Probao sam da napravim instalaciju InstallShield-om za moj program, ali nece da mi skupi sve fajlove sto moj program koristi da bi mogao da moj program instaliram na drugom kompjuteru.
Kako da nadjem fajlove koje program koristi i da ih spakujem za slanje na drugi kompjuter ?

Potpis

www.cicevac.com
†StEEwSc†

Re: Korak po korak: VB 6, Access, ADO i SQL. 01.02.2004. u 10:29 · pre 276 meseci #10

Pogledaj u projektu References i Components. Osmi toga, sa Visual Studiom ide i jedno korisno programce koje se zove Dependency Walker, pa pogledaj i to.

Potpis

Blue Man Group

Re: Korak po korak: VB 6, Access, ADO i SQL. 22.10.2005. u 17:57 · pre 255 meseci #11

S obzirom da gorenavedeni linkkovi trenutno nisu u funkciji (i ne znamo da li će biti) tutorijale trenutno možete skinuti sa alternativnih adresa koje možete naći ovde http://www.elitesecurity.org/poruka/924307

Potpis

-Odracuonogakomijedrpiorazmaknicu.
-Ne rxdi mi txstxturx, kxd god hocu dx
ukucxm "x" onx ukucx "x".
-Ko kaaz e da ja neuummem da kuuca
m.
-Piše "Insert disk 3", a jedva sam i ova
dva ugurao u drajv
-Postoje samo dve osobe kojima
verujem, jedna sam ja, a druga nisi ti

Re: Korak po korak: VB 6, Access, ADO i SQL. 11.03.2006. u 12:34 · pre 251 meseci #12

Šta je sa ovim trećim djelom, kod mene ne funkcioniše u dijelu forme 35, javlja grešku pri pokušaju AddNew.

Problem je u dijelu koda vezanom za dugme Action:

Code:

       Case 2 'save
            '-- prepisi podatke iz textboxova u RS
            Call m_UpdateData
            '-- update
            m_adoRS.UpdateBatch adAffectAll
            '-- pozicioniraj se na novi/izmenjeni zapis
            If m_Mode = mdAdd Then
                m_adoRS.MoveLast
                '-- new key is avaliable at this point
                txtField(0).Text = m_adoRS("ID")
            End If
            m_Mode = mdNone
            '-- prikazi dugmice
            m_ShowButtons cmdAction, "110101"
            m_EnableButtons cmdNavigation, "1111"

Kod mene je sporni dio ovaj:

Code:

'-- new key is avaliable at this point
txtField(0).Text = m_adoRS("ID")

Kao da ipak nije "new key avaliable at this point" ili...?

Re: Korak po korak: VB 6, Access, ADO i SQL. 21.07.2006. u 15:16 · pre 246 meseci #13

Mozda je tema vec zastarela ali jako bih voleo da neko ko ima ove tutorijale postavi link ka njima ali da radi :)
Napravio sam aplikaciju u Accessu, pa bih sada da bazu povezem sa VB-om tako da front end baze bude u VB. Poprilican sam novajlija u programiranju ali spreman da ucim.
Valjda nisam jedini zainteresovan?

_{[Ovu poruku je menjao darkog dana 21.07.2006. u 16:45 GMT+1]}

Re: Korak po korak: VB 6, Access, ADO i SQL. 21.07.2006. u 21:43 · pre 246 meseci #14

Dva posta iznad sam ostavio link ka temi na kojoj se nalaze ispravni linkovi (samo ih iskopiraj u adressbar browsera i radiće).

Potpis

-Odracuonogakomijedrpiorazmaknicu.
-Ne rxdi mi txstxturx, kxd god hocu dx
ukucxm "x" onx ukucx "x".
-Ko kaaz e da ja neuummem da kuuca
m.
-Piše "Insert disk 3", a jedva sam i ova
dva ugurao u drajv
-Postoje samo dve osobe kojima
verujem, jedna sam ja, a druga nisi ti

Re: Korak po korak: VB 6, Access, ADO i SQL. 22.07.2006. u 10:37 · pre 246 meseci #15

Juce nisam mogao da otvorim linkove ni kada copiram adresu u browser. Sada radi hvala

Re: Korak po korak: VB 6, Access, ADO i SQL. 24.07.2006. u 01:05 · pre 246 meseci #16

Evo okacio sam ja fajlove kod mene na server, tu bi trebali da stoje bar godinu dana:
http://www.krcko.net/es21/VB6_Access_ADO_SQL/

[edit]
evo sad sam okacio sve fajlove i uz ovu poruku (ovde bi trebalo da stoje dok god gojko ne zezne nesto :p)
[/edit]

_{[Ovu poruku je menjao krckoorascic dana 24.07.2006. u 02:25 GMT+1]}

Potpis

rafforum.rs - Forum Računarskog Fakulteta

ADO StepByStep.zip700.47k

Korak_po_korak_1.zip306.44k

Korak_po_korak-SQL.zip198.23k

Re: Korak po korak: VB 6, Access, ADO i SQL. 29.07.2006. u 13:27 · pre 246 meseci #17

Da li postoji komanda za redjanje brojeva od najmanjeg do najveceg, ali ne kao kod ORDER BY (10,11,123,20,21,250,31,34...)
vec da isti budu poredjani na sledeci nacin:
10,11,20,21,31,34,123,250?

Potpis

www.cicevac.com
†StEEwSc†

Re: Korak po korak: VB 6, Access, ADO i SQL. 29.07.2006. u 13:56 · pre 246 meseci #18

pokusaj sa:

Code:

kveri = "SELECT <kolona> FROM <tabela> ORDER BY CLng(<kolona>)"

Potpis

rafforum.rs - Forum Računarskog Fakulteta

Re: Korak po korak: VB 6, Access, ADO i SQL. 02.08.2006. u 11:26 · pre 246 meseci #19

analizirao sam kod za povezivanje baze (Access) i VBasica,i
koliko sam shvatio nije vodjeno racuna o vrlo bitnoj stvari, tj ako ja vrsim izmjene u aplikaciji
nad jednom tabelom koja sadrzi npr ID_autor,... i sada kada to pokusam da snimim tu izmjenu, dodje
do konflikta ako postoji jos jedna tabela u toj aplikaciji koja sadrzi isti ovaj ID_autor. Tj kako da
to rijesim, kada ja promjenim u jednom tabeli ID_autor, da se on automatski promjeni u svim ostalim
tabelama ako on postoji.
Evo dijela koda iz tog tutorijala u kojem mislim da treba dodati nesto u case2 : Save valjda nesto oko update nije u redu =>

Code:

Private Sub cmdAction_Click(Index As Integer)
    On Error GoTo Proc_Err

    Select Case Index
        Case 0 'add
            'clear fields
            Call m_ClearFields(txtField)
            'otkljucaj kontrole
            Call m_LockControls(txtField, False)
            With m_adoRS
                If Not (.BOF And .EOF) Then
                    'zapamti trenutnu poziciju da bi se vratili
                    'ako korisnik odustane od novog zapisa
                    m_Bookmark = .Bookmark
                End If
                .AddNew
                m_Mode = mdAdd
            End With
            'prikazi dugmice
            m_ShowButtons cmdAction, "001010"
            m_EnableButtons cmdNavigation, "0000"
        Case 1 'edit
            'otkljucaj kontrole
            Call m_LockControls(txtField, False)
            m_Mode = mdEdit
            'prikazi dugmice
            m_ShowButtons cmdAction, "001010"
            m_EnableButtons cmdNavigation, "0000"
        Case 2 'save
            'prepisi podatke iz textboxova u RS
            Call m_UpdateData
            '-- update
            'm_adoRS.UpdateBatch adAffectAll
            m_adoRS.Update

          'pozicioniraj se na novi/izmenjeni zapis
            If m_Mode = mdAdd Then
                m_adoRS.MoveLast
                'new key is avaliable at this point
                txtField(0).Text = m_adoRS("broj_indexa")
            End If
            m_Mode = mdNone
            'prikazi dugmice
            m_ShowButtons cmdAction, "110101"
            m_EnableButtons cmdNavigation, "1111"
        Case 3 'delete
            With m_adoRS
                'brisi zapis
                .Delete
                'pomeri se na sledeci zapis
                .MoveNext
                If .EOF Then .MoveLast
            End With
            'update
            m_adoRS.UpdateBatch adAffectAll
        Case 4 'cancel
            'cancel update
            Call m_LockControls(txtField, True)
            m_adoRS.CancelUpdate
            'pomeri se na zadnju poziciju ako je bilo AddNew
            If m_Bookmark > 0 Then
                m_adoRS.Bookmark = m_Bookmark
            Else
                m_adoRS.MoveFirst
            End If
            m_Mode = mdNone
            '-- prikazi dugmice
            m_ShowButtons cmdAction, "110101"
            m_EnableButtons cmdNavigation, "1111"
        Case 5 'refresh
            m_adoRS.Requery
    End Select

    '-- prikazi tekuci zapis
    If Index > 2 Then m_DisplayRecord

End Sub

[edit]ubuduce koristi code tagove[/edit]

_{[Ovu poruku je menjao krckoorascic dana 02.08.2006. u 15:20 GMT+1]}

Re: Korak po korak: VB 6, Access, ADO i SQL. 27.05.2010. u 16:34 · pre 199 meseci #20

gde mogu pronaci taj "SQL tester"?
Ubih se trazeci na forumu ali nista!

Srodne teme