Lo posteamos a la misma hora
El error es por que tienes:
sql11 = "INSERT INTO Mesa1 (TK, subcatagory, Mesa, Cantidad, Valor) VALUES ('" & request("TK") & "', '" & request("subcatagory") & "', " & request("Mesa") & ", " & request("Cantidad") & ", "&rs(4)&")"
Ya no hay un campo en rs que coincida con la posición cinco (0,1,2,3 y 4).
Usa mejor el nombre (Valor):
sql11 = "INSERT INTO Mesa1 (TK, subcatagory, Mesa, Cantidad, Valor) VALUES ('" & request("TK") & "', '" & request("subcatagory") & "', " & request("Mesa") & ", " & request("Cantidad") & ", "&rs("valor")&")"
Saludos