Ir para conteúdo
Fórum Script Brasil
  • 0

Comando Para Retornar O Caminho Fisico


ADL

Pergunta

Bom dia pessoal tudo bem? É o seguinte hospedei um site no ig, e é ridículo, o site tem algumas páginas que tem acesso a banco de dados, e os caras do ig não conseguem me passar o endereco virtual para eu colocar na minha rotina de abrir o banco, que no caso é access, teria algum comando em ASP que me retornaria esse endereço? por favor! desde já eu agradeço pela ajuda de vocês!!!!!!!

Link para o comentário
Compartilhar em outros sites

8 respostass a esta questão

Posts Recomendados

  • 0

Muito obrigado pela dica só que agora, lá apareceu esse erro o que pode ser? por favor ,estou me quebrando com isso sou novato por favor. obrigado!!!

ADODB.Connection error '800a0e78'

Operation is not allowed when the object is closed.

/index.asp, line 13

Link para o comentário
Compartilhar em outros sites

  • 0
coloque o cod para dar um olhada

esse é o codigo da página que está dando o erro!!!!

<%@LANGUAGE="VBSCRIPT"%>
<%
Option explicit
%>
<!--#Include file="conexao/dbConexao.inc"-->

<%
response.expires=0
dim estilo,conexaoDataBase,ConnString,sqlTabela,rsTabela,id,Textobj,Leenq,linha,a
Call abreConexao
sqlTabela = "Select * From textos"
set rsTabela = conexaoDataBase.execute(sqlTabela)
estilo ="Home"
%>

<html>
<head>
<title>Web Site de Alexandre Guilherme.</title>
<link href="estiloSite1.asp" rel="stylesheet" type="text/css">

</head>

<body>

<table width="758" border="1"  align="center" cellpadding="0" cellspacing="0" bgcolor="#ffffff" bordercolor="#000000">
<tr>
<td background="estilos/<% =estilo %>/tarja5.gif" class="LogoImagem"></td>
</tr>

<tr>
<td  background="estilos/<% =estilo %>/enquete.gif" class="LogoSuperiorData"><% = formatDateTime(date,1)%></td>
</tr>

<tr>
<td background="estilos/<% =estilo %>/PagCentral4.gif" class="PaginaCentral">

<table width="758" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="213" valign="top"><!-- #Include file="menu.asp"--></td>
<td width="545" valign="top">

<table width="28%" border="0" align="right" cellspacing="0" cellpadding="0">
<br>
<tr>
<td ><!-- #Include file="texto.asp"--></td>
</tr>

<tr><td align="center" colspan=2><br><br><b><u>Enquete</u></b><br><br></td></tr>

<tr><td  class="DadosGerais"><!-- #Include file="corpo.asp"--></td></tr>
</table>

<br>

<table width="70%"  border="0" cellspacing="0" cellpadding="3" bordercolor="#cccccc">
<tr>
<td  align="center" colspan=4 ><br><b><% = rsTabela("titulo") %></b><br></td>
</tr>

<tr>
<td    colspan="4" valign= top class="DadosGerais" bgcolor="#EAF4FF"><% = rsTabela("apresentacao") %><br><br>
</td>
</tr>

<tr>
<td  colspan="4" align="center"  ><b><% = rsTabela("titulo1") %></b><br><br>
</td>
</tr>

<tr>
<td  colspan="4" valign= top class="DadosGerais" bgcolor="#EAF4FF"><% = rsTabela("apresentacao1") %><a href="duvida.asp">Clique aqui</a>
</td>
<tr><td class="DadosGerais"><br><br>

<br>
<tr>
<td>


<br><br>
</td>
</tr>
</table>



</td></tr>
</td>
</tr>
</table>
</td>
</tr>
<!--#Include file="rodape.asp"-->
</table>
</body>
</html>
<%
Call fechaConexao
set rsTabela = nothing
%>

Editado por andreia_sp
utilize tags para codigos, facilita a visualização.
Link para o comentário
Compartilhar em outros sites

  • 0

beleza segue o código e muito obrigado e desculpe o incomodo

<%
sub AbreConexao
  set conexaoDataBase = Server.CreateObject("ADODB.Connection")
  ConnString ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\hshome\alexguil\alexandreguilherme.com\conexao1\dbconexao1.mdb;Persist Security Info=False"
end sub
sub FechaConexao
  conexaoDataBase.close
  set conexaoDataBase = nothing
end sub
%>

então com aquele comando que você me passou vei esse endereço ai eu coloquei ai.....Valeu heim

Editado por andreia_sp
Link para o comentário
Compartilhar em outros sites

  • 0

tenta assim

<%

sub AbreConexao

set conexaoDataBase = Server.CreateObject("ADODB.Connection")

ConnString ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\hshome\alexguil\alexandreguilherme.com\conexao1\dbconexao1.mdb;Persist Security Info=False"

conexaoDataBase.Open(ConnString)

end sub

sub FechaConexao

conexaoDataBase.close

set conexaoDataBase = nothing

end sub

%>

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...