Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Davi Mystical

Microsoft OLE DB Provider for SQL Server error

Por , em ASP Clássico

Recommended Posts

Davi Mystical    0

Davi Mystical
Postado

Galera, estou com um erro na área de acesso à administração de um site... Vejam o erro:

 

Microsoft OLE DB Provider for SQL Server error '80040e14'

 

Incorrect syntax near the keyword 'order'.

 

/desenv/administracao_painel.asp, line 74

 

Se puderem ajudar, agradeço!

 

Vlw! http://forum.imasters.com.br/public/style_emoticons/default/clap.gif

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

qual a linah do erro?

Compartilhar este post

Link para o post
Compartilhar em outros sites

Davi Mystical    0

Davi Mystical
Postado

segue o código completo:

 

<%@ language=vbscript %>

<!--#include file="inc/adovbs.inc"-->
<!--#include file="inc/connection.inc"-->
<!--#include file="inc/pagination.inc"-->
<!--#include file="inc/crypt.asp"-->
<!--#include file="inc/functions.asp"-->

<% Response.Buffer = True 
  
   
   Dim oConn  
   Dim rsData
   Dim intTotalPages
   Dim intNumPerPage
   Dim intCurrentPage
   Dim intNumber
   Dim intPage
   Dim strQuery
   Dim intCount
   Dim strScriptName
   Dim intNum
   Dim strBgColor
   Dim i
	 
   Set oConn  = Server.CreateObject("ADODB.Connection")
   Set rsData = Server.CreateObject("ADODB.Recordset")	
	 
   strConn = Decrypt(CStr(strConn))  
  
   oConn.Open strConn
   
%>   

<html>
<head>

<title>.: RH Ser Humano - Área de Administração :.</title>

<link href="css/grid_style.css" rel="stylesheet" type="text/css">

</head>
<body  topmargin="20">

<div align="center">
	<table width=75% border=0 cellspacing=1 cellpadding=1 >
		<tr>
			<td colspan="2" class="font2">Painel de Controle</td>
		</tr>
		<tr>
			<td colspan="2"><hr color="#2E6AB1" noshade size=1></td>
		</tr>
		<tr valign=middle>		
			
			<td align="center"><img src="images/administrador.jpg"></td>
			
			<td valign="middle" height="30" class="font2"><u>Últimas Tarefas Executadas</u><p>
			  
			   <table border="0" cellspacing="0" width="100%">			   

				 <%
				  
				   strQuery = ""
 					 strQuery = strQuery & "select m.titulo,"
 					 strQuery = strQuery & "	   m.id_menu,"
 					 strQuery = strQuery & "	   m.url,"
 					 strQuery = strQuery & "	   ue.dat_acesso"
					 strQuery = strQuery & "  from menus m,"
					 strQuery = strQuery & "	   usuario_eventos ue"
					 strQuery = strQuery & " where m.id_menu	 = ue.id_menu"
					 strQuery = strQuery & "   and ue.id_usuario = " & Session("id_usuario")
					 strQuery = strQuery & "  order by dat_acesso desc"
							
 					 rsData.Open strQuery, oConn, adOpenKeyset, adLockReadOnly
						  
					 Do While Not rsData.EOF
					   
					   i = i + 1
					   
					   If i > 5 Then
						  Exit Do
					   End If   
				  %> 
						<tr>
						   <td><a class="font3" href="<%=rsData.Fields("url")%>?menu=<%=rsData.Fields("id_menu")%>"><b><%=rsData.Fields("titulo")%></b></a></td>
						</tr>								
						<tr>
						   <td class="font4" align="left" valign="top"><i><%=FormatFromSQL(rsData.Fields("dat_acesso"), True)%></i></td>
						</tr>	
						<tr>
						   <td height="10"></td>
						</tr>																
						
				  <%  rsData.MoveNext
				  
					Loop
					
					rsData.Close
					Set rsData = Nothing	  
				 %> 
				 
			   </table>
			   
			</td>
		</tr>	
	</table>
</div>

<% oConn.Close
   Set oConn = Nothing
%>   

</body>
</html>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

Mas qual a linha do erro?

Compartilhar este post

Link para o post
Compartilhar em outros sites

jrcardozo    4

jrcardozo
Postado

possivelmente porque você juntou as tabelas da forma errada, deve fazer usando inner join. verifique se não há o mesmo nome de coluna do order by nas duas tabelas

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito