bază de date Microsoft Access

Lucrul cu tabele în Microsoft Access poate fi realizat ca un maestru, și prin limbaj de programare. În această parte a cărții descrie dezvoltarea acestei metode.

Vei învăța cum să creați un tabel, verificarea prezenței sale în baza de date, de a crea câmpuri și modifica proprietățile lor folosind VBA.

Poate că ați învățat deja cum să creați un tabel cu expertul, metoda specificată în partea stângă. Acum, să încercăm să-l creeze în mod programatic. Uneori, această metodă este mai preferabilă decât standardul. Ca o masă variabilă fiind creată va folosi numele StrTable = «calculator»

Funcția publică funCreateTable (strTable ca șir) Ca Boolean

dbs Dim Ca baze de date, TDF Ca TableDef

La Eroare GoTo 999 „Asociați tranziția de eroare

funCreateTable = False „rezultat eroare de retur atunci când

Dacă funVerifyTable (strTable) = false Apoi „Verificați tabelul

dbs = appAccess.CurrentDb „Constatăm baza de date

TDF = dbs.CreateTableDef (strTable) „Crearea unui tabel

tdf.Fields.Append tdf.CreateField ( "element". dbLong) „Crearea unui câmp de 1

dbs.TableDefs.Append TDF „adăuga tabele

funCreateFields strTable '<3> a crea un câmp

funCreateTable = true „Rezultatele se întoarce

MsgBox (Err.Description, vbCritical, "Crearea unui tabel") „pentru a informa eroare frumos

Err.Clear () „clar fluxul de erori

Verificați tabelul

Foarte des atunci când se lucrează cu o bază de date care aveți nevoie pentru a verifica disponibilitatea obiectelor bazei de date. În acest exemplu indică un mod de a verifica tabelul bazei de date.

În cazul în care obiectul nu este prezent, apare o eroare și programul șterge fluxul de erori prin revenirea la False.

Funcția publică funVerifyTable (strTable ca șir) Ca Boolean

TDF Dim Ca TableDef

La Eroare GoTo 999 „Asociați tranziția de eroare

funVerifyTable = False „rezultat eroare de retur atunci când

TDF = appAccess.CurrentDb.TableDefs (strTable) „Găsiți obiectul

Dacă (TDF este nimic) = false Apoi funVerifyTable = True „Verificați obiect

TDF = Nimic „distruge variabila

Funcția de ieșire „, ieșiți din program

Crearea de câmpuri de masă

Creați câmpuri cu ajutorul programului este un element important în programarea bazelor de date.

Deoarece depozit și de contabilitate tabele toate domeniile este foarte dificil să se țină seama de cerințele în schimbare de multe ori de contabilitate, desigur, trebuie să includă în programele lor o bază de date schimba versiuni diferite ale unui șablon (metodă se numește replicare). În acest exemplu, tabelul „calculator“ strTable variabilă, a adăugat expresie două noi câmpuri iItog și schimba proprietățile biroului câmp

funCreateFields funcției (strTable ca șir) Ca Boolean

dbs Dim Ca baze de date, TDF Ca TableDef, fld Ca câmp

La Eroare GoTo 999 „Asociați tranziția de eroare

funCreateFields = false „eroare de returnare rezultat atunci când

dbs = appAccess.CurrentDb „Definirea bazei de date

TDF = dbs.TableDefs (strTable) „Găsiți tabelul

TDF „Selectați tabelul pentru modificările

Fields.Append.CreateField ( "Expression". DbText, 75) „Crearea Expression

Fields.Append.CreateField ( „Rezultat“. DbDouble) „Creați un rezultat de câmp

Fld = tdf.Fields ( „produs“) „Modificați proprietățile câmpului«Element»

funChangeProperty (Fld, "Descriere". dbText "nici o expresie în calculator") „Schimbă descrierea

funChangeProperty (Fld, "Format". dbText, "Fixed") „Alocare format fix

funChangeProperty (Fld, "DecimalPlaced". dbByte, 0) „dezactivează zecimale

Fld = Nimic „distruge câmp variabil

TDF = Nimic „distruge tabelul variabilă

funCreateFields = true „Rezultatele se întoarce

Funcția de ieșire „, ieșiți din program

MsgBox (Err.Description, vbCritical, "Crearea unei tabele"), „raportează o eroare

Err.Clear () „clar fluxul de erori

Modificarea proprietăților de masă

Când creați un câmp programatic, unele dintre proprietățile sale, de exemplu, o descriere (Description) nu sunt create în mod automat.

Ai nevoie de a învăța cum să schimbe proprietățile câmpurilor de baze de date, iar în caz de necesitate pentru a le adăuga la baza de date.

Acest exemplu arată cum să modificați valoarea câmpurile bazei de date. Acest program prevede, de asemenea, că în cazul în care proprietatea este lipsă, acesta va fi adăugat la baza de date.

Dezvoltarea pe Microsoft Access

Prețul pentru dezvoltarea Microsoft Access tip de bază de date este determinată de termenii de referință, în care respectiva operațiune de pre-buget. O aplicație este necesar pentru a instala Microsoft Office Access c.

Dezvoltarea unui program pe Windows

În conformitate cu această cerere se referă la un program care nu are nevoie de a începe să instalați software suplimentar. Prețul pentru dezvoltarea de aplicatii desktop pentru Microsoft Windows și este determinată de termenii de referință. În cazul în care lucrarea este format din fraze comune, dezvoltarea merge în etape

dezvoltarea site-ului în ASP.NET

Prețurile pentru dezvoltarea de site-ul web și modulele sale bazate pe tehnologia Microsoft Asp.NET este determinată de complexitatea proiectului. Puteți crea un mini-luare în 2-3 zile
Mai departe spre finalizarea comenzii.

Pentru a primi rapid de știri de pe acest site abona la stiri, sau selectați o comunitate pentru schimbul de informații