Search results

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 ?

Sir :arnelgp the code that you write gives me sometimes minus days results , and sometimes msg appears where there are more than 7 days before ( last Employee OrderDate ) . in the attached file (in the previous post) , try to insert any employee in 01/May/2016 (as the first order For this...

if user try to enter an order with orderdate befor the last orderdate for an emploee. please see to this attached file and see for that code :

very thanks mr arnelgp . but i don't want to use Date() (Today date) to compare , i want to use comparision between last orderdate for last Order for this emploee and the OrderDate for the current Order For this Emploee. Example : OrderID= 20120 and OrderDate= 15/ April / 2016 and emploeeID =...

Hiii all i have a MainFrm based on OrdersTbl that contains : -OrderID -OrderDate -EmploeeID every emploee may have more than one order , in the mainFrm (EmploeeID Before Update event), if there are previous Order in the last seven days for this emploee, an alert massage like: "There are an...

ok this attached file without zip.

hiiii all i have a combobox in my subfrm, i want to hiden the selected test from the combobox rowsource in the next record. i used subsquery with "Not Exisits" statement as a rowsource for the combobox. this works good when the default view of subform "data-sheet". but for some reasons i need...

ooooooooh thanks i try this , it works good: Dim strFolderYear As String Dim strFolderMonth As String Dim myFileNx As String Dim lngPK As Long 'change data type if yours is different 'set variable to current record ID lngPK = Me.OrderID Me.Requery 'return form to original record With...

hiiiiiii all i have report need to save it by creating Yearly folders and monthly subfolders. i try to use this code : Private Sub apdfNew1_Click() Dim strFolderYear As String Dim strFolderMonth As String Dim myFileNx As String Dim lngPK As Long 'change data type if yours is different 'set...