ViaPocket

Amigos, alguém pode dar um help??

Peguei este código porque diz que ser compatível com todos os navedagores...mas quando faço um AJAX com ela não roda no Firefox. Este é o código // a funcao abaixo funciona em qualquer // browser ou versão. function createXMLHTTP() { var ajax; try { ajax = new ActiveXObject("Microsoft.XMLHTTP"); } catch(e) { try { ajax = new ActiveXObject("Msxml2.XMLHTTP"); alert(ajax); } catch(ex) { try { ajax = new XMLHttpRequest(); } catch(exc) { alert("Esse browser não oferece suporte para Ajax"); ajax = null; } } return ajax; } var arrSignatures = ["MSXML2.XMLHTTP.5.0", "MSXML2.XMLHTTP.4.0", "MSXML2.XMLHTTP.3.0", "MSXML2.XMLHTTP", "Microsoft.XMLHTTP"]; for (var i=0; i < arrSignatures.length; i++) { try { var oRequest = new ActiveXObject(arrSignatures[i]); return oRequest; } catch (oError) { } } throw new Error("MSXML não está instalado em seu computador."); } E o AJAX que uso é assim &lt;script> function carregaModulos() { var objModulos = createXMLHTTP(); objModulos.open("post", "Backend/select/curso_abaModulos.asp", true); objModulos.setRequestHeader("Content-Type", "application/x-www-form-urlencoded"); objModulos.onreadystatechange=function(){ if (objModulos.readyState==3){ document.getElementById("AjaxLoadingModulo").style.visibility = "visible"; } else if (objModulos.readyState==4){ document.all.divModulo.innerHTML = objModulos.responseText; document.getElementById("AjaxLoadingModulo").style.visibility = "hidden"; }} objModulos.send("txtCodCurso=" + frmCurso.txtCodCurso.value); objModulos.send(); } </script> Só não funciona no Firefox! Help!

O código não funciona direito. Deveria verificar se existe pelo um checkbox marcado, se sim, direcionar para a página que falar o delete no banco de dados. Mas ele apresenta algumas falhas: 1) quando só tem um registro no meu "grid" ele não reconhece o checkbox que marquei. Exibe logo a mensagem para selecionar um item. 2) Às vezes, quando selecione vários itens nem todos são apagados. Tipo, selecione uns 10 itens e uns 3 ou mais não são apagados talvez este seja problema na página que faz o delete. Bom, se alguém tiver um script para esta finalidade ficarei agradecido. &lt;script language="JavaScript"> function verificaSelecaoCheckbox() { var checkSelected=false; for(var i=0;i<document.frmGrid.IDRegistro.length;i++) { var total=0; if (document.frmGrid.IDRegistro[i].checked){ checkSelected=true; total=total+1; //total selecionado } for(var j=0;j<total;j++) { document.frmGrid.action="acoes/delete/setup_curso.asp?id="+document.frmGrid.IDRegistro[i].value; document.frmGrid.submit(); } } if(!checkSelected){ alert("Por favor, selecione um ou mais curso(s) para ser(em) excluído(s)."); return false; } } </script> E este é o código da página que deleta. 'Delimita valores recebidos----------------------------------------------------------------------- varIdOrigemUrl=TrataString(Request.QueryString("id")) varSplit=Split(varIdOrigemUrl,",") Dim iLoop For iLoop=LBound(varSplit) to UBound(varSplit) varLote=Trim(varSplit(iLoop)) 'Exclui registro(s) do banco de dados------------------------------------------------------------- sqlDelete = "DELETE FROM CURSOS WHERE CURSOS.CursoCod='" & varLote & "'" MM_conexao_STRING.Execute(sqlDelete) Next O que tem de errado?? Brigado!

Olá Fulvio. Perfeito! Consegui entender tudo. Boa didática. Agora falarei sobre a entidade EVENTO. Uma das funcionalidades do meu sistema é gerenciar a realização de eventos (palestras, treinamentos, workshops e etc) Guardo nesta tabela informaões como data e horário de realização, local, lotação e por aí vai. Este modelo que me ajudou a criar estará associado a entidade EVENTO para que eu possa ter: -dados do evento em geral, -o curso que foi realizado neste evento -o número da turma que que fez o curso no evento -e os alunos que participaram. Minha regra é que um evento só poderá comportar a realização de UM curso (relação N para N, certo?) Então se estiver tudo certo vem a pergunta. Como associo EVENTO com as demais entidades? Devo guardar a PK de ALUNO no EVENTO ou o contrário, a PK de EVENTO em ALUNO?

Bom dia Fulvio! Agradeço pela explicação detalhada. Bom, creio que minha situação seja: - 1 pessoa pode fazer inscrições para vários cursos - ai terá um relacionamento de M para N - terá que criar nova entidade para realizar a normalização. Isso criará a seguinte estrutura. CURSO -IdCurso TURMAS -IdTurmas TAB_INTERMEDIARIA -IdTab (PK) -IdCurso(FK) -IdTurmas(FK) E finalmente as inscrições. INSCRICOES -IdInscricoes (PK) -IdTab(FK) --> id da tabela intermediária -IdFuncionario É isso? Está certo? Bom, se estiver correto vem outra pergunta. Tenho uma tab chamada EVENTOS (é o evento que efetiva os cursos, turmas e etc). Quero saber se a PK de EVENTO vai para a tab INTERMEDIARIA como FK ou se seria o contrário, a PK da tab INTERMEDIÁRIA indo como FK para EVENTO. Ou então se seria a PK do EVENTO indo para INSCRCIOES como FK. Acho que seria a PK da INTERMEDIARIA indo como FK para EVENTO. Mas me corrija se eu estiver enganado. Brigadão!

É isso ae amigos. Tenho as entidades Curso, Turmas e Inscrições. Sendo que: Relação UM para N de Curso para Turmas. Acho que isso é o correto. Minha dúvida é quanto a entidade Inscrições.Quaria saber qual das situações abaixo seria mais adequada. 1) Armazenar na tabela INSCRICOES o ID somente da tabela TURMAS (pois a tab TURMAS já terá o ID da tabela CURSO) junto com o ID da tabela FUNCIONARIOS (que serão os inscritos, no caso) 2) Criar uma tabela intermediária, guardar nela o ID do CURSO e ID de TURMAS. Depois, pegar a PK resultante desta tabela intermediária e armazenar na tabela INSCRICOES, junto com o ID de FUNCIONARIOS (que serão os inscritos, no caso) Acho que a segunda opção faz mas sentido. Mas quero saber a opinião dos colegas. É a mesma dúvida que sempre tenho em cadastros.Nunca sei ao certo se num determinado cadastro faz mais sentido armazenar o código do Estado e da Cidade da pessoa, ou se o melhor seria guardar apenas o código da cidade (pois a cidade já tem o código do Estado). Ó dúvida cruel hehehe Obrigado!

Opa! Consegui!!! Obrigado, Bareta! Desenvolvi com base em sua lógica.

Olá Bareta. Acho que o negócio é por aí...mas ainda estou penando um pouco. Vamos lá. Veja só. O código é pra fazer um insert em lote. <% varBlocoInscricao=Split(varIdInsc,",") Dim varLoop For varLoop=LBound(varBlocoInscricao) to UBound(varBlocoInscricao) A=Trim(varBlocoInscricao(varLoop)) %> O código acima está ok. Mas é neste trecho que preciso pegar a variável A (que está com layout igual 3#5$142) e desmembrar pra ficar assim: var1=3 var2=5 var3=142 Lebrando que cada variável pode ter seu tamanho com mais ou menos caracteres. Depois faço o insert no banco usando var1, var2 e var3 E movo para o próximo <% Next%> Ficarei muito grato se puder ajudar. Obrigado!

Oi Bareta. Obrigado pela ajuda...fiz uns "negócios" aqui e funfou hehehe. Dim v, CaminhoPasta v=Request.ServerVariables("APPL_PHYSICAL_PATH")&("TD\Clientes") Set NovaPasta = varObjFSO.CreateFolder(v&("\Pasta")) Abs.

Minha dificuldade é usar o FSO para criar pasta e arquivos em diretório diferente do que se encontra a página que roda o script. Para ilustrar. A página que roda o script FSO está em D:\Windows\Sites\MeuSite\Setup\acoes\insert\criapasta.asp Porém, quero criar pastas e arquivos em D:\Windows\Sites\MeuSite\TD\Pastas Usando varObjFSO.CreateFolder(Server.MapPath("teste")) só cria a pasta no mesmo diretório onde esta a página Tentei também varObjFSO.CreateFolder(Server.MapPath("../MeuSite/TD/Pastas/teste")) mas não rolou... :-(( Além disso preciso que seja usado caminho virtual, e não físico. Pois uma hora posso mudar de host e o caminho físico pode ser diferente...aí lascou. Obrigado.

Ok, meu amigo. Obrigado! Ah, deixa eu aproveitar o tópico e perguntar. Você teria um exmeplo de Ajax lendo JSON?? Nunca achei um exemplo que compreenda as três etapas do processo: página de backend EM ASP que faz o select e coloca num layout JSON, página cliente e o código em Javascript que faz o intercâmbio/interpretação do JSON e escreve os dados na página cliente. Se tiver algo e puder compartilhar ficarei muito agradecido.

Não. Terei pop-up pequenas similiar a um Alert e grandes (próximo a 500x400). Então o layout mudará conforme necessidade. Uns terão até grid de registros.

Pessoal, quero substituir os pop-ups da minha app por pop-ups feitos com DIV carregando seu conteúdo via AJAX. Porém quero saber de vocês qual seria a melhor "técnica" de fazer isso. Quero saber se é melhor carregar via AJAX toda a página que seria o meu pop-up. Ou então se seria mais indicado escrever o código do pop-up na página principal (deixando oculto) e apenas carregar os dados via AJAX e depois exibir o pop-up com os dados carregados. Pergunto isso porque algumas páginas vão precisar ter uns 8 pop-ups associados a ela...e se for pra usar a segunda opção a página ficará gicantesca só de códificação. TEnho medo de ter a performance das páginas mãe prejudicadas. Obrigado.

Onde ?? Em que linha?

Olá Iceguy. Não rolou :-(( Olha o erro Erro de compilação do Microsoft VBScript erro '800a03ee' ')' esperado /TD/teste.asp, linha 5 Dim vetor(0 To 3) ------------^ varIdInscrito=Response.Write("123#456$789@xxxxx") '-- Declaração de variáveis Dim vetor(0 To 3) Dim itemVetor Dim caracter Dim itemString '-- Fim Declaração '-- Inicialização de variáveis vetor(0) = Empty vetor(1) = Empty vetor(2) = Empty vetor(3) = Empty itemVetor = 0 '-- Fim Inicialização For itemString = 1 To Len(varIdInscrito) caracter = Mid(varIdInscrito, itemString, 1) Select Case caracter Case "#", "$", "@": itemVetor = itemVetor + 1 Case Else: vetor(itemVetor) = vetor(itemVetor) & caracter End Select Next itemString

Seguinte. Passo isso via AJAX <%=rs("CadPessoalCod")%>$<%=rs("CadPessoalCodDepto")%>#<%=rs("CadPessoalCodCargo")%>">@<%=rs("CadPessoalNome")%> O resultado é algo tipo 123$456#789@nome_do_caboclo Preciso separar isso e colocar em quatro variáveis pra ficar assim: var1 = 123 var2=456 var= 789 var4=Nome_do_caboclo Lembrando que a quantidade de carateres em cada um dos blocos é variável. Como realizo esta façanha??? To me descabelando com LEFT, RIGHT e MID...mas num tá rolando... :-(( Brigado!

Opa! Acho que é quase isso sim. Tenho este AJAX que está funfando: &lt;script> function carregaRegiao() { var objRegiao = createXMLHTTP(); objRegiao.open("post", "Ajax/regioes.asp", true); objRegiao.setRequestHeader("Content-Type", "application/x-www-form-urlencoded"); objRegiao.onreadystatechange=function(){ if (objRegiao.readyState==3){ document.getElementById("ajaxLoad").style.visibility = "visible"; } else if (objRegiao.readyState==4){ document.all.divRegiao.innerHTML = objRegiao.responseText; document.getElementById("ajaxLoad").style.visibility = "hidden"; }} objRegiao.send(); } </script> E tem este recordset que tb funciona: <% if rs.EOF then Else rs.Move start Do Until rs.eof %> {"Municipio":[{"id":"<%=(rs.Fields.Item("SisMunCod").Value)%>", "Desc":"<%=(rs.Fields.Item("SisMunDesc").Value)%>", "CodEstado":"<%=(rs.Fields.Item("SisMunCodEstado").Value)%>"]} <% 'Add Comma To End Of JSON Line If It Isn't The Last Record rs.movenext If Not rs.eof Then Response.Write "," End If loop End if %> Minha real necessidade é pegar este recordset pelo AJAX e colocar num script JS (similar ao que você postou). Mas estou perdido em como fazer isso. Preciso deste "fio da meada" pra montar as demais páginas que farão uso da mesma metodologia.

Help com JSON!!! Preciso fazer algo simples mas não estou sabendo como. Isso é o resultado de um recordset que gostaria de ler com JS numa página no cliente. {"Municipio":[{"id":"<%=(rs.Fields.Item("SisMunCod").Value)%>", "Desc":"<%=(rs.Fields.Item("SisMunDesc").Value)%>", "CodEstado":"<%=(rs.Fields.Item("SisMunCodEstado").Value)%>"]} Como monto o JS?? Se for com JQuery melhor ainda! Obrigado!