Search results

Hiiiiiiii All Dears: i have three tables as in the attached Picture , How to Know (query )for all employees that is not in this shift. i try : SELECT tblEmploees.EmploeeID, tblShiftEmploDetils.EmploeeNo, tblShiftEmploDetils.ShiftNo, tblEmploees.EmploeeName, (SELECT Dupe.EmploeeID FROM...

Ok thes works good , very thanks . i have another subform ("sub2") in that main form and contains a date (data field) , but its recordsource is a table "tblOrders" (Not a query) , i am added an unbound field in that subfrm like "MONTH([DATEFLD])" , and try that code but not works good . please help

Hiiii all dears I have a Main form (unbound) , contains a combobox "Mycmb" its sourceraw: SELECT Month(Format([OrderDate],'mm yyyy')) AS MyMnthNo, Format([OrderDate],"mmmm yyyy") AS MyMnth FROM tblOrders GROUP BY Month(Format([OrderDate],'mm yyyy')), Format([OrderDate],"mmmm yyyy"); and...

Ok ,and very very thanks for your advise. exactly i want a msg when user change any field (not in new record) exactly after change , or a msg that informs user about some changes in some fields . if this code would be one, but change name of the field that will appear in that msg when use with...

how to build a custom MsgBox function and call it in the event of beforeUpdate (or dirty ) event for every control , while leaving me to decided what is the name of control that will appeared in the msgbox . suppose we have a textbox in the form with name :"txtServName" , when call that custom...

I have a form contains : - Some bound textboxs. - Some bound comboboxs. - some unbound textboxs. - some bound (yes/No) fields. Q: How to alert user , if there are any change in any bound fields by a msg (not in new record)? i want a code to alert user with the changed field name , and gives him...

hiiiiii all dears i have main form and a subform i use a code in the sub form in BeforeInsert event as : Dim frm as Form Set frm = Me.Parent If IsNull(frm.[ID]) Then Cancel = True MsgBox "Create a record in the main form first.", vbExclamation...

no i found this function as the best solution to achieve what I want to do. Function Seperate_Digits(T As String) As String Dim i As Integer Dim C As String Dim Which_Letter As String 'T = Text From Query If Len(T & "") = 0 Then Seperate_Digits = ""...

oh sir this is not my main problem. my main problem was how to extract numbers from a text type field.

what's about this code how we make in case of / like : Positive 1/160 : Function Seperate_Digits(T) 'T = Text From Query For i = 1 To Len(T) 'the ascii number of each number C = Asc(Mid(T, i, 1)) 'ascii numbers we want '46= ...

Positive480.5 if no spaces between Positive and 480.5 this returns 0. must be return 480.5

very thanks this works good . but i try to make a num. axactly after a text without space , returns 0 what's the problem?

40 0.620 in the right and sometimes in the middle

i can't make spaces between texts and numbers in this post. take in consideration there are unknown spaces between texts and numbers.

REACTIVE 1/160 > 100 REACTIVE >650 Positive 482.5 NON REACTIVE 0.620 REACTIVE >500 Negative 1/80 NON REACTIVE 0.240 REACTIVE > 600 NON REACTIVE 0.130 Negative 1/40

all dears hiiiii i have a text field contains myresult filed (a text type). how to extract only numbers ? the spaces is vary (unknown), between texts and numbers.

all dears after some searches for the best audit trail examples , i have found this example but this example works only in main forms (how to make it works in subforms ?). and how to replace the names of edited fields with thier caption in the trail audit field ...

i want if (the diffrence between the current [Orderdate] and the Max. [Orderdate] (the Nearest [OrderDate] before the current [Orderdate] ) for this employee through the last 7 days) less than (the diffrence between the current [Orderdate] and the Min. [Orderdate] (the Nearest...

i want if (the diffrence between the current [Orderdate] and the Max. [Orderdate] (the Nearest [OrderDate] before the current [Orderdate] ) for this employee through the last 7 days) less than than (the diffrence between the current [Orderdate] and the Min. [Orderdate] (the Nearest...

Ok Sir arnelgp . What is the benefit of CDate () function ? can we dispense CDate() function ?