Ir para conteúdo

POWERED BY:

Arquivado

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

razs

[Resolvido] isto e possivel

Por , em ASP Clássico

Recommended Posts

razs    0

razs
Postado

Boas pessoal, eu posso fazer isto??

 

If not rs.EOF and session("user")<> request.form("username") Then 
erro
else
end if

 

esqueçam.....

Compartilhar este post

Link para o post
Compartilhar em outros sites

razs    0

razs
Postado

Sim, foi uma pergunta parva, já esta resolvido..... :S

 

 

e esta tambem mas já agora isto da-me erro, penso que esteja a chama o campo de maneira errada, alguma ideia?

 

if rs.fields("user_status")= 1 then
response.redirect "updatuser.asp?msg=Please update your profile before starting"
else
end if

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

qual o numero de erro que ele gera ?

Compartilhar este post

Link para o post
Compartilhar em outros sites

razs    0

razs
Postado 

Microsoft VBScript runtime error '800a01a8'

Object required: 'rs'

/usercorc/login2.asp, line 23

 

isto realmente é estranho tenho outras situações assim e nao dao erro :s

 

 

Aqui vai o codigo todo

<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title></title>
</head>
<body>
<%@LANGUAGE = VBScript%>
<!--#include file="sqlinjection.asp"-->
<%
Dim user,pass
user1= Request.Form("user1")
pass1= Request.Form("pass1")
If user1= "" OR pass1= "" Then
Response.Redirect("index.asp?erro=Please try again.")
Else
	Dim cn,sql
	Set cn = Server.CreateObject("ADODB.Connection")
	cn.Open "Provider=Microsoft.Jet.Oledb.4.0; Data Source="& Server.MapPath("db/12345678.mdb") &";Persist Security Info=False"
	Set sql = cn.Execute("SELECT * FROM users WHERE username1 LIKE '" & user1& "' AND password1 LIKE '" & pass1& "'")
	If sql.EOF Then
		Response.Redirect("index.asp?erro=Please try again.")
	Else
	Session("user") = Request.Form("user1")

		if rs.fields("user_status")= 1 then
		Response.Redirect("updatuser.asp?msg=Please update your profile before starting")
		else
		Response.Redirect("index.asp")
		end if

	End if

End if
%>

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

Isso geralmente é porque você tentou fechar ou definir a nothing a um objeto que não foi definido.

Compartilhar este post

Link para o post
Compartilhar em outros sites

razs    0

razs
Postado

nao sei :s já dei voltas e voltas e nada, o nome do campo, tabela etc... esta correcto porque ja verifiquei varias vezes..

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