WebSan.Com.Br

fala Renan...
mas como seria isso ?

eu faria uma página default com somente um <frame> chamando a página principal ? e depois os links já ficariam dentro deste frame ? ou teria que fazer um frame para cada página ?

Agora, usando frame não causaria problemas com certos navegadores ? FireFox, Netscape, Opera, etc...

Até porque uma vez estava montando alguns DIVs em uma página, e no Opera (um dos que tenho instalados aqui) não é obdecido os parametros dados pela DIV, deu maior confusão para eu entender o problema, já que no IE funfionava perfeitamente.

Mas como seria, se puder me dar um exemplo prático, fico grato...

*** EDIT ****

Agora tem uma coisa que lendo seu codigo, tem um erro de escrita:
sql = "DELETE FROM Juridico WHERE autonum=" & autonum
Set rs = conObj.Execute(sql1)

Vc fez uma execução inexixtente !!!
Ve tb se corrigindo isso já irá resolver

Pessoal blz...

Seguinte .. estou tentando colocar no meu sistema uma opção pra exluir os cadastros , ma nao esta funcionando... estou fazendo da seguinte maneira ele busca pela Id do Registro como abaixo:

apaga_main.asp?autonum=<%=autonum%>

Sem esqueçer que antes deste link você um:
Set RS = objConn.Execute("SELECT * FROM Juridico WHERE autonum="& Request.QueryString("autonum") &"")
Ou algo do genero, pq não sei se vc está recuperando um resultado do DB ou se está listando todos os cadastros, mas enfim.

Altera esse link para assim:
<a href="apaga_main.asp?Deletar=cadastro&autonum=<%= RS("autonum") %>">Deletar Cadastro</a>

autonum= Request.QueryString("autonum")
sql = "DELETE FROM Juridico WHERE autonum=" & autonum
Set rs = conObj.Execute(sql1)

conObj.Close
Set conObj = nothing
Response.Redirect("apaga_success.asp")

Tente assim:

'1° faz sua conexão com o DB.
If Request.QueryString("Deletar") = "cadastro" Then

autonum = Request.QueryString("autonum")
set rs = objConn.Execute("DELETE FROM Juridico WHERE autonum="& autonum &"")
conObj.Close
Response.Redirect("apaga_success.asp")

Tenta usar estes códigos que citei acima e posta o resultado !

<tr>

<%
'Var Contagem começa = 1

Dim Contagem : Contagem = 1
While Not rs_canais.Eof 
%>

<td valign="top" align="center">
<img src="produtos/<%=rs_canais("impeq")%>" border="0" width="80px" height="80px">
</td>

' Quando ela chegar no 3, ele fecha o <TR> e recomeça a contagem
<% If Contagem = 3 Then %>

</tr>

'Aqui ele recomeça a contagem
<%
Contagem = 0
End If
RS.MoveNext
Contagem = Contagem + 1
Wend
Conn.close
%>

COm este código você irá ordenar suas imagens de 3 em 3... a cada 3 imagens ele pula linha.

Faz um teste ai e posta o resultado !

Cado queira alterar a quantidade de imagens por linha só alterar isso: <% If Contagem = 3 Then %>
Troque o 3 pela quantidade de imagens por linha que irá querer !

Abraços.

Não te entendi direito, mas pq vc não limita seu campo texto, ai vc saberá que não irá passar daquela quantidade !

Agora tb poderia depois de recuperar a largura da imagem colocar alguns IFs para poder liberar uma certa quantidade de caracteres !

Exemplo:

Set objJpeg = Server.CreateObject("Persits.Jpeg")
objJpeg.Open Server.MapPath("PastaDaImagem/Imagem.png")
Altura = objJpeg.OriginalHeight
Largura = objJpeg.OriginalWidth

If Largura <= "400" Then
Texto = "Escolha uma ação ou quantidade de caracteres"
ElseIf Largura > "400" AND Largura <= "800" Then
Texto = "Escolha outra ação ou quantidade de caracteres"
ElseIf......
..........
End If

Se não for nada disso, dá uma explicada mais detalhada sobre sua dúvida !

Abraço.