Calulated field 1

[kastaman]

Hi there,

Can I get some help in writing the proper scrirt for the the folllowing requirement:

we would like to have the ability to sort our investigations by date completed:
Ascending, decending and blank (open).

I've set a event proc. on the header for:
click - sort asc.
dbl click - sort dec.

I need a way to sort by open investigation, I thought of creating an unbound control where if the date completed is blank, it'll give a 1 or 0 then I can set the proper sorting.

Please advise on:
Is there a better way to configure my sorting requirements?
Can one provide a script for my control box depending on the date complete field to = either yes or no.

Thanks,

Kastaman

 

[MisterC]

Instead of the click / dbl click events, I would use a frame and some option buttons. With ascending, your open investigations will automatically be at the top. (There's no need to sort "blank" - however you may want to filter your results.)

Sort of like this:

 ---[Sort]---------
O Ascending
O Descending

--------------
A little knowledge is a dangerous thing.

 

[kastaman]

MisterC,

I think that'll be a better option for the user, do I need a specific event proc. for this to work, if so can you assist?

Kastaman

 

[MisterC]

Add a frame to your form header. If you use the Wizard, it will prompt you for the selections you want - just enter "Ascending" and "Descending". You can take the default values for the choices. (i.e. 1 for Ascending and 2 for Descending)

Put the following code in the Frame's AfterUpdate event:

    'Which option is selected?
    'This assumes your frame is called "Frame1"
    Select Case Me.Frame1.Value
    
        Case 1 'Ascending
        Me.OrderBy = "

FieldName

 ASC"
        
        Case 2 'Descending
        Me.OrderBy = "

FieldName

 DESC"
        
    End Select
    
    'Make sure OrderByOn is turned on
    Me.OrderByOn = True

--------------
A little knowledge is a dangerous thing.