Que tal
Agrege una nueva fila a una tabla ya existente, le agrege las variables necesarias y el registro del nuevo valor en la base de datos. Pero algo me falta por que me aparece el error '80020009' .
el error me aparece en la siguiente linea
if isnull(RS_24.fields("valor_tool")) or RS_24.fields("valor_tool")="" then
el codigo completo de la fila es el siguiente:
<%
SQL_24="select * from IPlanta_EWP where ID_tool='24' AND ID_EWP='"&idEWP&"'"
set RS_24 = con.Execute(SQL_24)
lcos1=request.Form("checkbox24")
' response.Write()
if lcos1<>"" AND lcos="" then
lcos="0"
else
if isnull(RS_24.fields("valor_tool")) or RS_24.fields("valor_tool")="" then
lcos=lcos
else
lcos=RS_24.fields("valor_tool")
end if
end if
%>
<select name="lcos" class="input" id="lcos" style="FONT-FAMILY: verdana; font-size:xx-small;" onchange="cambio('tabla.asp','lcos');">
<option><%=lcos%></option>
<option></option>
<option>0</option>
<option>50</option>
<option>100</option>
</select>
<strong> %</strong>
</div></td>
<td class="style4"><div align="center"></div></td>
<td class="style4"><div align="center"></div></td>
<td height="21"><div align="center"></div></td>
<td width="1%" bordercolor="#FFFFFF" bgcolor="#FFFFFF" class="style4"><div align="center"><strong>
<label>
<%
if lcos<>"" then
lcos=lcos
else
lcos=0
end if
%>
<input name="z" type="hidden" class="input" id="z" value="<%=lcos%>" size="4" readonly="true"/>
</label>
</strong></div></td>
<td class="style4"><div align="center">
<label>
<%
if isnull(rs_24.fields("valor_tool")) or rs_24.fields("valor_tool")="" then
%>
<input name="checkbox24" type="checkbox" class="input" value="<%=rs_24.fields("id_tool")%>" onclick="cambio('tabla.asp','checkbox24')"/>
<% else %>
<input name="checkbox24" type="checkbox" class="input" value="<%=rs_24.fields("id_tool")%>" checked="checked" />
<% end if %>
</label>
</div></td>
<td class="style4"><input name="R24 type="text" class="input" id="R24" value="<%=rs_24.fields("responsable")%>" onblur="cambio('tabla.asp','R24')"/></td>
</tr>
Gracias