Apostrophe Problem 2

[Kim Richardson]

Here is my code...

Set MyDb1=Server.CreateObject("ASPdb.Pro&#34
MyDb1.dbMDB = Server.MapPath("../Level1/_database/TASKS.mdb&#34
MyDb1.dbColor = "4,auto"
MyDb1.dbMode = "dual-horiz"
MyDb1.dbGridTableTag = "BORDER=6 cellspacing=3 cellpadding=3"
MyDb1.dbSQL = "Select * FROM [tblTASKS] ORDER BY TaskNo"
MyDb1.dbImageDir="../level1/images/"
MyDb1.dbNavigationItem="filter, add, update, delete"
MyDb1.dbNavigationIcon="std"
MyDb1.dbNavigation="top"
MyDb1.dbUnit=46
MyDb1.dbStatusBar="false"
MyDb1.dbEditParams = "TableName=tblTASKS,BookMarkFlds=TaskNo,TableT ag=Border=2"
MyDb1.dbFormDisplayFlds="0,1,2,3,4,5,6,7,8,9,1 0,12,23"
MyDb1.dbMemoTextSize = -1
MyDb1.dbSelectBox="7,Task Number + Brief Desc, Select Task then Click Here; #TaskNo# #TaskDesc#"
MyDb1.dbGridTableTag="Border=1"
MyDb1.dbFormTableTag="Border=1"
MyDb1.dbGridInc=-1
MyDb1.dbEditFlds = "1,2,3,4,5,6,7,8,9,10"
MyDb1.dbEditUpdateROFlds = "12,23"

nmap = &#34;0, <font FACE=&#39;Arial&#39; SIZE=2>Automatic Task Id</font>,;&#34;
nmap = nmap & &#34;1, <font FACE=&#39;Arial&#39; SIZE=2>Type of Task</font>,;&#34;
nmap = nmap & &#34;2, <font FACE=&#39;Arial&#39; SIZE=2>Brief Task Description</font>,;&#34;
nmap = nmap & &#34;3, <font FACE=&#39;Arial&#39; SIZE=2>Detailed Task Description</font>,;&#34;
nmap = nmap & &#34;4, <font FACE=&#39;Arial&#39; SIZE=2>Requested By</font>,;&#34;
nmap = nmap & &#34;5, <font FACE=&#39;Arial&#39; SIZE=2>Dt Requested (MM/DD/YY)</font>,;&#34;
nmap = nmap & &#34;6, <font FACE=&#39;Arial&#39; SIZE=2>Dt Needed (MM/DD/YY)</font>,;&#34;
nmap = nmap & &#34;7, <font FACE=&#39;Arial&#39; SIZE=2>Est Cost</font>,;&#34;
nmap = nmap & &#34;8, <font FACE=&#39;Arial&#39; SIZE=2>Authorized By</font>,;&#34;
nmap = nmap & &#34;9, <font FACE=&#39;Arial&#39; SIZE=2>Task Number</font>,;&#34;
nmap = nmap & &#34;10, <font FACE=&#39;Arial&#39; SIZE=2>Order of Completion</font>,;&#34;
nmap = nmap & &#34;12, <font FACE=&#39;Arial&#39; SIZE=2>Assigned To</font>,;&#34;
nmap = nmap & &#34;23, <font FACE=&#39;Arial&#39; SIZE=2>Item Completed</font>,;&#34;
MyDb1.dbNameMap = nmap

mcell = &#34;0, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue><B>#TaskId#</B></font>;&#34;
mcell = mcell & &#34;1, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue><B>#TaskType#</B></font>;&#34;
mcell = mcell & &#34;2, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue><B>#TaskDesc#</B></font>;&#34;
mcell = mcell & &#34;3, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue>#Detail#</font>;&#34;
mcell = mcell & &#34;4, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue>#ReqBy#</font>;&#34;
mcell = mcell & &#34;5, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue>#DtReq#</font>;&#34;
mcell = mcell & &#34;6, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue>#DtNeeded#</font>;&#34;
mcell = mcell & &#34;7, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue>format=[currency]</font>;&#34;
mcell = mcell & &#34;8, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue>#AuthBy#</B></font>;&#34;
mcell = mcell & &#34;9, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue>#TaskNo#</font>;&#34;
mcell = mcell & &#34;10, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue>#TaskOrd#</font>;&#34;
mcell = mcell & &#34;12, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue>#AssignTo#</font>;&#34;
mcell = mcell & &#34;23, Align=left, <font FACE=&#39;Arial&#39; SIZE=2 COLOR=Blue>#ItemComp#</font>;&#34;
MyDb1.dbMagicCell = mcell

FILT = &#34;TaskType,,tblTasks,TaskType;&#34; &_
&#34;ReqBy,,tblTasks,ReqBy;&#34; &_
&#34;DtNeeded,,tblTasks,DtNeeded;&#34; &_
&#34;AuthBy,,tblTasks,AuthBy;&#34; &_
&#34;TaskNo,,tblTasks,TaskNo;&#34; &_
&#34;TaskOrd,,tblTasks,TaskOrd;&#34; &_
&#34;AssignTo,,tblTasks,AssignTo;&#34;
MyDb1.dbFilterDropFlds = FILT

MyDb1.dbFilterFlds = &#34;1,4,6,8,9,10,12&#34; & _
&#34;Heading=<font SIZE=2 COLOR=blue>Please Enter Your Search Criteria.<br>&#34; & _
&#34;For Example: Choose &#39;NONE&#39; from the Task Number Drop Down List&#34; & _
&#34;</font><br> <br>, Style=Simple&#34;
MyDb1.dbFilterParams = &#34;TableTag=Border=3, ApplyButtonText=Press Here To Submit Search!&#34;
MyDb1.ASPdbPro

Here is the table info from access...

Table: tblTasks
Columns
Name Type Size
TaskID Number (Long) 4
TaskType Text 12
TaskDesc Text 30
Detail Memo -
ReqBy Text 30
DtReq Date/Time 8
DtNeeded Date/Time 8
EstCost Currency 8
AuthBy Text 10
TaskNo Text 12
TaskOrd Number (Integer) 2
TaskStep Number (Integer) 2
AssignTo Text 50
StartDt Date/Time 8
EstCompDt Date/Time 8
CompDt Date/Time 8
EstTime Number (Byte) 1
KillTime Number (Integer) 2
NewEst Number (Byte) 1
ActTime Number (Byte) 1
ActCost Currency 8
BillDueDt Date/Time 8
PeriodDue Date/Time 8
ItemComp Text 3

I am still getting this error when I put an &#39;s data entered into the field named TaskType.

Any ideas? If I take the &#39; out, it works fine.