Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Missing Events tab?

0 views
Skip to first unread message

RJV

unread,
Jun 20, 2008, 10:49:01 AM6/20/08
to
Hello,

i'm fairly new at access and i'm still learning, but i've gotten a hold on
the basics and some more advanced stuff as i'm a little educated in
peoplesoft. sorry this may seem trivial but i can't figure it out.

i'm making a data access page in MS Access 2002 and when i want to add
components (such as custom filter dropdowns, etc) i was using the built in
help. i have all my components all set up until the help says "go to onClick
event" for example. but in all my elements properties i no longer have the
event tab that i had when i was making a form.

is it not supposed to be there? or do i have to enter my code elsewhere or
another way?

RJV

unread,
Jun 20, 2008, 11:00:02 AM6/20/08
to
well i've found out how to get to the events, now i have a no dilemma

i need to add a "dataPageComplete" event but the only available events are
"on____"

could i have some help on this please?

thank you,

ryan

PaulD

unread,
Jun 20, 2008, 12:55:36 PM6/20/08
to
My DAPs all have a 'DataPageComplete' event looks something like

<SCRIPT language=vbscript event=DataPageComplete(oEventInfo) for=MSODSC>
<!--
txtCount.innerText = oEventInfo.DataPage.Recordset.RecordCount
If ShowAll = true then
optionactive.checked = false
optionall.checked = true
ShowAll = false
end if
...

Paul D

"RJV" <R...@discussions.microsoft.com> wrote in message
news:E9CDBF95-930D-4595...@microsoft.com...
: well i've found out how to get to the events, now i have a no dilemma

RJV

unread,
Jun 24, 2008, 11:12:01 AM6/24/08
to
so i manuallly typed it in, and i think i had it all added, but when i go to
test the page, all the drop downs are empty, i can't get any options to show
up. i tried using the example in teh access help as a templete, but it
doesn't seem to be working

<SCRIPT language=vbscript>
Dim fInited
fInited = FALSE

Sub OnFilterComboChange()
Dim stWhere

If (divFilter.value <> "" And posFilter.value <> "") Then
stWhere = "Skill Level:" & divFilter.value & " "
stWhere = stWhere & "AND Position:" & posFilter.value

MSODSC.RecordsetDefs.Item("Player Information").ServerFilter = stWhere
End If
End Sub
</SCRIPT>

<SCRIPT language=vbscript event=DataPageComplete(dscei) for=MSODSC>
<!--
If(fInited=FALSE) And (dscei.DataPage.GroupLevel.RecordSource = "Player
Information") Then
fInited = TRUE
divFilter.value = ""
posFilter.value = ""
MSODSC.DataPages (0).Undo
End If
-->
</SCRIPT>

<SCRIPT language=vbscript event=onchange(oEventInfo) for=PosFilter>
<!--
OnFilterComboChange()
-->
</SCRIPT>

<SCRIPT language=vbscript event=onchange(oEventInfo) for=divFilter>
<!--
OnFilterComboChange()
-->
</SCRIPT>


"PaulD" wrote:

> My DAPs all have a 'DataPageComplete' event looks something like
>
> <SCRIPT language=vbscript event=DataPageComplete(oEventInfo) for=MSODSC>
> <!--
> txtCount.innerText = oEventInfo.DataPage.Recordset.RecordCount
> If ShowAll = true then
> optionactive.checked = false
> optionall.checked = true
> ShowAll = false
> end if

> ....
>
> Paul D

0 new messages