[Resolvido] Dreamweaver CS3 fechando sozinho com paginas asp

alohmann · Outubro 1, 2008

Olá amigos, estou precisando de uma ajuda urgente. Tenho um site que foi todo desenvolvido no dreamweaver MX, há uns 2 anos atrás, em ASP com banco de dados em access. Funciona tudo certinho, os arquivos quando estão online não dão nenhum problema.

Porém, ao tentar abrir os arquivos do site para editá-los no Dreamweaver CS3 (Versão 9.0 Build 3453), o programa dá erro e fecha automático!! Qualquer arquivo em ASP que abro no Dreamweaver CS3 está dando esse erro. A página é carregada, mas ao clicar em cima de qualquer comando em ASP, dá esse erro e fecha o programa.

Por favor, alguém sabe o que pode ser? Alguém já passou por isso????

Segue abaixo o código de uma dessas páginas, para que possam verificar e ver se tem algo que preciso mudar pra que abra no Dreamweaver CS3. Desde já agradeço a ajuda!

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/conAguilar.asp" -->
<%
Dim recIndex__MMColParam
recIndex__MMColParam = "sim"
If (Request("MM_EmptyValue") <> "") Then 
  recIndex__MMColParam = Request("MM_EmptyValue")
End If
%>
<%
Dim recIndex
Dim recIndex_numRows

Set recIndex = Server.CreateObject("ADODB.Recordset")
recIndex.ActiveConnection = MM_conAguilar_STRING
recIndex.Source = "SELECT * FROM livro WHERE destaque = '" + Replace(recIndex__MMColParam, "'", "''") + "' ORDER BY titulo ASC"
recIndex.CursorType = 0
recIndex.CursorLocation = 2
recIndex.LockType = 1
recIndex.Open()

recIndex_numRows = 0
%>
<%
Dim MM_paramName 
%>
<%
' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters

Dim MM_keepNone
Dim MM_keepURL
Dim MM_keepForm
Dim MM_keepBoth

Dim MM_removeList
Dim MM_item
Dim MM_nextItem

' create the list of parameters which should not be maintained
MM_removeList = "&index="
If (MM_paramName <> "") Then
  MM_removeList = MM_removeList & "&" & MM_paramName & "="
End If

MM_keepURL=""
MM_keepForm=""
MM_keepBoth=""
MM_keepNone=""

' add the URL parameters to the MM_keepURL string
For Each MM_item In Request.QueryString
  MM_nextItem = "&" & MM_item & "="
  If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then
	MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item))
  End If
Next

' add the Form variables to the MM_keepForm string
For Each MM_item In Request.Form
  MM_nextItem = "&" & MM_item & "="
  If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then
	MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item))
  End If
Next

' create the Form + URL string and remove the intial '&' from each of the strings
MM_keepBoth = MM_keepURL & MM_keepForm
If (MM_keepBoth <> "") Then 
  MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1)
End If
If (MM_keepURL <> "")  Then
  MM_keepURL  = Right(MM_keepURL, Len(MM_keepURL) - 1)
End If
If (MM_keepForm <> "") Then
  MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1)
End If

' a utility function used for adding additional parameters to these strings
Function MM_joinChar(firstItem)
  If (firstItem <> "") Then
	MM_joinChar = "&"
  Else
	MM_joinChar = ""
  End If
End Function
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>:: Editora Nova Aguilar ::</title>
<script language="javascript" type="text/javascript">
<!--
function validaBusca() {
 if (formBusca.txtBusca.value == "") {
 alert("digite o nome do autor ou o título da obra para busca");
 formBusca.txtBusca.focus();
 return false;
 }
 return true;
 }
 //-->
 
</script>
<style type="text/css">
<!--
@import url("site.css");
.style1 {color: #333333}
.style2 {font-size: 14px; color: #CC0000; font-family: garamond;}
.style4 {font-size: 10px; font-weight: bold; font-family: "Trebuchet MS";}
.style5 {color: #FFFFFF}
-->
</style>
<script src="Scripts/AC_RunActiveContent.js" type="text/javascript"></script>
</head>

<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
	<td height="25" colspan="3" bgcolor="#C87F10"> </td>
  </tr>
  <tr>
	<td colspan="3" background="img_site/barra_superior.jpg" bgcolor="#FFCC66"> </td>
  </tr>
  <tr>
	<td width="28%" valign="top" bgcolor="#004640"><img src="img_site/logo.jpg" width="224" height="99" /></td>
	<td colspan="2" valign="top" bgcolor="#004640"><table width="100%" height="99" border="0" cellpadding="0" cellspacing="0">
	  <tr>
		<td colspan="3"> </td>
		<td width="25%"> </td>
		<td width="5%"> </td>
	  </tr>
	  <tr>
		<td colspan="3"><div align="center" class="style5"><span class="style4">
		  <% =day(date) %>
   de 
  <% = MesAno(Month(date)) %>
   de 
  <% =year(date) %>
		</span></div></td>
		<td colspan="2" align="right" valign="bottom"><form action="busca.asp" method="post" name="formBusca" id="formBusca" onsubmit="return validaBusca();">
		  <div align="left","top">
			<div align="left"><span class="style22">.</span>
			  <input name="txtBusca" type="text" id="txtBusca2" size="15" maxlength="50" />
			  <input name="ok" type="submit" id="ok" value="ok" />
			</div>
		  </div>
		</form></td>
		</tr>
	</table></td>
  </tr>
  <tr>
	<td valign="top"><script type="text/javascript">
AC_FL_RunContent( 'codebase','http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0','width','224','height','350','src','flash/menu_lateral','quality','high','pluginspage','http://www.macromedia.com/go/getflashplayer','movie','flash/menu_lateral' ); //end AC code
</script><noscript><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="224" height="350">
	  <param name="movie" value="flash/menu_lateral.swf" />
	  <param name="quality" value="high" />
	  <embed src="flash/menu_lateral.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="224" height="350"></embed>
	</object></noscript></td>
	<td colspan="2" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
	  <tr>
		<td><div align="right"><img src="img_site/titulos/destaques.jpg" width="300" height="90" /></div></td>
	  </tr>
	</table>
	  <table width="95%" border="0" cellspacing="0" cellpadding="0">
	  <tr>
		<%
n = 1
c = 2
'c, é aqui que você controla o numero de colunas
Do while not RecIndex.Eof%>
		<td width="50%"><table width="100%" border="0" cellspacing="0" cellpadding="0">
		  <tr>
			<td width="42%"><p align="center"><img src="imagens\livros\<%=(recIndex.Fields.Item("foto").Value)%>" width="80" height="118" class="borda_fotos" /></p></td>
				<td width="7%" valign="top"><div align="center"><span class="artista"></span><br />
				<span class="titulo"></span></div></td>
				<td width="51%"><br />
				  <table width="100%" border="0" cellspacing="0" cellpadding="0">
					<tr>
					  <td><span class="titulo"><%=(recIndex.Fields.Item("titulo").Value)%></span></td>
					</tr>
					<tr>
					  <td> </td>
					</tr>
					<tr>
					  <td class="autor"><%=(recIndex.Fields.Item("autor").Value)%></td>
					</tr>
					<tr>
					  <td> </td>
					</tr>
					<tr>
					  <td><span class="style2"><span class="style1">De: R$XXX</span></span><span class="preco"> <br />
						Por: R$ <%= FormatNumber((recIndex.Fields.Item("preco").Value), 2, -2, -2, -2) %></span></td>
					</tr>
				  </table>
				<br /></td>
			  </tr>
		  
		  <tr>
			<td colspan="2"><div align="right"></div></td>
			  <td width="51%"><div align="right"><a href="carrinho.asp?<%= Server.HTMLEncode(MM_keepNone) & MM_joinChar(MM_keepNone) & "codLivro=" & recIndex.Fields.Item("codLivro").Value %>"><img src="img_site/comprar.jpg" width="90" height="28" border="0" /></a></div></td>
		  </tr>
		  </table>
		  <p> </p></td>
		  <td> </td>
		  <%
n = n + 1
recIndex.Movenext
If n > c then
response.write "</tr><tr>"
n = 1
End If
Loop
%>
		</tr>
	  
	  <tr>
		<td colspan="2" class="pontos"> </td>
		</tr>
	</table></td></tr>
  <tr>
	<td> </td>
	<td colspan="2"> </td>
  </tr>
  <tr>
	<td colspan="3" background="img_site/barra_inferior.jpg"> </td>
  </tr>
  <tr>
	<td bgcolor="#004640"> </td>
	<td width="50%" bgcolor="#004640"> </td>
	<td width="22%" bgcolor="#004640"> <div align="center"><a href="email"><img name="al" src="img_site/al.jpg" width="121" height="21" border="0" id="al" alt="" /></a></div></td></tr>
</table>
</body>
</html>
<%
recIndex.Close()
Set recIndex = Nothing
%>

alohmann · Outubro 1, 2008

Pessoal, desinstalei o Dreamweaver e reinstalei tudo de novo, e agora está abrindo normal, graças a Deus! Funcionaram as páginas em asp.

Peço desculpas pelo tópico acabar sendo inútil, mas de qq forma se alguém quiser analisar pra ver se descobre o que poderia estar causando esse erro, além do problema no proprio software, o código fica aí a disposição.

Fica o agradecimento de qq forma.

Entrar

Arquivado

[Resolvido] Dreamweaver CS3 fechando sozinho com paginas asp

Recommended Posts

alohmann 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

alohmann 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Consulta sem duplicação

Modelagem para questionário

Converter jpg para webp

Este projeto é apoiado pelas empresas

Fóruns

Tempo Real

Informação importante