fantasma
Membros-
Total de itens
901 -
Registro em
-
Última visita
Tudo que fantasma postou
-
ve isso se realmente a variavel esta chegando titulo=request.querystring("titulo") response.write titulo
-
tenta ai falouuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuu <% data_source = "DRIVER={MySQL ODBC 3.51 Driver}; Server=mysqlhost; Port=3306; Option=0; Socket=; Stmt=; Database=banco; Uid=usuario; Pwd=senha;" Set con = Server.CreateObject("ADODB.Connection") con.cursorlocation = 3 con.Open data_source Response.Buffer = False cidade = request.querystring("cidade") sql = "select * from centrais order by cidade" set rs = con.execute(sql) %> <html> <head></head> <body> <form name="form1" method="post"> <select name="cidade" onchange="window.navigate('teste.asp?cidade='+form1.cidade.value)"> <option value="SELECIONE">Selecione o cidade</option> <% If Not RS.EOF Then While Not RS.EOF Response.Write "<OPTION VALUE='" & RS("cidade") & "'" If Request("cidade") = RS("cidade") Then Response.Write " selected" Response.Write ">" & RS("cidade") & "</OPTION>" RS.MoveNext Wend End If %> </select> <% if cidade = "" then %> <select name="NomedoFuncionario"> <option value="SELECIONE">Selecione a NomedoFuncionario</option> </select> <% else sqlcid = "select * from cadastro_funcionarios_centrais WHERE central2 = '" &estado& "'" set rs1 = con.execute(sqlcid) %> <select name="NomedoFuncionario"> <option value="SELECIONE">Selecione a NomedoFuncionario</option> <% while not rs1.eof %> <option value="<%=rs1("NomedoFuncionario")%>"> <%=rs1("NomedoFuncionario")%> </option> <% rs1.movenext wend %> </select> <% end if %> </form>
-
Estou testando o cod assim que estiver um novidade te aviso
-
você pode postar o cod inteiro
-
se for via link você tem que usar id=request.querystring("id")
-
de uma olhada neste cod <html> <HEAD> <script LANGUAGE="JavaScript"> <!-- Begin var arrItems1 = new Array(); var arrItemsGrp1 = new Array(); <!--*****************Itens que serão carregados no 2º combobox*******************--> arrItems1[3] = "Arroz"; arrItemsGrp1[3] = 1; arrItems1[9] = "Trigo"; arrItemsGrp1[9] = 1; arrItems1[4] = "Caderno"; arrItemsGrp1[4] = 2; arrItems1[5] = "Lapis"; arrItemsGrp1[5] = 2; arrItems1[8] = "Caneta"; arrItemsGrp1[8] = 2; arrItems1[6] = "Borracha"; arrItemsGrp1[6] = 2; arrItems1[7] = "Apagador"; arrItemsGrp1[7] = 2; arrItems1[0] = "Refrigerante"; arrItemsGrp1[0] = 3; arrItems1[1] = "Sucos"; arrItemsGrp1[1] = 3; arrItems1[2] = "Cervejas"; arrItemsGrp1[2] = 3; <!--*****************Itens que serão carregados no 3º combobox*******************--> var arrItems2 = new Array(); var arrItemsGrp2 = new Array(); arrItems2[21] = "Coca Cola"; arrItemsGrp2[21] = 0 arrItems2[22] = "Dolly"; arrItemsGrp2[22] = 0 arrItems2[31] = "Tang"; arrItemsGrp2[31] = 1 arrItems2[34] = "Maguary"; arrItemsGrp2[34] = 1 arrItems2[35] = "Schim"; arrItemsGrp2[35] = 2 arrItems2[36] = "Bavaria"; arrItemsGrp2[36] = 2 arrItems2[37] = "Brahma"; arrItemsGrp2[37] = 2 arrItems2[38] = "Scholl"; arrItemsGrp2[38] = 2 arrItems2[99] = "Preto HB2"; arrItemsGrp2[99] = 5 arrItems2[100] = "Preto HB5"; arrItemsGrp2[100] = 5 arrItems2[57] = "Cinza HB7"; arrItemsGrp2[57] = 5 arrItems2[101] = "Tio João"; arrItemsGrp2[101] = 3 arrItems2[102] = "Solito"; arrItemsGrp2[102] = 3 arrItems2[190] = "Candeias"; arrItemsGrp2[190] = 3 arrItems2[103] = "Universitário 100pg"; arrItemsGrp2[103] = 4 arrItems2[104] = "Universitário 200pg"; arrItemsGrp2[104] = 4 arrItems2[105] = "Faber Castel"; arrItemsGrp2[105] = 6 arrItems2[106] = "Lond red"; arrItemsGrp2[106] = 6 arrItems2[200] = "Quadro Branco"; arrItemsGrp2[200] = 7 arrItems2[201] = "Quadro Negro"; arrItemsGrp2[201] = 7 arrItems2[470] = "Kilometrica"; arrItemsGrp2[470] = 8 arrItems2[471] = "BIC"; arrItemsGrp2[471] = 8 arrItems2[352] = "Dona Benta"; arrItemsGrp2[352] = 9 arrItems2[353] = "Trigo Vaz"; arrItemsGrp2[353] = 9 <!--*****************Itens que serão carregados no 3º combobox*******************--> function selectChange(control, controlToPopulate, ItemArray, GroupArray) { var myEle ; var x ; // Empty the second drop down box of any choices for (var q=controlToPopulate.options.length;q>=0;q--) controlToPopulate.options[q]=null; if (control.name == "PRIMEIRO") { // Empty the third drop down box of any choices for (var q=myChoices.TERCEIRO.options.length;q>=0;q--) myChoices.TERCEIRO.options[q] = null; } // ADD Default Choice - in case there are no values myEle = document.createElement("option") ; myEle.value = 0 ; myEle.text = "SELECIONE" ; controlToPopulate.add(myEle) ; // Now loop through the array of individual items // Any containing the same child id are added to // the second dropdown box for ( x = 0 ; x < ItemArray.length ; x++ ) { if ( GroupArray[x] == control.value ) { myEle = document.createElement("option") ; myEle.value = x ; myEle.text = ItemArray[x] ; controlToPopulate.add(myEle) ; } } } // End --> </script> </HEAD> <BODY> <form name=myChoices> <table align="center"> <tr> <td> <SELECT id=PRIMEIRO name=PRIMEIRO onchange="selectChange(this, myChoices.SEGUNDO, arrItems1, arrItemsGrp1);"> <option value=0 SELECTED>Selecione</option> <option value=1>Alimentos</option> <option value=2>Bazar</option> <option value=3>Bebidas</option> <option value=4>Eletronicos</option> </SELECT> </TD><TD> <SELECT id=SEGUNDO name=SEGUNDO onchange="selectChange(this, myChoices.TERCEIRO, arrItems2, arrItemsGrp2);"></SELECT> <SELECT id=TERCEIRO name=TERCEIRO ></SELECT> </TD> </TR> </TABLE> </form> </html> Vou verif em asp o problema
-
quero alterar proteção de tela atraves de arquivo.bat e tb bloquear a alteração da proteção de tela tem jeito
-
tenta assimm MsgBody = "<font color=blue size=3>AAAAAAAAA:</font>"& Request.Form("teste") &"<br></body></html>" Ai você vai substituir pelos seus names
-
quero alterar proteção de tela atraves de arquivo.bat e tb bloquear a alteração da proteção de tela tem jeito
-
aqui neste link tb tem varios tipos de conexões http://www.connectionstrings.com/
-
você esta usando banco de dados
-
<% Dim lojaDB,db_path db_path = Server.MapPath("noticias.mdb") set lojaDB = Server.CreateObject("ADODB.Connection") lojaDB.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & db_path lojaDB.open %> tenta usar assim e tb entra em contato com o provedor parra verificar permissão de pasta
-
Qual o nome do diretorio onde esta o banco
-
Criar a conexão e fazer o select eu já fiz isso e funcionou
-
você vai verificar a data se for igual acrescenta +1 e verifica a area acrecentando tb +1 se não entendeu informe que passarei o cod
-
De uma olhada neste link http://www.superasp.com.br/conteudo/artigos/artigo_350.asp vê se te ajuda
-
você já tentou reiniciar ele.
-
você que esta criando a pagina do outro link tb
-
você tera que utilizar um select e os campos que você quer agora referente a colocar embaixo de um link da empresa mão não entendi pode explicar melhor
-
faça a reinstalação configurando outra porta e ve se da algum problema
-
você digitou o comando no prompt, qual foi o resultado? você utiliza o programa chamado skype, ele pode dar problema tb.(apenas um aviso) porta pode ser 81
-
No prompt de comandos digite NETSTAT -A e verifique qual o outro processo que deve estar usando a porta 80. Pare o processo pelo gerenciador de tarefas ou configure no IIS para ele usar outra porta que não seja a 80.
-
faz o seguinte function FORMULA(va,parc,tax) if tax <> 0 then tax = (tax/100) FORMULA = va*(tax*(1+tax)^parc)/((1+tax)^parc-1) FORMULA = formatNumber(FORMULA,0) FORMULA = FORMULA &".00" elseif tax= 0 then Response.Redirect "pagina.asp" end if END function na pagina.asp colocar qualquer coisa para dar um resposta que não pode dividir por zero tenta ai
-
tenta assim function FORMULA(va,parc,tax) if tax <> 0 then tax = (tax/100) FORMULA = va*(tax*(1+tax)^parc)/((1+tax)^parc-1) FORMULA = formatNumber(FORMULA,0) FORMULA = FORMULA &".00" elseif tax= 0 then FORMULA = (va/parc) FORMULA = formatNumber(FORMULA,0) FORMULA = FORMULA &".00" end if END function