Search results

Thank for sharing, It does work!!!

I find a way to return row order in query SELECT qrytcount.bqmaso, (select count(bqmaso) from qrytcount as Count where Count.bqmaso<qrytcount.bqmaso)+1 AS [order] FROM qrytcount ORDER BY qrytcount.bqmaso; Late answer! But still help, Tuan, :)

I just use it Private Sub bqmaso_Exit(Cancel As Integer) If Me.NewRecord = True Then If RecordsetClone.RecordCount = 0 Then Me.bqmaso = "000" + "1" Else Me.bqmaso = Right(("000" + CStr(DMax("[bqmaso]", Me.RecordSource) + 1)), 4) End If End If End Sub My best,

Function Scripting() Dim rs As DAO.Recordset Dim ff As String ff = "S:\GMSC\Structure.txt" Open ff For Output As #1 Set rs = CurrentDb.OpenRecordset("tbdDischarges") For x = 0 To rs.Fields.Count - 1 Print #1, rs.Fields(x).Name & vbTab & "-" & rs.Fields(x).Properties("Description")...