Baza de Date cu Privire la Cainii Violenti in Microsoft Access

Imagine preview
(8/10 din 3 voturi)

Acest proiect trateaza Baza de Date cu Privire la Cainii Violenti in Microsoft Access.
Mai jos poate fi vizualizat un extras din document (aprox. 2 pagini).

Arhiva contine 15 fisiere doc, mdb, txt, scc, vbw, vbp, dbf, fpw, frm, frx, log, fpt de 18 pagini (in total).

Profesor indrumator / Prezentat Profesorului: Petrica Iulia, Augustina Maria

Iti recomandam sa te uiti bine pe extras si pe imaginile oferite iar daca este ceea ce-ti trebuie pentru documentarea ta, il poti descarca. Ai nevoie de doar 5 puncte.

Domeniu: Calculatoare

Extras din document

Enuntul temei:

Sa se creeze o baza de date care tine evidenta proprietarilor de câini periculosi din orasul Craiova.Baza de date trebuie sa contina urmatoarele informatii despre proprietari:

-nume;

-initiala;

-prenume;

-adresa;

-cnp;

-statut social;

-rasa de câine;

-numarul de exemplare;

-incidente;

-masuri adoptate;

Date de intrare:

1. Crearea tabelului “Tabel_proprietari” ce contine urmatoarele câmpuri:

- cnp-cheie primara;

- nume;

- initiala;

- prenume;

- adresa;

- statut social;

2. Crearea tabelului “Tabel_câini” ce contine urmatoarele câmpuri:

- nr_crt-cheie primara;

- rasa de câine;

- numarul de exemplare;

- incidente;

- masuri adoptate;

3. Crearea query-ului “Query_câini” ce contine urmatoarele câmpuri:

- nr_crt;

- cnp;

- nume;

- initiala;

- prenume;

- adresa;

- statut social;

- rasa de câine;

- numarul de exemplare;

- incidente;

- masuri adoptate;

Obs:Pentru query-ul “Query_câini” legatura dintre tabelele “Tabel_proprietari” si “Tabel_câini” s-a facut între câmpurile declarate chei primare în tabelele respective adica cnp si nr_crt.

Date de iesire:

- adaugare;

- modificare;

- stergere;

- salvare;

- anulare;

- iesire;

- înapoi;

- cautare;

- ordonare în functie de:-nume;

-nr_exemplare;

Obs:Baza de date este creata în Access cu numele de Câini periculosi.

Obs:Codul pentru datele de iesire este creat în Visual Basic 6.0.

Obs:Câmpul Data1 este un controler care face legatura între baza de date din Access si forma din Visual Basic.

Listingul programului în Visual Basic 6.0:

Private Sub Cauta_Click()

Data1.RecordSource = "select * from q_caini where Nume like '" & txtcauta.Text & "*' "

Data1.Refresh

End Sub

Private Sub OrdNr_exemplare_Click()

Data1.RecordSource = "SELECT * FROM [Tabel_caini]" & _

"ORDER BY [Numar_de_exemplare]"

Data1.Refresh

End Sub

Private Sub Ordnume_Click()

Data1.RecordSource = "SELECT * FROM [Tabel_proprietari]" & _

"ORDER BY [Nume]"

Data1.Refresh

End Sub

Private Sub save_Click()

On Error GoTo eroare

If Text2 = "" Then

MsgBox ("Nu ati completat Codul Numeric Personal!")

End If

If Text3 = "" Then

MsgBox ("Nu ati completat numele!")

End If

If Text4 = "" Then

MsgBox ("Nu ati completat initiala!")

End If

If Text5 = "" Then

MsgBox ("Nu ati completat Prenumele!")

End If

If Text6 = "" Then

MsgBox ("Nu ati completat Adresa!")

End If

If Text7 = "" Then

MsgBox ("Nu ati completat Statutul Social!")

End If

If Text8 = "" Then

MsgBox ("Nu ati completat Rasa cainelui!")

End If

If Text9 = "" Then

MsgBox ("Nu ati completat Nr de exemplare!")

End If

If Text10 = "" Then

MsgBox ("Nu ati completat Incidentele!")

End If

If Text11 = "" Then

MsgBox ("Nu ati completat masurile adoptate!")

End If

Text1.Enabled = False

Text2.Enabled = False

Text3.Enabled = False

Text4.Enabled = False

Text5.Enabled = False

Text6.Enabled = False

Text7.Enabled = False

Text8.Enabled = False

Text9.Enabled = False

Text10.Enabled = False

Fisiere in arhiva (15):

  • Baza de Date cu Privire la Cainii Violenti in Microsoft Access
    • Caini periculosi.mdb
    • config.fpw
    • CONTINUA.FRM
    • CONTINUA.FRX
    • CONTINUA.log
    • FOXUSER.DBF
    • FOXUSER.FPT
    • INTRO.FRM
    • Listare_BD.doc
    • MSSCCPRJ.SCC
    • Proiect-BDvbp.vbp
    • Proiect-BDvbp.vbw
    • Tema-B.D..txt
    • TEMA.FRM
    • TEMA.FRX

Alte informatii

Universitatea din Craiova Facultatea de Automatica,Calculatoare si Electronica