c'eri quasi :P

codice:
<%
dim strconn
strconn = "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& server.mappath("testDB.mdb")
set objconn = server.createobject("ADODB.connection")
objconn.open strconn

dim obj, SQL
set obj = new class_createtable
obj.database = "mdb" ' or "mysql"

call obj.clearFields()
call obj.addField("test_id","counter","")
call obj.addField("test_title","varchar","25")
call obj.addField("test_order","byte","")
SQL = obj.createtable("tba_test")

strconn.execute SQL
 
objconn.close
set objconn = Nothing

set obj = nothing
%>
la SQL che hai messo tu era ""...
invece ci devi mettere quello che restituisce la classe