The most like cause is that you haven’t included “ADOVBS.INC” or the equavalent META:-
<!--METADATA
TYPE="TypeLib"
NAME="Microsoft ActiveX Data Objects 2.6 Library"
UUID="{00000206-0000-0010-8000-00AA006D2EA4}"
VERSION="2.6"
-->
Hence the adxxxx
constants do not exist. However your primary mistake is not including Option Explicit
at the top your script. This will save you bucket loads of time hunting silly mistakes and typos.
BTW What happens if ATTUserDataID
contained “0; DELETE ATTJournals;” ?
Avoid composing SQL using concatenation like the plague. Search for “ASP SQL Injection” to find examples of using parameterised command objects instead.