请问!请问!下面的语法有什么有关问题!

请教!请教!下面的语法有什么问题!!


<input   type= "checkbox "   name= "D_Special "   value= "1 "   <%If   Rs( "D_Special ")=1   Then   Response.Write( "checked ")%> >

有问题吗??修改时为什么无法修改



------解决方案--------------------
问题出现在这一句上：If sSpecial = 1 Then oRs( "D_Special ") = sSpecial