zxz 18.11.2014 14:42
Predmet:Re: Spajanje arhiviranih baza

Treba provjeriti variable:
ImeBaze
ImeTmpBaze
Prefiks

dali su u njima dobri podaci i ako jesu onda moze biti samo u neskladu polja jedne tabele i druge.

pmiroslav 18.11.2014 14:52
Predmet:Re: Spajanje arhiviranih baza

To bi trebalo biti u redu jer mi SQL(0) i SQL(1) odradi kako treba. Baza i temBaza su iste.

Nije mi jasno u funkciji imama demenzionirano

Dim SQL(1) As String

a onada imam

SQL (0) =
SQL (1) =

dali dalje ide

SQL (2)
SQL (3) to treba posebno dimenzionirati na početku funkcije?

zxz 18.11.2014 16:26
Predmet:Re: Spajanje arhiviranih baza

Hehe pa to i jeste greska sad treba:
Dim SQL(2) As String
Tri memorijske za 3 sql-a

pmiroslav 18.11.2014 17:00
Predmet:Re: Spajanje arhiviranih baza

Citiraj zxz:
Hehe pa to i jeste greska sad treba:
Dim SQL(2) As String
Tri memorijske za 3 sql-a
Pa baš to mi nije jasno. Zagrada iza SQL i u njoj neki broj (1). Molim te da mi to objasniš.
Guglao sam, ali nisam uspio ništa naći.

zxz 18.11.2014 17:59
Predmet:Re: Spajanje arhiviranih baza

Pa to je u svim programskim jezicima isto.
Dimenzionise se var. kao niz.
U zagradi se stavlja broj elemenata niza.
Kod nas je to 3
Broji se i nula uvijek.
U c++ je samo srednja zagrada
Napr.
sting ImeNiza[brojElemenata];
Java isto
Delphi isto

pmiroslav 18.11.2014 18:37
Predmet:Re: Spajanje arhiviranih baza

Ti sa mnom razgovaraš kao da sam ja na tvom nivou poznavanja programskih jezika.
Ja jedino nešto skromno poznajem MS Access VBA, a ništa od ostalog nisam radio. Možda nekad davno kada sami imao Comodore 64 radio sam nešto malo u Basicu

U ovom konkretnom slučaju me zanima slijedeće:
u ovoj temi u postu #46 imamo

Function KreirajTemp()
...
...
Dim ImeFajla As String, SQL(1) As String

i onda dalje u funkciji

SQL(0) = "INSERT INTO tblTransakcije (IDTransakcije, Datum,...itd
DoCmd.RunSQL (SQL(0))

SQL(1) = "INSERT INTO tblUlazIzlaz ( IDTransakcije, Sifra,...itd
DoCmd.RunSQL (SQL(1))

i ovo sve radi OK

U istoj funkciji imamo dio koji mi kreira dvije tablice tblTransakcije i tblUlazIzlaz.
Tu sam dodao dio koda koji mi pravi još dvije tablice tblProdaja i tblProdaja stavke. I to radi OK.

Problem mi se javlja kada pokušavam popuniti prvu od tih tablica

SQL(2) = "INSERT INTO tblProdaja (OrderID, Skladiste, FiskalniBroj,...ITD

Nije mi jasno koji broj treba biti unutar zagrade iza SQL. Zapravo koja je relacija između
Dim SQL(1) AS String i dalje u kodu

SQL(0) = nešto
SQL(1) = nešto

zxz 18.11.2014 22:06
Predmet:Re: Spajanje arhiviranih baza

Moras na vrhu gdje dimenzionise ovu variablu SQL niz prosiriti za 1.
Znaci bit ce
Dim SQL(2) as integer
I sada imas od 0 do 2 3 elementa niza i to:
SQL(0), SQL(1) i SQL(2)

To je bilo u Vb Skoli.
Ukoliko stoji na vrho Option explicit u modulu onda sve variable moramo dimenzionisati.
Var. SQL je dimenzionisana kao niz od 3 elementa i to kao string.

pmiroslav 19.11.2014 08:42
Predmet:Re: Spajanje arhiviranih baza

Davno je bila VB škola pa sam nešto i zaboravio i treba podsjetiti.
U svakom slučaju ovo je pomoglo. Funkcija radi što treba.
Hvala.

zxz 19.11.2014 08:55
Predmet:Re: Spajanje arhiviranih baza

Hehe kao da si se malo bio iznervirao juce pa nisam htio da pristajem na muku.
Citat:
U zagradi se stavlja broj elemenata niza.
Kod nas je to 3
Broji se i nula uvijek.
U c++ je samo srednja zagrada
Napr.
sting ImeNiza[brojElemenata];
Java isto
Delphi isto

Htio sam te samo podsjetiti.

Sto se tice programskih jezika , to se lako prebacuje sa jednog na drugi ako radis ali tesko je nauciti programiranje uopsteno.
Kada imas logiku programiranja i znas sta trazis onda ti samo ostane da u helpu ili na netu nadjes adekvatnu komandu u datom jeziku za to.
Pa i komande su svugdje slicne.
Kazu ovako:
Da bi covjek naucio da programira toliko da napravi neki malo ozbiljniji program treba mu 5 do 6 g. a da bi se prebacio sa jednog programskog jezika na drugi treba nekoliko mjeseci.