Search results

Hello Sir/Madam Please help me to deleting duplicate records records from a Table I tried but it deletes all the recordes with the key, i am trying.

I want to find all the missing IDs in a table starting from 1 to the end of the Table. How can i do that and display the missing IDs IDs are Primary and serially numbered. however one missed the seriality in entering.

Hi Sir's Is there any method where a Text Box color can be changed. I.e if Present then BLUE and if Absent then RED

Hello Sir's I have a forn bounded by a Table Master_tbl in which one of the Field in AC_NO i want to find a record from aunbound text box (FINDAC) and the code after event i pu is appended below: but the same is not working Dim rs As DAO.Recordset If Not IsNull(Me![FINDAC]) Then Set rs =...

Hi Sir, How to refresh all tables.

Cnt = DCount("Mob", "QOCCUPATION", "DepartureDate = Me!sfrRoomOccupations.Form!DepartureDate")

Can any one help me with the vba code ,if any to send PDF file through watsup, and what are the requirements.

Is it possible to generate a report, in which first all address will be shown and then the all Name and other details from a single table for exampel it should be like this To add1 add 2 add3 ad4 The details are as follws 1. mr david, team leader 2. mr Robin, head reader etc etc

Actually I want tp print a report under the signature of some officials. But if the officer get transfered to other section of duty, other officer will take charge.

Code is Cnt = Nz(DCount("*", "[INDIVIDUAL_DATA]", "[TXTGROUP] = GROUP_PRACTICAL And [TXTCODE] = COURSE_CODE")) both GROUP_PRACTICAL and COURSE_CODE are text field

Is it possible to delete blank space in a Text Box. For example, I am fetching data using Dlookup Function LC = Nz(DLookup("OFFICE", "OFFICE_CODE", "OF_CODE = 1 AND CHK=TRUE")) MC = Nz(DLookup("OFFICE", "OFFICE_CODE", "OF_CODE = 2 AND CHK=TRUE")) NC = Nz(DLookup("OFFICE", "OFFICE_CODE"...

Hi Sir I habe a table MASTER in which four fields are there Course_Code, Ind_ID, Date_from and Date_To: I want to run a query to append the recorde in table SESSION in which four field s are there: Course Code, Ind_ID and DOT (Date of Training) How can I append recorde for each day of training...

I want to update all records in a tbl of a numeric field AC_NO with AC_NO preceeded by 9 for example if Account No is 8337453 it should be updated to 98337453. What will be the vba code for query

I want to count the no of records in QPENSIONER_NEW TBL WHERE YR IS YEAR AND MN IN NAME OF MONTH BUT I AM GETTING ERROR Me.TXTCASE.value = DCount("REC_ID", "QPENSIONER_NEW", "YR = Forms!SERVICE_FORM!CYEAR " And MN = Forms!SERVICE_FORM!CMONTH)

My qudate query is not running showing error : key violation. Although when i tries to run the query directly is doesnot show any error and it is updating the records. But when i am trying to run it from the form, due to LOCK violation table not updated. my SQL is UPDATE MEMBERS SET...

Hi Sir/Madam I am usimg the forlloing SQL, but the records are not updating. UPDATE MEMBERS SET MEMBERS.EL = [EL]+(DateDiff("d",[FORMS]![EMPLOYEE_LEAVE_MASTER]![TXTFROM],[FORMS]![EMPLOYEE_LEAVE_MASTER]![TXTTO])+1) WHERE ((([FORMS]![EMPLOYEE_LEAVE_MASTER]![TXLV])="EL") AND...

Hello Sir/Madam Is there any method to check if the same value is already taken in the Data base. I mean suppose a person have taken leave from 12-09-23 to 25-09-23. (two Date fields). If some body tries to enter the value for leave from 13-09-23 to 14-09-23 for the same person, it should flash...

INSERT INTO CREDIT_MASTER ( LEAVE_TYPE, CREDIT_DT ) SELECT [FORMS]![LEAVE_CREDIT]![TEL] AS Expr1, [FORMS]![LEAVE_CREDIT]![TDT] AS Expr2 FROM CREDIT_MASTER;

If TXTLV.value = "CML" And txtfrom.value >= TXTDSAN.value Then MsgBox "Commuted Leave can't be presanctioned, Please check!!!!", vbOKOnly + vbCritical, "Hello !! Information incomplete" Me.TXTDSAN.SetFocus Exit Sub End If is there any mistake in code, any value i am putting it flases the...

the code is not working , even no error is there, records gets updated with duplicate date?- Please Help anyone Dim NewDt As Date Dim stLinkCriteria As String NewDt = Me.txtfrom.value stLinkCriteria = "[FROM] = " & NewID If Me.txtfrom = DLookup("[FROM]", "[REPORT_LEAVE]", stLinkCriteria) Then...