Centar za edukaciju-BiH

iCentar → Racunari i oprema → Programirannje i baze podataka → Access


Prosiri i skupi Opcije teme
Stranice (2):1,2
 Prikazi prvu neprocitanu poruku

#1 17.08.2021 09:02
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Slike u formu i Report
Dobar dan svima.
Dugo nisam bio aktivan na forumu iako ga redovno pratim.
Imam neku svoju bazu za binis od moje supruge i sada pokušavam nešto doraditi pa sam zapeo.
NaÅ¡ao sam neke primjer za uvoz slika na Forumu i sada ih dorađujem
Radi se o slikama u Formi i Reportu. U primjeru imam frmNalog u kojem se učitavaju slike međutim problem je ograničenje broja slika. A unos bi trebao biti od 1 pa do neograničeno.
Zato sam probao sa
tblProdaja i vezanom tblSlike u koju mogu unositi putanje slika na disku.
Napravio sam frmProdaja i subSlike i tu dolazim do prvog problema sa IDslike.
Meni bi trebalo da kada upisujem podatak u subSlike da mi npr kada je
OrderID = 1 da mi se za IDslike upisuje ključ 1,2,3... itd
OrderID = 2 za IDSlike opet 1,2,3

znači kod svakog novog OrderID IDslike broji od početka.

Hvala unaprijed na svakoj pomoći
Pozdrav
Ovaj post je ureden 1 puta. Posljednja izmjena 18.08.2021 10:47 od strane pmiroslav. ↑  ↓

#2 17.08.2021 20:42
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re:Slike u formu i Report
Evo pogledaj jel to sta si zeleo

Prilozi:
Informacije o tipu datoteke za:rar  ViÅ¡e slika u formi.rar
Preuzimanja:44
Velicina datoteke:55.56 KB

Ovaj post je ureden 1 puta. Posljednja izmjena 17.08.2021 20:42 od strane Gjoreski. ↑  ↓

#3 18.08.2021 07:11
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re:Slike u formu i Report
Ne mogu otvoriti rar arhivu. Nešto nije u redu.
Pozdrav
↑  ↓

#4 18.08.2021 07:33
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re:Slike u formu i Report
Uspio sam raspakirati sa 7-Zip.
To sam trebao. Hvala
Pozdrav
↑  ↓

#5 18.08.2021 11:38
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re:Slike u formu i Report
Na žalost ipak problem.
Kada punim praznu tablicu sve je u redu.
Međutim ako zamijenim sliku na recimo poziciji IDslike = 1 onda se ID promjeni u slijedeći veći broj, a meni bi trebalo da ostane isti kada sam ga jednom upisao

Slicice prilozenih slika:
slika 1.jpg
Tip datoteke:Informacije o tipu datoteke za:jpg jpg
Preuzimanja:36
Velicina datoteke:71.19 KB
Velicina slike: 920 x 462 Pikseli



Prilozi:
Informacije o tipu datoteke za:rar  Primjer 2.rar
Preuzimanja:35
Velicina datoteke:72.17 KB

Pozdrav
↑  ↓

#6 18.08.2021 19:34
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re:Slike u formu i Report
Prije upisa proveris dali vec postoi upisan broj,ako postoi onda novi broj ne upisujes
↑  ↓

#7 19.08.2021 19:52
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re:Slike u formu i Report
If Me!IDSlike = "" Or IsNull(Me!IDSlike) Then

Dim Db As Database
Dim RS As Recordset
Set Db = CurrentDb
Set RS = Db.OpenRecordset("SELECT NZ(MAX(IDSlike),0) + 1 AS Br FROM tblSlike WHERE OrderID=" & OrderID)

Me![IDSlike] = RS.Fields("Br")
RS.Close
Set Db = Nothing

End If
Pozdrav
↑  ↓

#8 19.08.2021 22:58
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re:Slike u formu i Report
If Val(Nz(Me![IDSlike])) = 0 Then Me![IDSlike] = RS.Fields("Br")
Ovaj post je ureden 1 puta. Posljednja izmjena 19.08.2021 23:03 od strane Gjoreski. ↑  ↓

#9 20.08.2021 18:25
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re:Slike u formu i Report
Dalje radim na svojoj bazi i opet problem kojem nikako da nađem uzrok.
U oba primjera na formi imam dugme PRIKAZ koji bi mi trebao otvoriti sliku. Ispod dugmeta je ista procedura

Private Sub Command41_Click()
ShellExecute Me.hwnd, "open", txtSlika1, vbNullString, vbNullString, SW_SHOWMAXIMIZED
End Sub

u jednom primjeru radi, a u drugom mi javlja grešku

Compile error

Molim pomoć

Prilozi:
Informacije o tipu datoteke za:rar  Slika radi.rar
Preuzimanja:35
Velicina datoteke:45.21 KB
Informacije o tipu datoteke za:rar  Slika ne radi.rar
Preuzimanja:32
Velicina datoteke:39.09 KB

Pozdrav
↑  ↓

#10 20.08.2021 22:49
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re:Slike u formu i Report
Dodaj ovo u neki modul:
PreuzmiIzvorni kôd (Visual Basic):
  1. Public Declare Function ShellExecute Lib "Shell32.dll" Alias "ShellExecuteA" _
  2. (ByVal hwnd As Long, _
  3. ByVal lpOperation As String, _
  4. ByVal lpFile As String, _
  5. ByVal lpParameters As String, _
  6. ByVal lpDirectory As String, _
  7. ByVal nShowCmd As Long) As Long
  8. Const SHOWMAXIMIZED = 3
↑  ↓

Stranice (2):1,2

Srodne teme

Ko je online?

Aktivni clanovi:
nema clanova


Kontakt
Sva vremena su GMT +02:00. Trenutno vrijeme: 3: 49 pm.