Ir para conteúdo

POWERED BY:

Arquivado

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

Paschoal Rizzo

ERRO Microsoft JET Database Engine error '80004005'

Recommended Posts

Alguem pode me ajudar com esse erro, ja dei todas as permições no site

 

Microsoft JET Database Engine error '80004005'

 

The Microsoft Jet database engine cannot open the file 'C:\Domains\omelhordesantaisabel.com.br\wwwroot'. It is already opened exclusively by another user, or you need permission to view its data.

 

/config.asp, line 390

 

 

o site é http://www.omelhordesantaisabel.com.br

 

 

 

 

 

 

essa é o cadigo da pagina config.asp

<body bgcolor="#FFFFFF"><%'	   ================================================================='		C O N F I G U R A Ç Õ E S   G E R A I S   D A   S U A   L O J A '					Altere todos os dados que desejar				   '																		 '							I N D I C E									 '																		 '		1.	CONFIGURAÇÃO DE BANCO DE DADOS E TIPO DE CONEXÃO			 '		2.	CONFIGURAÇÃO DE FRETE										 '		3.	CONFIGURAÇÕES GERAIS										 '	 	4.	CONFIGURAÇÕES DO BOLETO BANCÁRIO							 '		5.	CONFIGURAÇÕES DAS CORES DA SUA LOJA							 '																		 '	   =================================================================VersaoDb = 2StringdeConexao = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("database\virtuastore.mdb")'########################################################################################################'	2.	CONFIGURAÇÃO DE FRETE																			  '########################################################################################################'***	2.1  ENTREGA NACIONAL OU ESTADUAL (VIA CORREIOS)'## Colocar a Forma de Entrega dos pedidos via Sedex?entrega_sedex="Sim"	'Deixe "Sim" ou "Nao"seu_cep = "12215070"		'Digite o CEP de sua loja usando somente numeros'## Você deseja testar Offline e sem Conexao Internet?sem_calculo_online_SiteCorreios = "Sim" 'IMPORTANTE: Deixe "Sim" caso voce NÃO esteja conectado na Internet (para nao travar Calc. de Frete), 'pois o cálculo vem do site dos Correios, mas setando para "Sim" será colocado um valor fictício de R$ 10,00'## Serviço Adicional dos Correios para entrega do pedido SOMENTE para o Cliente, digite "S" para ativar ou "N" para não ativarmao_propria = "N"			'## Serviço Adicional dos Correios de Aviso de Recebimento da encomenda na casa do Cliente, digite "S" para ativar ou "N" para não ativaraviso_recebimento = "N"		'## Serviço de Seguro do próprio Correios da encomenda do Cliente, digite  "S" para ativar ou "N" para não ativarcobrar_seguro_produto = "N"		'Obs 1: Quando o cliente opta por Sedex a Cobrar, este valor é cobrado obrigatoriamente pelos Correios'Obs 2: O seguro é 1% do valor da compra'## Colocar a Opção de Pagamento do pedido via Sedex a Cobrar?entrega_sedex_a_cobrar="Sim"	'Deixe "Sim" ou "Nao"'***	2.2  ENTREGA REGIONAL (Via Motoboy, Tele-Entrega [com Carro próprio] ou similares que são cobrados Taxas Fixas)'## Colocar a Forma de Entrega dos pedidos via Motoboy?entrega_motoboy="Nao"	'Deixe "Sim" ou "Nao"'## Descricao da Forma de Entrega dos pedidos a Domicilio descricao_forma_entrega_motoboy = "Delivery" '(Por padrão está como Motoboy, mas pode ser outro como "Tele-Entrega" , etc...)'## Tarifa para Entrega dos pedidos via Motoboy (se valor com CENTAVOS, digite COM PONTO - Exemplo: 4.50 )tarifa_entrega_motoboy = 0.00'## Descricao da Regiao da Entrega dos pedidos via Motoboydescricao_regiao_entrega_motoboy = "Entrega via Delivery em toda grande S.Paulo"'***	2.3  ENTREGA PESSOAL (Via Download, Pessoalmente ou similares que NÃO são cobrados)'## Colocar a Forma de Entrega dos pedidos via Download?entrega_download="Nao"	'Deixe "Sim" ou "Nao" 'IMPORTANTE: Caso deixe Sim, por questoes de logica DESATIVE as formas de entrega anteriores ( entrega_motoboy="Nao" e entrega_sedex="Nao")'## Descricao da Forma de Entrega dos pedidos a Domicilio descricao_forma_entrega_download = "Download" '(Por padrão está como Download, mas pode ser outro como "Pessoalmente" , etc...)'## Tarifa para Entrega dos pedidos via Downloadtarifa_entrega_download = 0'## Descricao da Regiao da Entrega dos pedidos via Downloaddescricao_regiao_entrega_download = "Você poderá fazer o Download direto do site!"'---> ENCOMENDA NORMAL IMPLEMENTADO POR MATEUS MORAES (jusivansjc@yahoo.com.br)'***	2.4  ENCOMENDA NORMAL'## Colocar a Forma de Entrega dos pedidos via Encomenda Normal?entrega_encomenda="Sim"	'Deixe "Sim" ou "Nao" '## Descrição da Forma de Entrega dos pedidos a Domicilio descricao_forma_entrega_encomenda = "Encomenda Normal"'## Configuração das Regiões para frete via Encomenda Normal (Modelo Padrão configurado para o PARANÁ - CAPITAL)' 1. Configure o Estado em que sua loja se encontra para ZERO' 2. Configure os demais Estados de acordo com o arq em anexo (ENCOMENDA_NORMAL.xls), ou pelas tabelas disponibilizadas' pelos Correios: [url="http://www.correios.com.br/servicos/precos_tarifas/nacionais/tar_encomenda_normal.cfm"]http://www.correios.com.br/servicos/precos...enda_normal.cfm[/url]' 3. Dê uma olhada em [url="http://www.correios.com.br/servicos/precos_tarifas/nacionais/pdf/ENC_NORMAL_PR.pdf"]http://www.correios.com.br/servicos/precos...C_NORMAL_PR.pdf[/url]' para entender melhor a configuração desse tipo de frete. No caso do Paraná, por ser LOCAL (conforme o PDF acima),' ele leva o valor 0 no valor abaixo, os da 2a coluna leva o valor 1  e assim por dianteestado_sp = 1estado_rs = 1estado_sc = 1estado_sp = 1estado_go = 2estado_mg = 2estado_rj = 2estado_ms = 2estado_df = 3estado_es = 3estado_ba = 4estado_mt = 4estado_to = 4estado_se = 5estado_al = 5estado_ro = 5estado_ac = 6estado_ma = 6estado_pa = 6estado_pe = 6estado_pb = 6estado_rn = 6estado_ce = 7estado_pi = 7estado_ap = 7estado_am = 8estado_rr = 8'##################################################################################'	3.	CONFIGURAÇÕES GERAIS	'##################################################################################'## Escreva o nome do administrador da loja para suporte via AdministradorSeu_nome = "bondshop - Uma nova opção em hospedagem na Web!"'## Você deseja Usar Criptografia de 64 BITS em sua loja?Cripto_Ativa = "Sim" 'Deixe "Sim" para usar ou então escreva "Nao"'## Você deseja mostra 4, 6 ou 8 produtos no inicio da sua loja?mostrar_produtos_fachada=6		'Digite 4 ou 6 ou 8'## Você deseja colocar Destaque de Produto na página inicial? (produto aleatório)mostrar_produto_destaque_fachada="Sim" 'Deixe "Sim" para usar ou então escreva "Nao"'## Você deseja mostra qtos produtos por página (paginas Secoes e Pesquisa)?mostrar_produtos_por_pagina_na_secao=12'## Você deseja mostrar o aviso de estoque "Esgotado" automaticamente , qdo acabar o estoque do Produto?'Se Sim, o produto ficará "Visível", mas aparecerá um aviso de estoque "Esgotado". Este aviso não aparecerá se o produto já estava com o status de "Não Visível"'Se Nao, o produto ficará com o status de "Não Visível" ao público, qdo acabar o estoque do Produto. mostrar_produto_esgotado="Sim" 'Deixe "Sim" ou "Nao"'## Você deseja mostrar as Opções de Cartões de Creditos como Forma de Pgto?mostrar_pgtos_com_cartoescredito="Sim" 'Deixe "Sim" para usar ou então escreva "Nao"'## Você deseja limitar a compra de um produto conforme a qtidade Máxima fixada na área administrativa?mostrar_limite_max_prod_compra="Nao" 'Deixe "Sim" ou "Nao"'Em caso de Nao, pode acontecer de o cliente comprar mais do que tem no estoque, portanto poderá aparecer para o Administrador estoques "negativos"'## Você deseja mostrar o Formulário para o Cliente solicitar por email produtos que estão como "Esgotados"?mostrar_form_email_prod_esgotado="Sim" 'Deixe "Sim" para usar ou então escreva "Nao"'## Você deseja mostrar o link de Política de Trocas no Quadro Atendimento?mostrar_politica_de_trocas="Sim" 'Deixe "Sim" ou "Nao"'## Nome da imagem da Logo da Loja (coloque dentro da Pasta /Imagens/ de cada linguagem)arquivo_logo_loja="logo1.gif"'## Dados da loja	Nome_da_sua_loja = "BondShop Loja Virtual kkk"CNPJ_da_sua_empresa = "00.000.000/0001-00"Razao_Social = "bondshop - Uma nova opção em hospedagem na Web!"Email_da_sua_loja = "comercial@bondshop.com.br"Slogan_da_sua_loja = "Uma nova opção em Loja Virtual na Web kkk!"Endereco_do_site = "www.omelhordesantaisabel.com.br.com.br" 		 'ATENÇÃO: Escreva o endereço virtual da sua loja sem o Http:// e sem o / no finalEndereco_da_sua_loja = "Av. Juscelino Kubisticheck, 1253"Bairro_da_sua_loja = "Jd Paulistano"Cidade_da_sua_loja = "S.Paulo"Estado_da_sua_loja = "S.Paulo"Pais_da_sua_loja = "Brasil"Telefone_da_sua_loja = "(0xx12) 9121-3921"'## Dados bancarios - Banco 1Seu_banco = "Bradesco"Sua_agencia = "2338-4"Sua_conta_corrente = "07951-5"Nome_do_cedente = "bondshop - Uma nova opção em hospedagem na Web!"'## Dados bancarios - Banco 2		( 'Se nao for usar , deixe os 4 campos abaixo como "" )Seu_banco2 = "Banco do Brasil" Sua_agencia2 = "2468-3"Sua_conta_corrente2 = "154285-0"Nome_do_cedente2 = "bondshop - Uma nova opção em Loja Virtual na Web!"'## Confirurações de e-mailHost_da_loja = "smtp.bondshop.com.br" ' --> Se o componente usado for CDONTS deixe esse campo assim: "-"'## Escolha o componente e desmarque o comentárioComponente_usado = "AspEmail"'Componente_usado = "AspMail"'Componente_usado = "AspQmail"'Componente_usado = "CDONTS"'Componente_usado = "JMail"'## Banners da LojaBanner_AdMentor=""	'--> Coloque "Sim" se for usar Banners via Sistema Admentor, da Area Administrativa, ou deixe como ""Banner_Fixo="" '--> Para usar um banner fixo, coloque o nome da imagem entre as aspas, coloque a imagem na pasta Banners e deixe Banner_AdMentor=""'## Fonte da lojaFontes_da_loja = "tahoma,verdana,arial,helvetica"'## Dias para entrega dos pedidosDias_para_entrega = 2'## Mostrar Quadro Linguagens na Lojamostrar_quadro_linguagens="Nao"	'--> 'Deixe "Sim" ou "Nao"'## Mostrar Contador na Lojamostrar_contador="Nao"	'--> Coloque "Sim" se quiser mostrar'## Tipo da Moeda CorrentestrLgMoeda = "R$"  ' REAL - R$ - BrasilstrLgMoedax = "Reais"  ' Nome da moeda no plural'##################################################################################'	4.	CONFIGURAÇÕES DO BOLETO BANCÁRIO'##################################################################################'## Você deseja colocar a opção Boleto como Forma de Pagamento?mostrar_pagamento_por_boleto="Sim" 'Deixe "Sim" para usar ou então escreva "Nao"'caminho_boleto = "boleto_hsbc.asp" ' use este caminho para utilizar o boleto do HSBCcaminho_boleto = "boleto_bb1.asp" ' use este caminho para utilizar o boleto do BANCO DO BRASIL'caminho_boleto = "boleto_bradesco.asp" ' use este caminho para utilizar o boleto do BRADESCO'caminho_boleto = "boleto_itau.asp" ' use este caminho para utilizar o boleto do ITAÚ'## Informações bancárias referente ao seu Boleto  ( Alguns campos são opcionais )bol_nr_cedente="2338-5/159225-0" 'numero do seu codigo cedente (não é necessário para alguns bancos)bol_agencia = "2578" 'agenciabol_dagencia = "5" 'digito da agencia (não é necessário para alguns bancos)bol_conta = "153385" 'conta (não é necessário para alguns bancos)bol_dconta = "0" 'digito da conta (não é necessário para alguns bancos)bol_carteira = "17" 'código da carteirabol_convenio = "1047849" 'numero do seu convenio (não é necessário para alguns bancos)bol_cedente = "bondshop - Uma nova opção em Loja Virtual na Web!" 'Geralmente é o nome da loja e o nome do cedente no banco'## Observações no Boleto  ( Campos opcionas )' Voce pode colocar alguma instrução para o cliente, por exemplo "Obrigado por comprar em nossa loja"obs_linha1 = "Para agilizar o seu atendimento, envie-nos o seu email após o seu pagamento para "&Email_da_sua_loja ' Observação Linha 1 obs_linha2 = "informando apenas o número do seu pedido e o banco usado para pagamento." ' Observação Linha 2obs_linha3 = "A "& Nome_da_sua_loja &" agradece o seu pedido." ' Observação Linha 3obs_linha4 = "" ' Observação Linha 4obs_linha5 = "" ' Observação Linha 5'## Instruções ao Caixa do Banco (Por exemplo "Não Receber após o vencimento" ou "Cobrar multa de 2 % após o vencimento")instr_linha1 = "PAGÁVEL EM QUALQUER BANCO"  ' Instrucoes Linha 1instr_linha2 = "NÃO ACEITAR APÓS VENCIMENTO" ' Instrucoes Linha 2instr_linha3 = "" ' Instrucoes Linha 3instr_linha4 = ""  ' Instrucoes Linha 4instr_linha5 = ""  ' Instrucoes Linha 5'##################################################################################'	5.	CONFIGURAÇÕES DAS CORES DA SUA LOJA'##################################################################################'Dica: Acesse o arquivo tabela_de_cores.asp para ver a Tabela de Cores e os respectivos códigos hexadecimais'Cor do fundo na resolução 1024x768Cor_de_fundo = "#ebefef"'Cor principal da lojaCor_principal = "#ffffff"'Cor das linhasCor_das_linhas = "#cccccc"'Cor da borda do contador de visitasCor_do_Contador = "#fcc701"'Cor da barra de menu e copyrightCor_do_menu = "#c0c0c0"'Cor principal dos linksCor_dos_links ="#000000"'Cor secundaria dos linksCor_dos_links_secundarios ="#808080"'Cor do texto dos menusTexto_dos_menus = "#ffffff"'Cor do texto da lojaTexto_da_loja = "#000000"'Cor da borda do carrinho de comprasCor_da_borda_carrinho_de_compras = "#000000"'Cor do texto do menu de navegacao de fechamento de comprasCor_texto_menu_fechamento_compras = "#ff4500" 'Exemplo: #0000ff ou #ff4500'##################################################################'####################################################################'																	 '	 NAO ALTERE ESSA PARTE, VOCÊ PODERÁ ESTRAGAR SUA LOJA !		 '																	 '####################################################################	'Inicia as variaveis da Aplicação  	application("razaoloja") = Razao_Social	application("nomeloja") = Nome_da_sua_loja	application("emailloja") = Email_da_sua_loja   	application("slogan") = Slogan_da_sua_loja   	application("urlloja") = Endereco_do_site   	application("endereco11") = Endereco_da_sua_loja   	application("bairro11") = Bairro_da_sua_loja   	application("cidade11") = Cidade_da_sua_loja   	application("estado11") = Estado_da_sua_loja   	application("pais11") = Pais_da_sua_loja   	application("fone11") = Telefone_da_sua_loja	application("CORREIOSseucep11") = seu_cep 	application("CORREIOSmaop11") = mao_propria 	application("CORREIOSaviso11") = aviso_recebimento    	application("bancopag") = Seu_banco   	application("contapag") = Sua_conta_corrente   	application("pagpara") = Nome_do_cedente	application("agpag") = Sua_agencia   	application("bancopag2") = Seu_banco2   	application("contapag2") = Sua_conta_corrente2   	application("pagpara2") = Nome_do_cedente2	application("agpag2") = Sua_agencia2	application("fonte") = Fontes_da_loja	application("maopropria") = Preco_da_mao_propria	application("diasentrega") = Dias_para_entrega	application("corfundo") = Cor_de_fundo	application("cor1") = Cor_das_linhas	application("cor2") = Cor_do_menu	application("cor3") = Cor_principal	application("cor4") = Cor_dos_links	application("cor5") = Cor_dos_links_secundarios	application("cor6") = Cor_do_Contador	application("fontebranca") = Texto_dos_menus	application("fontepreta") = Texto_da_loja	application("corborda") = Cor_da_borda_carrinho_de_compras	application("nomecontato") = Seu_nome	application("HostLoja") = Host_da_loja	application("ComponenteLoja") = Componente_usado	application("Cripto_Ativa") = Cripto_Ativa'>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<	Server.ScriptTimeOut = 60		'*** Evite usar mais do que 60 segundos	application("vsversao") = "OPEN 3.0 - Pack 5"	application("ultimaatualizacao")  = "Sexta, 07 de Maio de 2006"	application("link_comunidade")  = "<a class=menu  href=""http://www.omelhordesantaisabel.com.br"" target=_blank>Hospedagem - Desenvolvimento de Web-Site</a>"	set abredb = Server.CreateObject("ADODB.Connection")	abredb.Open(StringdeConexao)'>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<'Executa a função GLOBALset rsglobal = abredb.execute("SELECT * FROM compras Order by idcompra desc")if rsglobal.eof thenSession("orderID") = ""end ifrsglobal.closeset rsglobal = nothingif Session("orderID") = "" thenset rs = abredb.execute("SELECT * FROM compras Order by idcompra desc")	if rs.eof then	Session("orderID") = 1	abredb.Execute("INSERT INTO compras (idcompra, datacompra, status) values ('" &session("orderID") & "', '" & date & "', 'Compra em Aberto')")	else	Session("orderID") = rs("idcompra") + 1	abredb.Execute("INSERT INTO compras (idcompra, datacompra, status) values (" &session("orderID") & ", '" & date & "','Compra em Aberto')")	end ifsession.timeout = 120elseend if'##################################################################################'## ARQUIVOS DE LINGUAGEM DA LOJA'##################################################################################'##################################################################################'### Mostra a linguagem padrão dependendo do navegador'##################################################################################IF Escolha <> "" then Response.Cookies("VirtuaStore").Expires 	=  DateAdd("d",365,date()) 'VENCE NO PROXIMO ANO Response.Cookies("VirtuaStore")("Linguagem")	= EscolhaEnd IFIF Request("Lan") <> "" THEN	Response.cookies("VirtuaStore")("Linguagem")= ""	Response.cookies("VirtuaStore")("Linguagem")= Request("Lan")END IFstrReporLingua = "?"&replace(replace(replace(replace(replace(Request.ServerVariables("Query_String") ,"&Lan=Espanol",""),"&Lan=Portugal",""),"&Lan=Brasil",""),"&Lan=English","")," ","")strReporLingua = "?"&replace(replace(replace(replace(replace(Request.ServerVariables("Query_String") ,"Lan=Espanol",""),"Lan=Portugal",""),"Lan=Brasil",""),"Lan=English","")," ","")SELECT CASE Request.cookies("VirtuaStore")("Linguagem")	CASE "Brasil"	dirlingua = "linguagens/portuguesbr"	OpcaoLingua = "<a href='"& strReporLingua&"&Lan=English'><img src=linguagens/english.gif border=0></a>"&_			  "<a href='"& strReporLingua&"&Lan=Portugal'><img src=linguagens/portugal.gif border=0></a>"&_			  "<a href='"& strReporLingua&"&Lan=Espanol'><img src=linguagens/espanha.gif border=0></a>"	%><!--#include file="linguagens/portuguesbr/linguagem.asp"--><%		CASE "English"	dirlingua = "linguagens/ingles"	OpcaoLingua = "<a href='"& strReporLingua&"&Lan=Brasil'><img src=linguagens/brasil.gif border=0></a>"&_			  "<a href='"& strReporLingua&"&Lan=Portugal'><img src=linguagens/portugal.gif border=0></a>"&_			  "<a href='"& strReporLingua&"&Lan=Espanol'><img src=linguagens/espanha.gif border=0></a>"	%><!--#include file="linguagens/ingles/linguagem.asp"--><%		CASE "Portugal"	dirlingua = "linguagens/portuguespt"	OpcaoLingua = "<a href='"& strReporLingua&"&Lan=Brasil'><img src=linguagens/brasil.gif border=0></a>"&_			  "<a href='"& strReporLingua &"&Lan=English'><img src=linguagens/english.gif border=0></a>"&_			  "<a href='"& strReporLingua &"&Lan=Espanol'><img src=linguagens/espanha.gif border=0></a>"	%><!--#include file="linguagens/portuguespt/linguagem.asp"--><%		CASE "Espanol"	dirlingua = "linguagens/espanhol"	OpcaoLingua = "<a href='"& strReporLingua&"&Lan=Brasil'><img src=linguagens/brasil.gif border=0></a>"&_			  "<a href='"& strReporLingua&"&Lan=Portugal'><img src=linguagens/portugal.gif border=0></a>"&_			  "<a href='"& strReporLingua&"&Lan=English'><img src=linguagens/english.gif border=0></a>"	%><!--#include file="linguagens/espanhol/linguagem.asp"--><%		CASE ELSE			'-----------------------------------------------------------------		'### BRASIL		'-----------------------------------------------------------------		IF Request.ServerVariables("HTTP_ACCEPT_LANGUAGE") = "pt-br" THEN		dirlingua = "linguagens/portuguesbr"		OpcaoLingua = "<a href='"& strReporLingua&"&Lan=English'><img src=linguagens/english.gif border=0></a>"&_				  "<a href='"& strReporLingua&"&Lan=Portugal'><img src=linguagens/portugal.gif border=0></a>"&_				  "<a href='"& strReporLingua&"&Lan=Espanol'><img src=linguagens/espanha.gif border=0></a>"				%><!--#include file="linguagens/portuguesbr/linguagem.asp"--><%						'-----------------------------------------------------------------		'### PORTUGAL		'-----------------------------------------------------------------		ELSEIF Request.ServerVariables("HTTP_ACCEPT_LANGUAGE") = "pt" THEN		dirlingua = "linguagens/portuguespt"		OpcaoLingua = "<a href='"& strReporLingua&"&Lan=Brasil'><img src=linguagens/brasil.gif border=0></a>"&_				  "<a href='"& strReporLingua&"&Lan=English'><img src=linguagens/english.gif border=0></a>"&_				  "<a href='"& strReporLingua&"&Lan=Espanol'><img src=linguagens/espanha.gif border=0></a>"				%><!--#include file="linguagens/portuguespt/linguagem.asp"--><%						'-----------------------------------------------------------------		'### ESPANHOL		'-----------------------------------------------------------------		ELSEIF Request.ServerVariables("HTTP_ACCEPT_LANGUAGE") = "es" THEN		dirlingua = "linguagens/espanhol"		OpcaoLingua = "<a href='"& strReporLingua&"&Lan=Brasil'><img src=linguagens/brasil.gif border=0></a>"&_				  "<a href='"& strReporLingua&"&Lan=English'><img src=linguagens/english.gif border=0></a>"&_				  "<a href='"& strReporLingua&"&Lan=Portugal'><img src=linguagens/portugal.gif border=0></a>"				%><!--#include file="linguagens/portuguespt/linguagem.asp"--><%						'-----------------------------------------------------------------		'### INGLES TB PODE SER US		'-----------------------------------------------------------------		ELSE		dirlingua = "linguagens/portuguesbr"		OpcaoLingua = "<a href='"& strReporLingua&"&Lan=English'><img src=linguagens/english.gif border=0></a>"&_				 "<a href='"& strReporLingua&"&Lan=Portugal'><img src=linguagens/portugal.gif border=0></a>"&_				 "<a href='"& strReporLingua&"&Lan=Espanol'><img src=linguagens/espanha.gif border=0></a>"				%><!--#include file="linguagens/portuguesbr/linguagem.asp"--><%		END IFEND SELECTOpcaoLingua=replace(OpcaoLingua,"?&","?")OpcaoLingua=replace(OpcaoLingua,"&&","&")'##################################################################################'if aaaa="" then   '*** Ativar   if aaaa<>"" then   '*** Desativarresponse.write "<font size=1 face=arial>"response.write "<br> Testando as sessoes...<br> "response.write "<br> modo_entrega: "&session("modo_entrega")response.write "<br> usuario: "&session("usuario")response.write "<br> orderID: "&Session("orderID")response.write "<br> pedido1: "&Session("pedido1")response.write "<br> PesoTotalValor: "&session("PesoTotalValor")response.write "<br> sql: "&session("sql")response.write "<br> sql_max: "&session("sql_max")response.write "<br> dados_gravados_compra: "&session("dados_gravados_compra")response.write "</font>"end if%>
SE ALGUMPUDER ME AJUDAR

Compartilhar este post


Link para o post
Compartilhar em outros sites

faça um testes com essa string de conexão cara

 

StringdeConexao ="dbq="&server.mappath("./database/virtuastore.mdb")&";driver={microsoft access driver (*.mdb)}"

e qual é a linda do erro

 

e isso aki está errado cara

 

'############################################################################
######
'## ARQUIVOS DE LINGUAGEM DA LOJA
'############################################################################
######

'############################################################################
######
'### Mostra a linguagem padrão dependendo do navegador
'############################################################################
######

 

olha o certo

'############################################################################
#####
'## ARQUIVOS DE LINGUAGEM DA LOJA
'############################################################################
#####

'############################################################################
#####
'### Mostra a linguagem padrão dependendo do navegador
'############################################################################
#####

olha cara você usou o ##################### para vários lugares, veja bem como coloca carapois vi seu codigo e tem alguns que ñ estão com aspas simples

Compartilhar este post


Link para o post
Compartilhar em outros sites

você já entrou em contato com o serviço de hospedagem para eles liberarem o acesso a pasta e ao arquivo mdb?normalmente essas empresas criam uma pasta fora do wwwroot onde deve-se colocar qualquer banco access pois nesta pasta tem as permissões já configuradas

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

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