I keep getting the error:

run-time error '13': Type mismatch
while trying to run this code.  I got this directly from the sql view in the
query.  If I run the query, it works fine, but not in a module.  Why??

DoCmd.RunSQL "UPDATE ImportCust SET ImportCust.HTLPNM = " * " WHERE
(((ImportCust.HTLPNM) Is Null));"

I've tried changing the WHERE to = "", but I get the same error.

Please help!
Thanks,
Angi

I think in transferring it to code and wrapping it in quotes, you forgot to
double up the quotes around the asterisk ("*"), so now it looks like you're
trying to multiply one quoted string by another.  Try this:

    DoCmd.RunSQL "UPDATE ImportCust SET ImportCust.HTLPNM = "" * "" WHERE
(((ImportCust.HTLPNM) Is Null));"

Note: the above has spaces around the asterisk, but that may be a mistake;
if so, fix it.
--

Dirk Goldgar
www.datagnostics.com
(to reply via email, remove NOSPAM from address)

Dirk,
Thank you for the tip...I'll try it.  In the meatime, I have yet ANOTHER error!

Again, pasted from sql and works in the query.

Error:  Expected:End of Statement
(highlights "LABOR")

docmd.RunSQL "UPDATE E "& _
            "SET E.[Other Chg Item] = IIf([E]![Component ID]="LABOR" Or
[E]![Component ID]="SUPPLY","Y","N");"

I see why it's doing it, but how do I use the IIf without the "'s?

Thanks,
Angi

Any time you need to include double quotes within a string, you need to
double them:

docmd.RunSQL "UPDATE E "& _
            "SET E.[Other Chg Item] = IIf([E]![Component ID]=""LABOR"" Or
[E]![Component ID]=""SUPPLY"",""Y"",""N"");"

Alternatively, you could try changing the internal double quotes to single
quotes:

docmd.RunSQL "UPDATE E "& _
            "SET E.[Other Chg Item] = IIf([E]![Component ID]='LABOR' Or
[E]![Component ID]='SUPPLY','Y','N');"

HTH

--
Doug Steele, Microsoft Access MVP
http://i.am/DougSteele/

Dirk & Doug,
Thank you both very much for your help!  They both work!

Gratefully,
Angi