Aktív témák
-
gericooper
aktív tag
válasz
gericooper
#9
üzenetére
hopp!
-
gericooper
aktív tag
válasz
return.value
#8
üzenetére
A #6 ban közölt probléma már nem áll fenn. Lényeg az h az űrlap mindig mutatja az időt, de ennek a dolognak már utánanéztem. Az aktuális probléma a következő:
1 mezős táblába csak számot akarok felvenni a kombóboxszal, úgy h a user bepötyöghet új értéket -ezér megy a dolog notinlist eseményre-, a kód a következő:
---------------------------
Private Sub KombináltLista10_NotInList(NewData As String, Response As Integer)
On Error GoTo Err_KombináltLista10_NotInList
Dim strMsg As String
Dim ctl As Control
Dim strSQL As String
Set ctl = Me.KombináltLista10
If IsNumeric(Me.KombináltLista10) Then
'If strSQL = ''SELECT * from lookup_ktghely WHERE not EXISTS (SELECT * from lookup_ktghely where lookup_ktghely.ktghely_kiv= Me.KombináltLista10 )'' Then
strMsg = NewData & '' nincs a listában. Hozzáadjuk?''
' Prompt user to verify they wish to add new value
If MsgBox(strMsg, vbYesNo) = vbYes Then
' Set Response argument to indicate that data is being added
Response = acDataErrAdded
' Add string in NewData argument to products table
strSQL = ''INSERT INTO lookup_ktghely (ktghely_kiv) SELECT ''' & NewData & '''''
CurrentDb.Execute strSQL, dbFailOnError
Else
' If user chooses Cancel, suppress error message and undo changes
Response = acDataErrContinue
ctl.Undo
End If
End If
Cancel = True
Exit_KombináltLista10_NotInList:
Exit Sub
Err_KombináltLista10_NotInList:
MsgBox Err.Number & '':'' & Err.Description
Resume Exit_KombináltLista10_NotInList
End Sub
----------------------------
szal: a szelektes where not záradékos dolognál akartam azt, h összehasonlítja a kombilista elemét meg a tábla elemeit, ha nincs akkor felnyomja a messagebox-ot h felvegye-e, stb...
csak nem működik
-ezért van itt kikommentezve-
valaki ötlet? köszi -
gericooper
aktív tag
fel
-
gericooper
aktív tag
válasz
return.value
#5
üzenetére
köszi, sql pár embernek muszáj lesz.
namost egy gyors kérdés:
beviteli mezőben megjelenítem a aktuális időt, beállítom neki h. fokusz elvesztésére, ill újra fokuszálásra megint rakja be az aktuálist de nem akarja megcsinálni. milyen cucc kéne ehhez hogy akár fókuszban akár fokuszon kívül mindig az aktuális időt mutassa a mező? -
gericooper
aktív tag
hali
azér accessre gondoltam mert a főnökség nem akar külön szoftver háttérre anyagiakat áldozni eddig úgy néz ki.office xp nek meg része az access+ sql szerver. meg relatíve gyorsan elkészíthető a felhasználói felület.
egyébként meg síma szelektív lekérdezések, alapműveletek.
lehet h válaszoltam is magamnak...
-
gericooper
aktív tag
fel...
-
gericooper
aktív tag
szevasztok
gondolatokat várnék arra vonatkozóan h. a Access +SQL szerver alkalmas v. optimális-e a köv feladathoz:
eleinte kevés később több munkatárs az ország különböző -jellemzően vezetékes internet nélküli pontjain- szerkesztgetné űrlapon az adatbázisát (napi gyakorisággal új adatbázis kb 5-15 rekord) ezt GPRS-sel elküldené mélbe vagy felftpzné távoli gépre onnan
ott acc. project + sql szerver segítségével buherálnánk az adatokat. tehát több tábla érkezne naponta
ha jól láttam a lekérdezések natív Accesben nem oldhatók meg mert egy lekérdezés alkalmával az igénybe vehető táblák száma max 32(acces 2002)
fentiekre várnék reagálásokat.
Aktív témák
- Itt a Galaxy S26 széria: az Ultra fejlődött, a másik kettő alig
- Amlogic S905, S912 processzoros készülékek
- Villanyszerelés
- Luck Dragon: Asszociációs játék. :)
- Formula-1
- Samsung Galaxy A56 - megbízható középszerűség
- OLED TV topic
- Geri Bátyó: Agglegénykonyha különkiadás 2 – Kajás poénok
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- Ilyen olcsó sem volt még egy Apple notebook
- További aktív témák...
- GYÖNYÖRŰ iPhone 14 Pro Max 128GB Deep Purple -1 ÉV GARANCIA - Kártyafüggetlen, MS3791
- Dell Alienware AW2521HFLA 25" 240Hz Gamer Monitor 27% ÁFÁS - 0248BE
- Dell Precision 3571 i7-12700H 32GB 1000GB FHD RTX T600 4GB 1 év teljeskörű garancia
- Apple iPhone 13 Pro Max /128GB / Kártyafüggetlen / 12Hó Garancia / Akku:83%
- Lenovo ThinkPad X1 Carbon Gen 10 - 27% ÁFÁS (0332)
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
-ezért van itt kikommentezve-

