Check if specific record exists and....

Check if such a record exists first. Make bRecordExists variable store true if record exists and false in other case.
Add the following code to the end of BeforeAdd event:

hi, i tired this in the AddPage Events area of the MAIN table - before record added:
'** Check if specific record exists ****

dim rsExists

set dal_table=dal.Table("Map")

set rsExists = dal_table.Query("Address='" & values("Address") & "'","")
if (bRecordExists) then

BeforeAdd=false

else

BeforeAdd=true

end if

rsExists.Close : set rsExists = Nothing
I could not add a record:
<<< Record was NOT added >>>
Item cannot be found in the collection corresponding to the requested name or ordinal.
PS. both table are empty by default.

I guess I have to clarify the issue
I am entering the data into the MAIN table (where one of the fields is called Address)
I also automatically insert data into another table (Map) which also has the Address field)
It may so happen that I can again enter same address into the MAIN table when inserting another record, but I do not want to duplicate that address in the Map table.

also if the record in the Map table exists or does not exist NO matter, the MAIN table must add new record as usual.
Please help me to figure the code (events) out?
below is the add page of MAIN table before record added event
'** Check if specific record exists ****

dim rsExists

set dal_table=dal.Table("Map")

set rsExists = dal_table.Query("Address='" & values("Address") & "'","")
if (bRecordExists) then

BeforeAdd=false

else

BeforeAdd=true

end if

rsExists.Close : set rsExists = Nothing
I perfectly know that my code is worng , but i am very new to these please help.
logically :
check if the record exists in the Map table
if exists - do not add record to Map table but add record to MAIN(itself)
if not exist - continue adding record to the Map table

I finally tried this in the Before Record added
'** Check if specific record exists ****

dim bRecordExists

set dal_table2=dal.Table("GoogleMap")

set bRecordExists = dal_table2.Query("Address='" & values("Address") & "'","")
if (bRecordExists) then

BeforeAdd=false

else

BeforeAdd=true

end if

rsExists.Close : set rsExists = Nothing
and got nothing, ASPrunner application did the following:

1. record was added to the main table(only after closing the popu window and refreshing the page)
   
2. there was no rejection to the list page
   
3. the record was not added to the googleMap table
   why?

Here is the code that verifies if such Address exists in GoogleMap table and prevents record from being added if it does.

If you also need to add a record into another table check DAL's Add() function:

http://xlinesoft.com/asprunnerpro/docs/add.htm

It appears as if you are checking the value in the Map table. If it exists, then you do not add the record in the Map table but you do wish to add it to the Main table.
The example below states that if the record exists in the Map table then skip adding a record to Map but still add it to the Main table. If it does not exist, add it to the Map table AND add it to the Main table.
dim bRecordExists

set dal_table2=dal.Table("Map")

set bRecordExists = dal_table2.Query("Address='" & values("Address") & "'","")
if (bRecordExists) then
[color="#ff0000"]else
[color="#ff0000"]dal_table2.Add()

BeforeAdd=true

end if

rsExists.Close : set rsExists = Nothing

1. record was added to the main table(only after closing the popu window and refreshing the page)
   
2. there was no rejection to the list page
   
3. the record was not added to the googleMap table
   why?
   

Thank you Sergey and Greg for your great suggestions,
I have tried your solution as follows:
GoogleMap table: before record added event code:(no problems here)

and

calmonthly table (which is my main table) Before record Added event (at the end, as Sergey previously mentioned):

(theme is the field that is equivalent to address field in GoogleMap table)

and got exactly where i was before:
When I attempt to add record, application does not save the record and does not insert any record in the google Map and alsoI have to click on the

"x" to close add window, then "refresh" to see that record was added to the calmonthly table. googlemap table remains empty even after that "operation"
Sergey, can I post the link to the demo application here?

If these are your real field names then change this line:
dal_table2.Address=values("Address")
to:
dal_table2.Address=values("Theme")

Thanks Greg, it not work either
try this link please admin/admin
http://demo.asprunner.net/mitzialexander2012_gmail_com/CalendarTest/login.asp

I do not see a "Theme" field on the add page.
http://demo.asprunner.net/mitzialexander2012_gmail_com/CalendarTest/calmonthly_add.asp

hi, Greg,
the "theme" has the "address" as its label
the table is organized with theme as a field

however it is used to add actual address.
main table has theme as a field
googlemap has address as address field and correct label.

project has several tables:
calcalendar is the main table, calmonthly is the view of the calcalendar table

googleMap is the additional table where i keep the mapped addresses.
I have tried to add the codes provided to the calmonthly view at the the end of the before add, and i also tried to add same code to the calcalendar table
something does not compute there.

1. if I add the bRecordExists etc... to the calcalendar table - the record is being added to the calcalendar table and is displayed calmonthly view no problems
   
   BUT the googleMap has no records added.
   
2. IfI have adone same thing to the calmonthly view - i get no records added(obviously) to none of the tables

after numerous attempts i got this results:
'working version of adding duplicates to two tables

dim rsExists

set dal_table=dal.Table("GoogleMap")

'set rsExists = dal_table.Query("Address='" & values("Address") & "'","" ) not working

set rsExists = dal_table.Query("Address='Address'","")

if not rsExists.eof then

--rbegin--' if record exists do something--rend--

BeforeAdd = false

else
--rbegin--' if not exist do something else--rend--

dal_table.Address = values("Address")

dal_table.Add()

BeforeAdd = true

end if

rsExists.Close : set rsExists = Nothing
the application adds data to the main table,

adds data to the googlemap table
but
it still duplicates the data in the googlemap table <img src='https://asprunner.com/forums/file.php?topicimage=1&fieldname=reply&id=69240&image=1&table=forumreplies' class='bbc_emoticon' alt=':(' />

i see that there is a line dal_table.Add()
is there a something that would say da_table.DoNoTaDD() ??

Follow up (Solved):
This was the code that worked:
dim rsExists[/size][/font]

set dal_table=dal.Table("GoogleMap")
[color="#222222"]
[color="#222222"][font="arial, sans-serif"][size="2"]BeforeAdd =[color="#ff0000"] true[/size][/color]
[color="#222222"]

dal_table.Address = values("Address")[/size]

dal_table.Add()

BeforeAdd = true

end if

rsExists.Close : set rsExists = Nothing

Thank you dear Greg, it worked <img src='https://asprunner.com/forums/file.php?topicimage=1&fieldname=reply&id=69398&image=1&table=forumreplies' class='bbc_emoticon' alt=':)' />