Ir para conteúdo

POWERED BY:

Arquivado

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

estranho.com

conexao com o servidor da caminho errado

Por , em ASP Clássico

Recommended Posts

estranho.com    0

estranho.com
Postado

Olá pessoal ....estou o o seguinte problema na minha conexão com o banco de dados usei MapPath a pasta 'dados/banco.mdb'só q quando tento assessar.. da q o caminho esta errado pq no servidor tem duas pastas a pasta www onde esta o site e a pasta dados... o servidor da o caminho até a pasta www automaticamente e quando eu uso ../dados/banco..... fala que '..' caracter invalido para o metodo Path... o q fazer?????

Compartilhar este post

Link para o post
Compartilhar em outros sites

estranho.com    0

estranho.com
Postado

cadê o código?

 

Po ser que ñ esteja liberado no seu servidor o camnho ou liberação pra escrita

to postando o codigo e o erro

 

ASP
<%

Option Explicit

Dim sql,rsUser,username,password,page,stayloggedin,LConnectString,lconn,sqlflag,vis

 

 

'capturar as variáveis submetidas (a página é a página que vieram de, se ajustaram pela variável escondida na caixa do início de uma sessão)

username = Request.Form("username")

password = Request.Form("password")

page = Request.Form("page")

stayloggedin = Request.Form("stayloggedin")

 

if page = "" then

        page = "index.asp"

end if

 

'Não verificar nenhum ** t de s está tentando cortar em usar comandos do SQL

if InStr(username, "'") or InStr(username, """") or InStr(username, "=") or InStr(password, "'") or InStr(password, """") or InStr(password, "=") then

        sqlflag = True

end if

 

'Abrir a conexão

 

Dim ConnectString, conn

ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../dados/siteusers.mdb")

Set conn = Server.CreateObject("ADODB.Connection")

conn.open ConnectString

 

 

 

'Começar um recordset que corresponde ao username e à senha submetidos

sql = "SELECT username FROM users WHERE username = '" & username & "' AND password = '" & password & "'"

Set rsUser = Server.CreateObject("ADODB.Recordset")

rsUser.Open sql, conn, 3, 3

 

 

'Capturar ip da maquina

Dim ip

ip = Request.ServerVariables("REMOTE_ADDR")

 

'Capturar data atual

 

Dim Data

 

Data = Date()

 

'Capturar usuario

 

 Dim nome

 nome = username

 

'enviar dados do cliente para tabela visitas

'ActiveConnection

'vis = "SELECT ip, data, nome FROM visitas"

'Set rsUser = Server.CreateObject("ADODB.Recordset")

'rsUser.Open vis, conn, 2, 3

'rsUser.AddNew

'rsUser("ip") = ip

'rsUser("data") = Data

'rsUser("nome") = nome

 

 

'Se houver um recordset válido lá, emiti-los então para index, com o cookie do username

If (not rsUser.BOF) and (not rsUser.EOF) and sqlflag <> True then

  Response.Cookies("username") = rsUser("username")

 

 

  rsUser.close

  set rsUser = nothing

  conn.close

  set conn = nothing

  Response.Redirect(page)

 

end if

 

'Se não, indicar uma senha inválida na entrada

rsUser.close

set rsUser = nothing

conn.close

set conn = nothing%>

 

<html>

<head>

<title>Invalid entry</title>

</head>

<body bgcolor="#FFFFFF" link="#DD0000" vlink="#DD0000" alink="#000000">

<font face="arial,helvetica" size=2 color="#000000">

 

<h3>Nome de usuário/senha inválidos</h3>

 

<p><a href="java script:self.history.go(-1)"><b>Tente novamente</b></a></p>

<br>

<p><b>Seu IP: <BR></b>

<%

Response.Write (ip)  

%>

<br>

<b>Data: <BR></b>

<%

Response.Write (Data)

%>

<br>

<b>Usuário: <BR></b>

<%

Response.Write (nome)

%><BR>

</font>

</body>

</html>

 

 

erro

 

 

Server.MapPath() erro 'ASP 0175 : 80004005'

 

Caracteres de Caminho Não Permitidos

 

/signin.asp, line 24

 

Os caracteres '..' não são permitidos no parâmetro Path do método MapPath.

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