By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
424,475 Members | 1,367 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 424,475 IT Pros & Developers. It's quick & easy.

Variable already exist

P: 17
Hello Everyone,

I am developing a software to load data from 2 separate tables. Each time data is loaded, i want to log the max (date/time) of each table into a scheduler table (third table).

I have put this code in an "on click" event. However, each time i click on the button, the data doesnt load like it is supposed to but i get variable already exist error from access. I am using Access for this work.

I need help. Below is my code:
Expand|Select|Wrap|Line Numbers
  1.  
  2. Dim dbs As Database
  3.     Dim qdf As QueryDef
  4.     Dim sql As String
  5.     Dim mytimer As Date
  6.     Dim rcvd_date As Date
  7.     Dim mydate As Date
  8.     Dim icount As Integer
  9.     Dim load_index As Integer
  10.  
  11.  
  12.     Set dbs = CurrentDb
  13.              dbs.Execute "SELECT Max(loadDate) into mydate FROM load_scheduler;"
  14.  
  15.            If DateValue(mydate) = #10/7/1999# Then
  16.                     dbs.Execute "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts;"
  17.                     icount = dbs.RecordsAffected
  18.                     dbs.Execute "select max([date received]) into rcvd_date from contacts;"
  19.                     dbs.Execute "insert into load_scheduler values(rcvd_date, now(), 1);"
  20.  
  21.                 ElseIf DateValue(mydate) > #10/7/1999# Then
  22.                     dbs.Execute "select max([date received]) into rcvd_date from contacts;"
  23.                             If rcvd_date > mydate Then
  24.                                 dbs.Execute "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts where [Date Received] >= mydate;"
  25.                                 dbs.Execute "INSERT into load_scheduler values(rcvd_date, now(), 1);"
  26.                             ElseIf rcvd_date < mydate Then
  27.                                 dbs.Execute "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts where [Date Received] <= mydate;"
  28.                                 dbs.Execute "INSERT into load_scheduler values(rcvd_date, now(), 1);"
  29.                             ElseIf rcvd_date = mydate Then
  30.                                 End
  31.  
  32.                             End If
  33.                 End If
  34.  
  35. End Sub
Jan 31 '08 #1
Share this Question
Share on Google+
31 Replies


epots9
Expert 100+
P: 1,351
Moved to the Access Forums where the resident experts can better assist you.

**Moved from Programming challenges.
Jan 31 '08 #2

MMcCarthy
Expert Mod 10K+
P: 14,534
Are you using ADO or DAO and have you got the appropriate library referenced?
Jan 31 '08 #3

P: 17
i am using DAO. Your response is deeply appreciated.
Jan 31 '08 #4

MMcCarthy
Expert Mod 10K+
P: 14,534
Then change your code as follows:

Expand|Select|Wrap|Line Numbers
  1.  
  2. Dim sql As String
  3. Dim rcvd_date As Date
  4. Dim mydate As Date
  5.  
  6.     DoCmd.RunSQL "SELECT Max(loadDate) into mydate FROM load_scheduler;"
  7.  
  8.     If DateValue(mydate) = #10/7/1999# Then
  9.         DoCmd.RunSQL "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts;"
  10.         DoCmd.RunSQL "select max([date received]) into rcvd_date from contacts;"
  11.         DoCmd.RunSQL "insert into load_scheduler values(rcvd_date, now(), 1);"
  12.     ElseIf DateValue(mydate) > #10/7/1999# Then
  13.         DoCmd.RunSQL "select max([date received]) into rcvd_date from contacts;"
  14.         If rcvd_date > mydate Then
  15.             DoCmd.RunSQL "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts where [Date Received] >= mydate;"
  16.             DoCmd.RunSQL "INSERT into load_scheduler values(rcvd_date, now(), 1);"
  17.         ElseIf rcvd_date < mydate Then
  18.             DoCmd.RunSQL "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts where [Date Received] <= mydate;"
  19.             DoCmd.RunSQL "INSERT into load_scheduler values(rcvd_date, now(), 1);"
  20.         ElseIf rcvd_date = mydate Then
  21.             Exit Sub
  22.         End If
  23.     End If
  24.  
  25. End Sub
Jan 31 '08 #5

P: 17
Thanks a bunch. Now the programs works. However, i get the message "you are about to insert one record into table_name" but the record doesn't show up in the intended table. Instead of one record, it should be inserting 15000 records.

Can you help me locate any errors in my code?

Thanks
Jan 31 '08 #6

missinglinq
Expert 2.5K+
P: 3,532
Mary is much more adept at SQL statements than I am, so I haven't really waded thru all that, but given the error message, I'm going to guess that Access is complaining because you're trying to hijack the Reserved Word SQL by declaring it as a user defined variable in your original code in the line:

Dim sql As String

I'd change it, where ever it appears, to something like strSQL.

Welcome to TheScripts!

Linq ;0)>
Jan 31 '08 #7

P: 17
Thanks for your prompt response. I changed that and still get the same error.

I see where you are coming from. But is seems that all of my select statements are not being executed. The first select statement is selecting about 15000 records to be inserted. So if the code is running properly, then i should get the error message that "You are about to paste 14181 records into a new table".

Your response is deeply appreciated.
Jan 31 '08 #8

MMcCarthy
Expert Mod 10K+
P: 14,534
Thanks for your prompt response. I changed that and still get the same error.

I see where you are coming from. But is seems that all of my select statements are not being executed. The first select statement is selecting about 15000 records to be inserted. So if the code is running properly, then i should get the error message that "You are about to paste 14181 records into a new table".

Your response is deeply appreciated.
Add the following line ..

DoCmd.SetWarnings False

before the code running the SQL statements and reset it at the end of the code as follows ...

DoCmd.SetWarnings True
Jan 31 '08 #9

P: 17
Thanks for the response. The warnings are not the problem. However, It is the whole code that is not working. Individual sql statements work fine but the whole block doesnt seem to help.

Help. Please.
Jan 31 '08 #10

MMcCarthy
Expert Mod 10K+
P: 14,534
Sorry try this ...

Expand|Select|Wrap|Line Numbers
  1.  
  2. Dim sql As String
  3. Dim rcvd_date As Date
  4. Dim mydate As Date
  5.  
  6.       mydate = DMax("[loadDate]","load_scheduler")
  7.  
  8.     If DateValue(mydate) = #10/7/1999# Then
  9.         DoCmd.RunSQL "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts;"
  10.         DoCmd.RunSQL "select max([date received]) into rcvd_date from contacts;"
  11.         DoCmd.RunSQL "insert into load_scheduler values(rcvd_date, now(), 1);"
  12.     ElseIf DateValue(mydate) > #10/7/1999# Then
  13.         DoCmd.RunSQL "select max([date received]) into rcvd_date from contacts;"
  14.         If rcvd_date > mydate Then
  15.             DoCmd.RunSQL "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts where [Date Received] >= mydate;"
  16.             DoCmd.RunSQL "INSERT into load_scheduler values(rcvd_date, now(), 1);"
  17.         ElseIf rcvd_date < mydate Then
  18.             DoCmd.RunSQL "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts where [Date Received] <= mydate;"
  19.             DoCmd.RunSQL "INSERT into load_scheduler values(rcvd_date, now(), 1);"
  20.         ElseIf rcvd_date = mydate Then
  21.             Exit Sub
  22.         End If
  23.     End If
  24.  
  25. End Sub
Jan 31 '08 #11

Expert 5K+
P: 8,435
I have some questions, for all and sundry.
  1. Is SQL really a reserved word?
  2. Isn't it silly to apply the DateValue() function to Date field? And does it work? Perhaps this is producing unexpected results.
  3. What does SELECT ... INTO ... mean? Not familiar with this SQL syntax.
  4. I guess Access/VBA is quite different to the VB6 I'm familiar with. But I'm really confused here about the relationship between the local variables mydate and rcvd_date, and where these names appear in the SQL. Does VBA actually know how to move from one to the other? Is that the answer to question 2?
  5. Is it possible the source of the "1 instead of 15000" problem is a mix-up in date format? Is that hard-coded date intended to be in July or October?
  6. Which particular SQL statement is the problem? You should be able to trace execution and see which is/are executed.


EDIT:Oops! Mary beat me to it, while I was typing (and thinking, which is much slower). I have to say though, the very first thing I would do, just because it bugs me, is change line 19 to a simple Else. :)
Jan 31 '08 #12

MMcCarthy
Expert Mod 10K+
P: 14,534
I have some questions, for all and sundry.

  1. Is SQL really a reserved word?
    • Probably not, but standards should be preserved
  2. Isn't it silly to apply the DateValue() function to Date field? And does it work? Perhaps this is producing unexpected results.
    • could be as I would never normally use it in this way
  3. What does SELECT ... INTO ... mean? Not familiar with this SQL syntax.
    • its JET Engine SQL. It will create a new table and insert the records.
  4. I guess Access/VBA is quite different to the VB6 I'm familiar with. But I'm really confused here about the relationship between the local variables mydate and rcvd_date, and where these names appear in the SQL. Does VBA actually know how to move from one to the other? Is that the answer to question 2?
    • I've just changed the code so mydate is set correctly. Forgot about rcvd_date. I'll do that now.
  5. Is it possible the source of the "1 instead of 15000" problem is a mix-up in date format? Is that hard-coded date intended to be in July or October?
    • it's possible. We'll get the variables set properly first and then see.
Jan 31 '08 #13

MMcCarthy
Expert Mod 10K+
P: 14,534
The following changes the setting of rcvd_date as well.

Expand|Select|Wrap|Line Numbers
  1.  
  2. Dim sql As String
  3. Dim rcvd_date As Date
  4. Dim mydate As Date
  5.  
  6.       mydate = DMax("[loadDate]","load_scheduler")
  7.         rcvd_date = DMAX("[date received]","contacts")
  8.  
  9.     If DateValue(mydate) = #10/7/1999# Then
  10.         DoCmd.RunSQL "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts;"
  11.         DoCmd.RunSQL "insert into load_scheduler values(rcvd_date, now(), 1);"
  12.     ElseIf DateValue(mydate) > #10/7/1999# Then
  13.         If rcvd_date > mydate Then
  14.             DoCmd.RunSQL "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts where [Date Received] >= mydate;"
  15.             DoCmd.RunSQL "INSERT into load_scheduler values(rcvd_date, now(), 1);"
  16.         ElseIf rcvd_date < mydate Then
  17.             DoCmd.RunSQL "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [External Customer], [Customer Contact], [Contact phone], ContactEmail, Complaint, [Specific Product/Service], Investigation, [First response to customer by receiver of comment], [Date Completed or moved to CAPA] )SELECT [Date Received], companyname, 1, [customer name], workphone, emailname, Question, catalognumber, Response, Notes, [date closed]FROM Contacts where [Date Received] <= mydate;"
  18.             DoCmd.RunSQL "INSERT into load_scheduler values(rcvd_date, now(), 1);"
  19.         ElseIf rcvd_date = mydate Then
  20.             Exit Sub
  21.         End If
  22.     End If
  23.  
  24. End Sub
Jan 31 '08 #14

P: 17
Re: Variable already exist
--------------------------------------------------------------------------------

I have some questions, for all and sundry.
Is SQL really a reserved word?
-> It probably is but didnt make much change to my code.

Isn't it silly to apply the DateValue() function to Date field? And does it work?
-> I applied it to a date variable because vba gives you date/time when you declare a variable as date

Perhaps this is producing unexpected results.

What does SELECT ... INTO ... mean? Not familiar with this SQL syntax.
-> Correct me if i am wrong but you can use this sql syntax in MS ACCESS. Declare a variable rather than set the variable to a number, you can select data into the variable for manipulation

I guess Access/VBA is quite different to the VB6 I'm familiar with. But I'm really confused here about the relationship between the local variables mydate and rcvd_date, and where these names appear in the SQL.

Does VBA actually know how to move from one to the other? Is that the answer to question 2?

Is it possible the source of the "1 instead of 15000" problem is a mix-up in date format? Is that hard-coded date intended to be in July or October?
-> I inserted one record into the load_scheduler table so that i could use that data as a basis to compare dates

Which particular SQL statement is the problem? You should be able to trace execution and see which is/are executed
-> I dont know how to trace that in VBA.
Jan 31 '08 #15

P: 17
Thanks.

The program stops on line 10.
the load_scheduler has an autonumber field as the primary key. How do i correct the state on line 10 to make the script run.

DoCmd.RunSQL "insert into load_scheduler (scheduleID, Loaddate, ProcessDate, TblName) values(autonumber, rcvd_date, now(), 1);"

You have been very helpful.
Jan 31 '08 #16

MMcCarthy
Expert Mod 10K+
P: 14,534
Thanks.

The program stops on line 10.
the load_scheduler has an autonumber field as the primary key. How do i correct the state on line 10 to make the script run.

DoCmd.RunSQL "insert into load_scheduler (scheduleID, Loaddate, ProcessDate, TblName) values(autonumber, rcvd_date, now(), 1);"

You have been very helpful.
OK I hadn't even looked at the SQL statements in detail up to now as you said they were working fine.

The INSERT statement is wrong as you have to specify the field names that the values are being inserted into ...

DoCmd.RunSQL "insert into load_scheduler values(rcvd_date, now(), 1);"

should be

DoCmd.RunSQL "insert into load_scheduler (fieldname1, fieldname2, fieldname3) values(rcvd_date, now(), 1);"

Check the other insert statements to make sure they follow this syntax.
[color=#FF0000][/color]
Jan 31 '08 #17

MMcCarthy
Expert Mod 10K+
P: 14,534
OK I hadn't even looked at the SQL statements in detail up to now as you said they were working fine.

The INSERT statement is wrong as you have to specify the field names that the values are being inserted into ...

DoCmd.RunSQL "insert into load_scheduler values(rcvd_date, now(), 1);"

should be

DoCmd.RunSQL "insert into load_scheduler (fieldname1, fieldname2, fieldname3) values(rcvd_date, now(), 1);"

Check the other insert statements to make sure they follow this syntax.
OK just read the edited version. The autonumber will load automatically. The following syntax should work.

DoCmd.RunSQL "insert into load_scheduler (Loaddate, ProcessDate, TblName) values(rcvd_date, now(), 1);"
Jan 31 '08 #18

missinglinq
Expert 2.5K+
P: 3,532
Is SQL really a reserved word?

According to Microsoft KB articles, it is for ACC97-ACC2003!

After changing SQL to something else, are you still getting the "Variable already exists" error?

Linq ;0)>
Feb 1 '08 #19

P: 17
Thanks all. The scripts seems to be working. However, each time the scripts runs, it is loading data it has already loaded. I will have to take a closer look at what is going on. But my frustration for now, is gone.


I think i figured it out. It is loading data it has already loaded because the program is stopping at the "loaddata into load_schedule table." (which is my log table which keeps track of each time the data is loaded).

ie. Line 10. I will modify this line and keep everyone posted.

Thanks again, everyone. I am excited to be a member of this forum.
Feb 1 '08 #20

P: 17
Anytime I run the script, i get error:

"Enter value for rcvd_date". I go and check in the load_schedule table and everything is loaded but for the rcvd_date.

Any ideas?
Feb 1 '08 #21

MMcCarthy
Expert Mod 10K+
P: 14,534
Anytime I run the script, i get error:

"Enter value for rcvd_date". I go and check in the load_schedule table and everything is loaded but for the rcvd_date.

Any ideas?
put this into the immediate window and press Enter

rcvd_date = DMAX("[date received]","contacts")

see what result you get.
Feb 1 '08 #22

P: 17
put this into the immediate window and press Enter

rcvd_date = DMAX("[date received]","contacts")

see what result you get.
I get error "Access set field(s) to Null due to a type conversion failure, and it didnt add records due to .............

I didnt seem to solve the problem.
Feb 1 '08 #23

MMcCarthy
Expert Mod 10K+
P: 14,534
I get error "Access set field(s) to Null due to a type conversion failure, and it didnt add records due to .............

I didnt seem to solve the problem.
Check the data type of the [date received] field in the contacts table. Make sure its a date field and not a text field.
Feb 2 '08 #24

P: 17
It is a date/Time field. This is the line that is giving me problems. When I get into debug mode and roll my mouse over the rcvd_date field, i get the correct value. It is only when the code gets to this line that i have a problems.

DoCmd.RunSQL "INSERT INTO load_scheduler (Loaddate, ProcessDate, TblName) values (rcvd_date, now(), 1);"

The first field in the load_scheduler table is an autonumber field. When i get the error "enter parameter value in rcvd_date", if i chose ok without entering anything in value, all the fields in load_schedule get populated but for the rcvd_date field.

I am in a time crunch right now and desperately need help.
Feb 4 '08 #25

MMcCarthy
Expert Mod 10K+
P: 14,534
It is a date/Time field. This is the line that is giving me problems. When I get into debug mode and roll my mouse over the rcvd_date field, i get the correct value. It is only when the code gets to this line that i have a problems.

DoCmd.RunSQL "INSERT INTO load_scheduler (Loaddate, ProcessDate, TblName) values (rcvd_date, now(), 1);"

The first field in the load_scheduler table is an autonumber field. When i get the error "enter parameter value in rcvd_date", if i chose ok without entering anything in value, all the fields in load_schedule get populated but for the rcvd_date field.

I am in a time crunch right now and desperately need help.
Check that the data type of the Loaddate field is a date time field. Then change your code as follows:

DoCmd.RunSQL "INSERT INTO load_scheduler (Loaddate, ProcessDate, TblName) values (" & rcvd_date & ", now(), 1 );"

rcvd_date has to be outside of the string so the value can be passed to the string.
Feb 4 '08 #26

P: 17
Thanks. It works. However, I only get the time portion of the date and not the date and time. Rcvd_date is a date/time variable.

Thanks for your help again.
Feb 4 '08 #27

MMcCarthy
Expert Mod 10K+
P: 14,534
Thanks. It works. However, I only get the time portion of the date and not the date and time. Rcvd_date is a date/time variable.

Thanks for your help again.
Try this ...

DoCmd.RunSQL "INSERT INTO load_scheduler (Loaddate, ProcessDate, TblName) values (" & Format(rcvd_date, "dd mmm yyyy") & ", now(), 1 );"
Feb 4 '08 #28

P: 17
Try this ...

DoCmd.RunSQL "INSERT INTO load_scheduler (Loaddate, ProcessDate, TblName) values (" & Format(rcvd_date, "dd mmm yyyy") & ", now(), 1 );"



It seems to work fine. However, i can't seem to load data once the data has been loaded the first time. The code stops when i try to load data when

DoCmd.RunSQL "INSERT INTO comptrackdata ( [Date Received From Customer], [Customer Company/Department], [Received by Dept], [External Customer], [Customer Contact], [Contact phone], ContactEmail, [Description of Comment], [Specific Product/Service], Investigation, [Date Completed or moved to CAPA] )SELECT EnteredDate, 'MKT', CustomerName, 1, ContactName, ContactPhone, Contactemail, OtherText, ItemNumber, OtherResolution, Closed FROM tblContact where ((EnteredDate) >= (" & mydate & "));"

I get error missing operator. Could you please take a look a this code and advise if you see any thing wrong with the date comparism
((EnteredDate) >= (" & mydate & "));"

Thanks
Feb 11 '08 #29

MMcCarthy
Expert Mod 10K+
P: 14,534
Firstly, you need a space before the work select. Secondly I would use hash identifiers when entering a date. Try this ...

DoCmd.RunSQL "INSERT INTO comptrackdata ([Date Received From Customer], [Customer Company/Department], [Received by Dept], [External Customer], [Customer Contact], [Contact phone], ContactEmail, [Description of Comment], [Specific Product/Service], Investigation, [Date Completed or moved to CAPA]) SELECT EnteredDate, 'MKT', CustomerName, 1, ContactName, ContactPhone, Contactemail, OtherText, ItemNumber, OtherResolution, Closed FROM tblContact where ((EnteredDate) >= #" & mydate & "#);"
Feb 11 '08 #30

P: 17
Thanks. It adding the # to the date variable helped. Now the query runs without any errors.
Feb 11 '08 #31

MMcCarthy
Expert Mod 10K+
P: 14,534
Thanks. It adding the # to the date variable helped. Now the query runs without any errors.
You're welcome.
Feb 11 '08 #32

Post your reply

Sign in to post your reply or Sign up for a free account.