Új hozzászólás Aktív témák

• #915 Snoop-y veterán gyga #914

  Új Válasz 2014-01-16 00:02:01 #915

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Snoop-y

  veterán

  válasz gyga #914 üzenetére

  En csak siman kirakom a formra mindig a datumot + ora perc. Mikor kinyomtatom az aktualis allas mindig rajta is van.

• #912 Snoop-y veterán gyga #911

  Új Válasz 2014-01-13 10:25:34 #912

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Snoop-y

  veterán

  válasz gyga #911 üzenetére

  Ha elfogadsz egy javaslatot akkor az adatbazist egy formon keresztul kezeled majd csak es kizarolagvalamint a formon tiltsd le a rekordok torlesenek lehetoseget.

  Ha lehetoseged van ra es cegen belul van SharePoint akkor ezt bombabiztosra meg tudod ugy csinalni, hogy az adatbazist Sp listakent tarolod es csak contribute - Read - Add jogokat adsz ra. Ekkor nem tudnak sem torolni sem atirni rekordokat meg akkor sem ha az Access db reszt valami scriptkiddie szejjelbombazza. ( mert kis guglizas utan mindet szet lehet meg ha a fejed tetejere allsz is )

  Udv: Snoopy

• #910 Mutt senior tag gyga #908

  Új Válasz 2014-01-10 23:31:04 #910

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Mutt

  senior tag

  válasz gyga #908 üzenetére

  Hello,

  A számlaazonosítod egy számláló legyen aminek a formátuma: "PT/"0000000

  

  Ha már van egy egyedi számsorod (Szám mező a Számla táblában), akkor ez a függvény működik lekérdezésekben:
  "PT/" & String(7-Len([Számla]![Szám]);"0") & [Számla]![Szám]

  üdv

• #909 Snoop-y veterán gyga #908

  Új Válasz 2014-01-10 16:12:12 #909

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Snoop-y

  veterán

  válasz gyga #908 üzenetére

  Elso kerdes:

  Fogsz torolni a tablabol?

  Az baj hogy nem 0000001 lesz hanem mondjuk PT/1?

  concatenate-el a siman megoldhato

  Letrehozol egy oszlopot a tablaban aminek a neve PT ( default valu-kent megadod neki ezt: PT/ )
  Letrehozol egy kalkulalt mezot( text ) a kovetkezo expression-el:
  [PT] & [ID]

  Es keszen is vagy mert a kalkulalt mezodnek lesz egy erteke ami automatikusan novekszik ( PT/1 PT/2 etc )

  vagy van egy bonyolultabb mod ha ragaszkodsz a bazi hosszu 00000001 es sorszamhoz de ahhoz VBA-t kell futtatnod.

  Udv: Snoopy

• #899 gyga senior tag gyga #898

  Új Válasz 2013-11-30 19:41:49 #899

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  gyga

  senior tag

  válasz gyga #898 üzenetére

  Ok az előző kérdés megoldva. Szeretek magammal beszélgetni.

• #823 Mutt senior tag gyga #822

  Új Válasz 2012-11-30 13:01:05 #823

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Mutt

  senior tag

  válasz gyga #822 üzenetére

  Hello,

  Feltételezem hogy van egy tábla (tblData), ahova kell mentened az űrlapon lévő dolgokat (amelyek legyen vInput1, vInput2, stb.). A gomb neve meg bAdd. A lekérdezés pedig "Lekérdezés"

  VBA kódban vmi hasonló kell neked, de ezen még finomítanod kell:

  Private Sub bAdd_Click()
  Dim uSQL As String
  
  DoCmd.SetWarnings False
  
  'adatok mentése kezdet
  If Me.vInput1 <> "" and Me.vInput2 <> "" Then
  uSQL = "INSERT INTO tblData VALUES ("
  uSQL = uSQL & Me.vInput1 & ",'"
  uSQL = uSQL & Me.vInput2 & "')"
  CurrentDb.Execute uSQL
  Else
  Msgbox "Nincs adat megadva"
  End If
  'adatok mentése vég
  
  'adatok kiürítése kezdet
  Me.vInput1 = ""
  Me.vInput2 = ""
  DoCmd.GoToControl Me.vInput1 'első beviteli mezőre ugrás
  'adatok kiürítése vég
  
  'lekérdezés futtatása kezdet
  DoCmd.OpenQuery "Lekérdezés" 'ha látni akarod az eredményét
  CurrentDB.Execute "Lekérdezés" 'ha nem akarod látni, csak lefuttatni
  'lekérdezés futtatása vég
  
  DoCmd.SetWarnings True
  
  End Sub

  üdv

Új hozzászólás Aktív témák