GuiWeb

Estou finalizando a construção de uma loja virtual e estou sendo sérios problemas com instabilidade do código.. O que ocorrre:
Ontem, 10hrs, foi feita uma modficação no código FRETE = o site funcionou sem problemas
10:50 o dono do site me liga xingando porq não funciona.. verifico realmente PAROU de funcionar sem ter sido feita nenhuma alteração... vejam o código do frete:

if estaos="acc" then e1 = "selected" end if
if estaos="acx" then e2 = "selected" end if
if estaos="alc" then e3 = "selected" end if
if estaos="alx" then e4 = "selected" end if
if estaos="apc" then e5 = "selected" end if
if estaos="apx" then e6 = "selected" end if
if estaos="amc" then e7 = "selected" end if
if estaos="amx" then e8 = "selected" end if
if estaos="spx" then e50 = "selected" end if
%> 
      <tr>
      <td valign="center" align="left" colspan=3>
      <font face="<%=fonte%>" style=font-size:11px;color:000000>
      <strong><%=strLg64%>&nbsp;<strong>
      <select name="frete" style=font-size:10px;font-family:<%=fonte%>; onchange="javascript: document.registro1.submit();">
      <option value=""><%=strLg185%></option> 
      <option value="">--------------------------------------</option>
      <option value="<%=estado_sp%>spx" <%=e50%>>Jundiaí</option>
   <option value="<%=estado_ac%>acc" <%=e1%>>Várzea Paulista</option>
   <option value="<%=estado_ac%>acx" <%=e2%>>Campo Limpo</option>
   <option value="<%=estado_al%>alc" <%=e3%>>Itupeva</option>
   <option value="<%=estado_al%>alx" <%=e4%>>Louveira</option>
   <option value="<%=estado_ap%>apc" <%=e5%>>Vinhedo</option>
   <option value="<%=estado_ap%>apx" <%=e6%>>Cabreúva</option>
   <option value="<%=estado_am%>amc" <%=e7%>>Cajamar</option>
   <option value="<%=estado_am%>amx" <%=e8%>>Itatiba</option>
   </select>
   </font>
   </strong>
   </strong>
   </td>

<%
'Joga na tela o valor 0.00 se o frete for vazio
if intFrete = "0" then
valorfretefim = "0.00"
else
valorfretefim = formatNumber(intFrete,2)
end if
%>
    <td colspan="2" align="right" valign="center"><font face="<%=fonte%>" style=font-size:11px;color:000000><strong><b><%= strLgMoeda & " " & valorfretefim %></b><strong></font></strong></strong></td></tr>

Agora.. isso ocorreu também no mesmo horário com a página administrador.asp e em seguida com a criptografia!!!!!
Estou em pânico..
Vejam o site; www.ciadeartefloral.com.br todas as páginas são www.ciadeartefloral/teste/NOMEDAPÁGINA.asp

Heiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii següinte, tenho q atualizar minha bios pois comprei um hd novo e ela nao reconhece..
Placa mãe Soyo com Chipset SiS 496/497 pelo jeito é uma DX4-5 (nao localizei no site da Soyo)
a bios é Award 4.50
Bom no site da Soyo peguei um arquivo chamado 4sawa53.bin que aparenta ser o q preciso e no site q o nosso fofis passou no tutorial o progragama para atualizar a bios.
Juntei tudo no diskete e coloquei no pc antigo pra atualiza. ai bele pediu pra fazer backup e realizei
Ai eu me ferrei literalmente.. pois não atualio a bios Fico Please Wait por 4 horas travo.. reiniciei e continua com a bios antiga... tentei já várias vezes e não consigo
Quanto ao Win98 to tentando instalar nesse hd mais ele fala q falta memória extended é memória RAM ou espaço (já q a bios não reconheceu quase nad ado hd)?
Grato gente é mtooooooooooo URGENTE, TO EM PANCI..

Pergunta... Estou com um pc aqui onde o HD já era...
o HD é um Quantum 3.5 Series Power REQ: 5/12V 200/210mA
Poooooor ex. se eu pegar um HD Sansung novo de 40GB 7000RPM vai funcionar na placa mãe mesmo sendo antiga? Isto é, existe um HD X LIMITEpara placa mae antiga, ou todo HD é aceito por TODA placa-mãe?? Eu acho qeu sim, mais melhor perguntar antes hehe

Ola, olha eu aqui de novo
Seguinte estou com um outro probleminha, no meu BD cadastro um produto pra uma categoria, se o produto tem mais de uma categoria eu cadastro ele varias vezes cada vem em uma categoria porém por algum motivo na página inicial ele pega várias vezes o produto X e dpois um produto Y!
O código que sorteia isso é:

'Função para chamar os produtos aleatoreamente na vitime inicial
set rs = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok';")
if rs.eof or rs.bof then
rs.close
set rs = nothing
set atualizar = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok';")
if rs.eof or rs.bof then
rs.close
set rs = nothing
set atualizar = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok';")
end if
else
set atualizar = abredb.Execute("UPDATE produtos SET status = 'ok' WHERE idprod = "&rs("idprod")&";")
end if
set rs2 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&";")
if rs2.eof or rs2.bof then
rs2.close
set rs2 = nothing
set atualizar2 = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs2 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&";")
if rs2.eof or rs2.bof then
rs2.close
set rs2 = nothing
set atualizar2 = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs2 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&";")
end if
else
set atualizar2 = abredb.Execute("UPDATE produtos SET status = 'ok' WHERE idprod = "&rs2("idprod")&";")
end if
set rs3 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&" and idprod <> "&rs2("idprod")&";")
if rs3.eof or rs3.bof then
rs3.close
set rs3 = nothing
set atualizar3 = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs3 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&" and idprod <> "&rs2("idprod")&";")
if rs3.eof or rs3.bof then
rs3.close
set rs3 = nothing
set atualizar3 = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs3 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&" and idprod <> "&rs2("idprod")&";")
end if
else
set atualizar3 = abredb.Execute("UPDATE produtos SET status = 'ok' WHERE idprod = "&rs3("idprod")&";")
end if
set rs4 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&" and idprod <> "&rs2("idprod")&" and idprod <> "&rs3("idprod")&";")
if rs4.eof or rs4.bof then
rs4.close
set rs4 = nothing
set atualizar4 = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs4 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&" and idprod <> "&rs2("idprod")&" and idprod <> "&rs3("idprod")&";")
if rs4.eof or rs4.bof then
rs4.close
set rs4 = nothing
set atualizar4 = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs4 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> '"&rs("idprod")&"' and idprod <> '"&rs2("idprod")&"' and idprod <> '"&rs3("idprod")&"';")
end if
else
set atualizar4 = abredb.Execute("UPDATE produtos SET status = 'ok' WHERE idprod = "&rs4("idprod")&";")
end if
set rs5 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&" and idprod <> "&rs2("idprod")&" and idprod <> "&rs3("idprod")&" and idprod <> "&rs4("idprod")&";")
if rs5.eof or rs5.bof then
rs5.close
set rs5 = nothing
set atualizar5 = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs5 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&" and idprod <> "&rs2("idprod")&" and idprod <> "&rs3("idprod")&" and idprod <> "&rs4("idprod")&";")
if rs5.eof or rs5.bof then
rs5.close
set rs5 = nothing
set atualizar5 = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs5 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&" and idprod <> "&rs2("idprod")&" and idprod <> "&rs3("idprod")&" and idprod <> "&rs4("idprod")&";")
end if
else
set atualizar5 = abredb.Execute("UPDATE produtos SET status = 'ok' WHERE idprod = "&rs5("idprod")&";")
end if
set rs6 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs("idprod")&" and idprod <> "&rs2("idprod")&" and idprod <> "&rs3("idprod")&" and idprod <> "&rs4("idprod")&" and idprod <> "&rs5("idprod")&";")
if rs6.eof or rs6.bof then
rs6.close
set rs6 = nothing
set atualizar6 = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs6 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs2("idprod")&" and idprod <> "&rs("idprod")&" and idprod <> "&rs3("idprod")&" and idprod <> "&rs4("idprod")&" and idprod <> "&rs5("idprod")&";")
if rs6.eof or rs6.bof then
rs6.close
set rs6 = nothing
set atualizar6 = abredb.Execute("UPDATE produtos SET status = 'nao' WHERE status = 'ok';")
set rs6 = abredb.execute("SELECT * FROM produtos WHERE status <> 'ok' and idprod <> "&rs2("idprod")&" and idprod <> "&rs("idprod")&" and idprod <> "&rs3("idprod")&" and idprod <> "&rs4("idprod")&" and idprod <> "&rs5("idprod")&";")
end if
else
set atualizar6 = abredb.Execute("UPDATE produtos SET status = 'ok' WHERE idprod = "&rs6("idprod")&";")
end if

intProdID1 = rs("idprod")
intProdID2 = rs2("idprod")
intProdID3 = rs3("idprod")
intProdID4 = rs4("idprod")
intProdID5 = rs5("idprod")
intProdID6 = rs6("idprod")

Que eu faço pra ele pegar produtos variados da tabela Acess? pois existem muitos produtos então repetirá muuuuuito raramente

Hellow estou montando uma loja virtual e estou tendo estre problema com alguns produtos no cadastro... como cadastrar pelo administrador dá pane, mudo direto pelo BD, porém dá o seguinte erro na hora q peço pra ver mais detalhes:
N°. do erro:13
Descrição do erro:Type mismatch

Caraca... não sei o q fazer, tirei até acentos mais nao foi... quem puder ver: www.ciadeartefloral.com.br/teste o produto Guiweb fununcia... mais o debaixo não!!!!!!!!
é mto urgente entao..
vlwwwwwwwwwwwwww