Caro, tenho esse script que cria uma tabela no Acess está funcionando, só adaptar nas suas necessidades.
Set Conexao1 = Server.CreateObject("ADODB.Connection")
Set Conexao2 = Server.CreateObject("ADODB.Connection")
Conexao1.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("excel.mdb")
Set cria = Conexao1.execute("Create table Import_Excel (Nome varchar(255), Origem varchar(255), NrDiscado varchar(255), DialPlan varchar(255), ChannelNo varchar(255), Channel varchar(255), Comando varchar(255), H varchar(255), Datachamada varchar(255), DataAtend varchar(255), Datatermino varchar(255), L varchar(255), M varchar(255), N varchar(255), O varchar(255), P varchar(255), Q varchar(255))")
Set cria = Nothing
Conexao2.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("29012009.xls") & ";Extended Properties=""Excel 8.0;HDR=Yes;"";"
Set excel = Conexao2.Execute("SELECT * FROM [29012009$]")
Do Until excel.EOF
Set insere = Conexao1.execute("insert into Import_Excel (Nome, Origem, NrDiscado, DialPlan, ChannelNo, Channel, Comando, H, Datachamada, DataAtend, Datatermino, L, M, N, O, P, Q) values ('"&excel("Nome")&"','"&excel("Origem")&"','"&excel("Nr Discado")&"','"&excel("Dial Plan")&"','"&excel("Channel + No")&"','"&excel("Channel")&"','"&excel("Comando")&"','"&excel("H")&"','"&excel("Data chamada")&"','"&excel("Data Atend.")&"','"&excel("Data término")&"','"&excel("L")&"','"&excel("M")&"','"&excel("N")&"','"&excel("O")&"','"&excel("P")&"','"&excel("Q")&"')")
Set insere = nothing
excel.MoveNext
Loop
Set excel = nothing
Conexao2.Close
Set Conexao2 = nothing
Conexao1.Close
Set Conexao1 = nothing
acooper's Content
There have been 23 items by acooper (Search limited from 20/04/2023)
#975715 Ler Txt E Separar Campos E Inserir No Banco
Posted by
on 29/07/2009, 14:49
in
ASP
#974654 Status Conexão Banco Oracle
Posted by
on 20/07/2009, 17:39
in
ASP
Caro, já tinha pesquisado nesse site, mas ainda não consegui chegar na solução pq não estou usando ADODB.connection
#974636 Monitorar Iis
Posted by
on 20/07/2009, 17:32
in
ASP
Caros, tem alguma ferramenta para monitoriar as sessões abertas em uma Intranet. Estou usando um free " TcpView "
#974316 Status Conexão Banco Oracle
Posted by
on 17/07/2009, 12:00
in
ASP
Caros, tenho uma conexão com Banco logo depois tenho uma consulta normalmente e depois finalizo o RecordSet com Nothing
Minha dúvida é, sempre que for abrir outro RecordSet tenho que refazer a conexão, já que a mesma foi feita da primeira vez.
Como posso verificar o status da conexão conforme o script abaixo:
Set OraSession_Producao = CreateObject ("OracleInProcServer.XOraSession")
Set OraDataBase_Producao = OraSession_Producao.OpenDataBase ("BD", "USER/PW", Cint(0) )
Set Logon_User = OraDataBase_Producao.DbCreateDynaset ("select......"
Set Logon_User = Nothing
Minha dúvida é, sempre que for abrir outro RecordSet tenho que refazer a conexão, já que a mesma foi feita da primeira vez.
Como posso verificar o status da conexão conforme o script abaixo:
Set OraSession_Producao = CreateObject ("OracleInProcServer.XOraSession")
Set OraDataBase_Producao = OraSession_Producao.OpenDataBase ("BD", "USER/PW", Cint(0) )
Set Logon_User = OraDataBase_Producao.DbCreateDynaset ("select......"
Set Logon_User = Nothing
#962858 Checkbox - Checked - Unchecked
Posted by
on 03/04/2009, 13:23
in
ASP
Caro, vê se ajuda.
if ag.ATIVO = true then
v = "checked"
end if
Response.Write("<input type='checkbox' name='checkbox' value='checkbox' "&v&">")
if ag.ATIVO = true then
v = "checked"
end if
Response.Write("<input type='checkbox' name='checkbox' value='checkbox' "&v&">")
#955361 Como Posso Dar Um Set Role No Oracle ( Já Consegui )
Posted by
on 26/01/2009, 12:04
in
ASP
#955360 Transações Rollback Ou Commit Em Oracle.
Posted by
on 26/01/2009, 12:03
in
ASP
#953760 Recuperar Do Javascript A Resposta Do If (confirm())
Posted by
on 16/01/2009, 09:54
in
ASP
Caro gUiTaR_mAn, realmente tem razão meu processo é o seguinte.
Sistema de Reseva onde tenho um .BeginTrans, dentro do processo de cadastro quero informar ao usuário que, no bloco de dados que ele quer cadastrar, foi cadastrado segundos antes.
Com isso quero dar uma messagem onde dependendo da resposta o sistema continua o cadastro e no final da um .CommitTrans ou caso queira sair da um .RollBackTrans
Valeu pela atenção.
Sistema de Reseva onde tenho um .BeginTrans, dentro do processo de cadastro quero informar ao usuário que, no bloco de dados que ele quer cadastrar, foi cadastrado segundos antes.
Com isso quero dar uma messagem onde dependendo da resposta o sistema continua o cadastro e no final da um .CommitTrans ou caso queira sair da um .RollBackTrans
Valeu pela atenção.
#953575 Lock Table Usando Asp E Oracle
Posted by
on 15/01/2009, 09:16
in
ASP
Caro Renan, sugestões sempre são bem vindas.
Só não preferir fazer em PROCEDURE para não ficar dependendo de BANCO, caso queira fazer alguma outra rotinha teria que usar o PL/SQL.
Sendo direto no ASP posso misturar o que for, JAVASCRIPT etc...... Melhor ainda, não preciso ficar dependendo de outros, caso não tenha acesso a PROCEDURE
Valeu mesmo pela atenção.
Por isso que sempre indico esse Fórum.
Só não preferir fazer em PROCEDURE para não ficar dependendo de BANCO, caso queira fazer alguma outra rotinha teria que usar o PL/SQL.
Sendo direto no ASP posso misturar o que for, JAVASCRIPT etc...... Melhor ainda, não preciso ficar dependendo de outros, caso não tenha acesso a PROCEDURE
Valeu mesmo pela atenção.
Por isso que sempre indico esse Fórum.
#953573 Recuperar Do Javascript A Resposta Do If (confirm())
Posted by
on 15/01/2009, 09:11
in
ASP
Caros, tenho uma rotina de FOR NEXT
Minha questão parece simples, mais não estou conseguindo resolver e não achei em pesquisa.
Quero executar ou não o EXIT FOR vai depender da resposta que o usuários vai escolher no alert em JAVASCRIPT
Rotina abaixo:
FOR
.........
.........
Response.Write("<script>if (confirm('Tem certeza em cancelar?')){alert('Sim')}else{alert('Não')}</script>")
aqui está essa questão, se o usuários escolher CANCELAR foi para o EXIT FOR, caso queira continuar ele pula o EXIT FOR.
.........
.........
NEXT
Minha questão parece simples, mais não estou conseguindo resolver e não achei em pesquisa.
Quero executar ou não o EXIT FOR vai depender da resposta que o usuários vai escolher no alert em JAVASCRIPT
Rotina abaixo:
FOR
.........
.........
Response.Write("<script>if (confirm('Tem certeza em cancelar?')){alert('Sim')}else{alert('Não')}</script>")
aqui está essa questão, se o usuários escolher CANCELAR foi para o EXIT FOR, caso queira continuar ele pula o EXIT FOR.
.........
.........
NEXT
#953564 Lock Table Usando Asp E Oracle
Posted by
on 15/01/2009, 08:16
in
ASP
Caros, não consegui o LOCK TABLE XXXX IN SHARE MODE . Mais também não seria o ideal na aplicação.
Consegui adaptar Conexao.BeginTrans , com isso posso gerar uma mensagem caso tentam gistrar ao mesmo tempo. Assim tem prioridade o primeiro que der Commit e para o outro vai dar o RollBackTrans nos registros gravados.
Para entender melhor o problema e a solução:
Sistema de Reserva Sala de Reunião
IF VAR_ROLLBACK = 1 THEN
Consegui adaptar Conexao.BeginTrans , com isso posso gerar uma mensagem caso tentam gistrar ao mesmo tempo. Assim tem prioridade o primeiro que der Commit e para o outro vai dar o RollBackTrans nos registros gravados.
Para entender melhor o problema e a solução:
Sistema de Reserva Sala de Reunião
I. Dois usuários estavam tentando reservar na mesma Sala e Data, sendo que um deles escolhe todos os Horários e o outro somente alguns Horários.
II. Mesmo o que escolheu todos os Horários enviar segundos antes a solicitação para o Server, a prioridade vai ser do usuário que escolheu menos, por questões de processo da quantidade solicitada.
Agora além de sempre verificar com SELECT antes do INSERT tenho o BeginTrans, ficando da seguinte forma:
Select Count(*) as Total From Tabela Where .......
IF .........
INSERT
ELSE
VAR_ROLLBACK = 1
END IF
IF VAR_ROLLBACK = 1 THEN
Conexao.RollBackTrans
Msg = "Erro, horário xxxx já reservado!"
Conexao.CommitTrans
Msg = "Sucesso!"
#952700 Lock Table Usando Asp E Oracle
Posted by
on 08/01/2009, 08:39
in
ASP
Caros, tenho uma aplicação onde estou tendo problema no mesmo momento dois usuários estão fazendo o mesmo procedimento. Com isso em segundo o primeiro da um LOCK TABLE em seguida o próximo fica na espera.
Preciso de algum exemplo em ASP caso seja possível.
BEGIN TRANSACTION
LOCK TABLE XXXX IN SHARE MODE
LOOP INSERT
COMMIT
Preciso de algum exemplo em ASP caso seja possível.
BEGIN TRANSACTION
LOCK TABLE XXXX IN SHARE MODE
LOOP INSERT
COMMIT
#949694 Replace Na Coluna - Access
Posted by
on 08/12/2008, 15:55
in
ASP
Sobre o banco está tudo certo, é que no form de cadastro não estava com tratamento no conteúdo.
Sobre a variavés não bem isso, se eu colocar o valor direto na query retona o mesmo erro.
Sobre a variavés não bem isso, se eu colocar o valor direto na query retona o mesmo erro.
#949673 Asp
Posted by
on 08/12/2008, 14:24
in
ASP
As colunas na Tabela que estiverem como Number na Query na variavel request.form não tem '
#949639 Replace Na Coluna - Access
Posted by
on 08/12/2008, 11:39
in
ASP
Caros, estou com o seguinte problema, tenho no Banco o registro ( ANDRE FIGUEIREDO ),
Como pode observar entre o ANDRE e FIGUEIREDO , tenho dois espaços.
Quando vou comparar tenho que tirar esses espaços duplos dos registro que estão no Banco. Já tentei o Replace mas não funcionou.
Como pode observar entre o ANDRE e FIGUEIREDO , tenho dois espaços.
Quando vou comparar tenho que tirar esses espaços duplos dos registro que estão no Banco. Já tentei o Replace mas não funcionou.
#949619 Replace Na Instrução
Posted by
on 08/12/2008, 10:06
in
ASP
Caro, estou buscando um solução para o meu problema, que é parecido com o seu é resolvi tentar ajudar.
Vc já tentou usar TRANSLATE(COLUNA,'ÁÇÉÍÓÚ.......','ACEIOU......')''
Espero ter ajudado.
Abraço.
Vc já tentou usar TRANSLATE(COLUNA,'ÁÇÉÍÓÚ.......','ACEIOU......')''
Espero ter ajudado.
Abraço.
#948232 Verificar ( Nome E Sobrenome )
Posted by
on 27/11/2008, 18:42
in
Javascript / DOM / AJAX / ECMAScript
Caros, como verificar se no campo NOME foi digitado o nome e sobrenome:
Exemplo:
Correto = Andre Figueiredo
Errado = Andre
Estou tentando com replace ou matriz &%¨$##$$$#$ Não estou conseguindo!
Exemplo:
Correto = Andre Figueiredo
Errado = Andre
Estou tentando com replace ou matriz &%¨$##$$$#$ Não estou conseguindo!
#944793 Iframe
Posted by
on 05/11/2008, 13:52
in
HTML, CSS e Metodologias
Caro, não funciona não tenho dois IFRAME, tenho uma página reservar_sala.asp onde dentro dela tenho um IFRAME que carrega calendario.asp.
Nesse calendario.asp ao clicar em qualquer dia tem que jogar o valor para uma campo em FORM localizado na página reservar_sala.asp.
Tenho esse mesmo exemplo sendo que a página do calendário é aberta em popup, com isso ao clicar no dia joga o valor para o campo conforme JAVASCRIPT
Caros, consegui na Internet um exemplo que serviu para resolver essa questão.
Para quem estiver com o mesmo ou no futuro precisar, segue abaixo o que foi resolvido.
Na Página principal no FORM, o campo MREU_DT_REUNIAO_PERIODO_FIM coloquei como hidden;
No IFRAME tenho FORM com o name alvo_calendar_periodo com o campo MREU_DT_REUNIAO_PERIODO_FIM_ coloquei como text
Ao clicar no dia do calendario jogo a data para o campo MREU_DT_REUNIAO_PERIODO_FIM_
function Copiar_Data_Fim(Data_Fim)
{ document.Form_Calendario_DT_Fim.MREU_DT_REUNIAO_PERIODO_FIM_.value = Data_Fim; }
Na Página principal quando for executado o submit do FORM fiz outra rotina:
function Enviar()
{
document.getElementById('MREU_DT_REUNIAO_PERIODO_FIM').value = parent.alvo_calendar_periodo.document.Form_Calendario_DT_Fim.MREU_DT_REUNIAO_PERIODO_FIM_.value;
.......outros.....
}
Espero que ajude caso precise!
Nesse calendario.asp ao clicar em qualquer dia tem que jogar o valor para uma campo em FORM localizado na página reservar_sala.asp.
Tenho esse mesmo exemplo sendo que a página do calendário é aberta em popup, com isso ao clicar no dia joga o valor para o campo conforme JAVASCRIPT
Caros, consegui na Internet um exemplo que serviu para resolver essa questão.
Para quem estiver com o mesmo ou no futuro precisar, segue abaixo o que foi resolvido.
Na Página principal no FORM, o campo MREU_DT_REUNIAO_PERIODO_FIM coloquei como hidden;
No IFRAME tenho FORM com o name alvo_calendar_periodo com o campo MREU_DT_REUNIAO_PERIODO_FIM_ coloquei como text
Ao clicar no dia do calendario jogo a data para o campo MREU_DT_REUNIAO_PERIODO_FIM_
function Copiar_Data_Fim(Data_Fim)
{ document.Form_Calendario_DT_Fim.MREU_DT_REUNIAO_PERIODO_FIM_.value = Data_Fim; }
Na Página principal quando for executado o submit do FORM fiz outra rotina:
function Enviar()
{
document.getElementById('MREU_DT_REUNIAO_PERIODO_FIM').value = parent.alvo_calendar_periodo.document.Form_Calendario_DT_Fim.MREU_DT_REUNIAO_PERIODO_FIM_.value;
.......outros.....
}
Espero que ajude caso precise!
#944699 Iframe
Posted by
on 03/11/2008, 16:24
in
HTML, CSS e Metodologias
Caros, fiz uma busca no fórum mais não encontrei o que poderia ajudar.
Tenho um Iframe carregando um calendario, onde os dias que eu clicar quero jogar em um campo da página principal.
Desculpe pode parecer simples mas não estou conseguindo, tentei de varias formas segue abaixo:
CODIGO DO IFRAME
Script
function Data_Fim(valor_1)
{ window.opener.form_reservar.MREU_DT_REUNIAO_PERIODO_FIM.value = valor_1; }
Link do calendario
<a href='#' onclick=java script:Data_Fim('"&VALOR_DATA&"')>Dia</a>
PAGINA PRINCIPAL QUE CARREGA O IFRAME
Campo do Form com o name='form_reservar'
<input name="MREU_DT_REUNIAO_PERIODO_FIM" type="text" id="MREU_DT_REUNIAO_PERIODO_FIM" class="Formulario" size="10" readonly="true" style="border:#FFFFFF; color:#000000; margin-left:29px;" value="">
Tenho um Iframe carregando um calendario, onde os dias que eu clicar quero jogar em um campo da página principal.
Desculpe pode parecer simples mas não estou conseguindo, tentei de varias formas segue abaixo:
CODIGO DO IFRAME
Script
function Data_Fim(valor_1)
{ window.opener.form_reservar.MREU_DT_REUNIAO_PERIODO_FIM.value = valor_1; }
Link do calendario
<a href='#' onclick=java script:Data_Fim('"&VALOR_DATA&"')>Dia</a>
PAGINA PRINCIPAL QUE CARREGA O IFRAME
Campo do Form com o name='form_reservar'
<input name="MREU_DT_REUNIAO_PERIODO_FIM" type="text" id="MREU_DT_REUNIAO_PERIODO_FIM" class="Formulario" size="10" readonly="true" style="border:#FFFFFF; color:#000000; margin-left:29px;" value="">
#935832 Recuperar Valor Do Campo Form Em Href
Posted by
on 10/09/2008, 10:42
in
Javascript / DOM / AJAX / ECMAScript
Caro, o recurso do css tem que ser aplicado no href:
Com isso abre uma janela conforme img anexo:
<a href="detalhes_reserva_busca_rapida.asp?NR_REUNIAO='+document.form_reservar.BUSCAR_RNAO_NR_REUNIAO.value+'&keepThis=true&TB_iframe=true&height=400&width=730" title='Clicar para mais detalhes.' class='thickbox'>
Com isso abre uma janela conforme img anexo:
<a href="detalhes_reserva_busca_rapida.asp?NR_REUNIAO='+document.form_reservar.BUSCAR_RNAO_NR_REUNIAO.value+'&keepThis=true&TB_iframe=true&height=400&width=730" title='Clicar para mais detalhes.' class='thickbox'>
Attached Thumbnails
#935524 Recuperar Valor Do Campo Form Em Href
Posted by
on 08/09/2008, 13:09
in
Javascript / DOM / AJAX / ECMAScript
Caro, fiz a função conforme disse, mais tem um pequeno problema:
Tenho que chamar com esses parametros mesmo, pq uso alguns recursos em css e ajax.
<a href="detalhes_reserva_busca_rapida.asp?NR_REUNIAO='+document.form_reservar.BUSCAR_RNAO_NR_REUNIAO.value+'&keepThis=true&TB_iframe=true&height=400&width=730" title='Clicar para mais detalhes.' class='thickbox'>
Tenho que chamar com esses parametros mesmo, pq uso alguns recursos em css e ajax.
<a href="detalhes_reserva_busca_rapida.asp?NR_REUNIAO='+document.form_reservar.BUSCAR_RNAO_NR_REUNIAO.value+'&keepThis=true&TB_iframe=true&height=400&width=730" title='Clicar para mais detalhes.' class='thickbox'>
#934841 Recuperar Valor Do Campo Form Em Href
Posted by
on 03/09/2008, 18:21
in
Javascript / DOM / AJAX / ECMAScript
Caros, antes de posta fiz uma busca mas não localizei nenhum exemplo que viesse ajudar.
Estou querendo recuperar um valor digitado em determinado campo do formulário, conforme exemplo abaixo:
O nome do Formulário é Form_Busca_Calendario
Campo do Form:
<input name="BUSCAR_RNAO_NR_REUNIAO" type="text" class="Formulario" id="BUSCAR_RNAO_NR_REUNIAO">
Link na Imagem:
<a href="detalhes_reserva_busca_rapida.asp?ID_RNAO_NR_REUNIAO='+document.Form_Busca_Calendario.BUSCAR_RNAO_NR_REUNIAO.value+'&keepThis=true&TB_iframe=true&height=400&width=730" title='Clicar para mais detalhes.' class='thickbox'><img src="img/lupa.gif" border="0"></a>
Estou querendo recuperar um valor digitado em determinado campo do formulário, conforme exemplo abaixo:
O nome do Formulário é Form_Busca_Calendario
Campo do Form:
<input name="BUSCAR_RNAO_NR_REUNIAO" type="text" class="Formulario" id="BUSCAR_RNAO_NR_REUNIAO">
Link na Imagem:
<a href="detalhes_reserva_busca_rapida.asp?ID_RNAO_NR_REUNIAO='+document.Form_Busca_Calendario.BUSCAR_RNAO_NR_REUNIAO.value+'&keepThis=true&TB_iframe=true&height=400&width=730" title='Clicar para mais detalhes.' class='thickbox'><img src="img/lupa.gif" border="0"></a>
#927815 Select + Multiple
Posted by
on 29/07/2008, 15:45
in
Javascript / DOM / AJAX / ECMAScript
Caros, tenho em meu formulário um Select com multiple.
Como faço para dar um alert em todos os valores selecionados nesse campo, separando por ( ; ) :
<select name="BAIRRO" size="5" id="BAIRRO" multiple="multiple" onChange="alerta()">
<option value="A">A</option>
<option value="B">B</option>
<option value="C">C</option>
</select>
<script>
function alerta()
{
alert ('A;B')
}
</script>
Como faço para dar um alert em todos os valores selecionados nesse campo, separando por ( ; ) :
<select name="BAIRRO" size="5" id="BAIRRO" multiple="multiple" onChange="alerta()">
<option value="A">A</option>
<option value="B">B</option>
<option value="C">C</option>
</select>
<script>
function alerta()
{
alert ('A;B')
}
</script>
