ursolouco
-
Total de itens
2.314 -
Registro em
-
Última visita
Tudo que ursolouco postou
-
Salve Moderadores!! Sei que muitos não gostam de mim no forum <_< , mas há uma coisa aqui que tá me deixando sem paciencia: :( Essa poh.... tá enxendo o saco toda hora. O que esta acontecendo ? :blink: Abraços!!! :) [urso]
-
Brother!! Seu servidor dá suporte a CDonts ?
-
Brother!!! Achei um código que altera os combos, feito em javascript, mas acredito que seja muito sofrido, ou até nem vale a pena usar, mas não custa tentar. Veja: <html> <head> <title></title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body> <form name="doublecombo"> <p><select name="example" size="1" onChange="redirect(this.options.selectedIndex)"> <option>Estados</option> <option>AC</option> <option>AL</option> <option>AM</option> <option>AP</option> <option>BA</option> <option>CE</option> <option>DF</option> <option>ES</option> <option>GO</option> <option>MA</option> <option>MG</option> <option>MG</option> <option>MS</option> <option>MT</option> <option>PA</option> <option>PB</option> <option>PE</option> <option>PI</option> <option>PR</option> <option>RJ</option> <option>RN</option> <option>RO</option> <option>RR</option> <option>RS</option> <option>RS</option> <option>SC</option> <option>SE</option> <option>SP</option> <option>TO</option> </select> <select name="stage2" size="1"> <option value=""></option> </select> </p> <script language=""> <!-- var groups=document.doublecombo.example.options.length var group=new Array(groups) for (i=0; i<groups; i++) group[i]=new Array() group[1][0]=new Option("Acrelândia","Acrelândia") group[1][1]=new Option("Assis Brasil","Assis Brasil") group[1][2]=new Option("Brasiléia","Brasiléia") group[1][3]=new Option("Bujari","Bujari") group[1][4]=new Option("Brasiléia","Brasiléia") group[1][5]=new Option("Capixaba","Capixaba") group[2][0]=new Option("Anadia","Anadia") group[2][1]=new Option("Arapiraca","Arapiraca") group[2][2]=new Option("Atalaia","Atalaia") group[2][3]=new Option("Barra de Santo Antônio","Barra de Santo Antônio") group[2][4]=new Option("Barra de São Miguel","Barra de São Miguel") group[2][5]=new Option("Batalha","Batalha") group[3][0]=new Option("Amaturá","Amaturá") group[3][1]=new Option("Anamã","Anamã") group[3][2]=new Option("Anori","Anori") group[3][3]=new Option("Apuí","Apuí") group[3][4]=new Option("Atalaia do Norte","Atalaia do Norte") group[3][5]=new Option("Autazes","Autazes") group[4][0]=new Option("Cidade1","Valor") group[4][1]=new Option("Cidade2","Valor") group[4][2]=new Option("Cidade3","Valor") group[4][3]=new Option("Cidade4","Valor") group[4][4]=new Option("Cidade5","Valor") group[4][5]=new Option("Cidade6","Valor") group[5][0]=new Option("Cidade1","Valor") group[5][1]=new Option("Cidade2","Valor") group[5][2]=new Option("Cidade3","Valor") group[5][3]=new Option("Cidade4","Valor") group[5][4]=new Option("Cidade5","Valor") group[5][5]=new Option("Cidade6","Valor") group[6][0]=new Option("Cidade1","Valor") group[6][1]=new Option("Cidade2","Valor") group[6][2]=new Option("Cidade3","Valor") group[6][3]=new Option("Cidade4","Valor") group[6][4]=new Option("Cidade5","Valor") group[6][5]=new Option("Cidade6","Valor") group[7][0]=new Option("Cidade1","Valor") group[7][1]=new Option("Cidade2","Valor") group[7][2]=new Option("Cidade3","Valor") group[7][3]=new Option("Cidade4","Valor") group[7][4]=new Option("Cidade5","Valor") group[7][5]=new Option("Cidade6","Valor") group[8][0]=new Option("Cidade1","Valor") group[8][1]=new Option("Cidade2","Valor") group[8][2]=new Option("Cidade3","Valor") group[8][3]=new Option("Cidade4","Valor") group[8][4]=new Option("Cidade5","Valor") group[8][5]=new Option("Cidade6","Valor") group[9][0]=new Option("Cidade1","Valor") group[9][1]=new Option("Cidade2","Valor") group[9][2]=new Option("Cidade3","Valor") group[9][3]=new Option("Cidade4","Valor") group[9][4]=new Option("Cidade5","Valor") group[9][5]=new Option("Cidade6","Valor") group[10][0]=new Option("Cidade1","Valor") group[10][1]=new Option("Cidade2","Valor") group[10][2]=new Option("Cidade3","Valor") group[10][3]=new Option("Cidade4","Valor") group[10][4]=new Option("Cidade5","Valor") group[10][5]=new Option("Cidade6","Valor") group[11][0]=new Option("Cidade1","Valor") group[11][1]=new Option("Cidade2","Valor") group[11][2]=new Option("Cidade3","Valor") group[11][3]=new Option("Cidade4","Valor") group[11][4]=new Option("Cidade5","Valor") group[11][5]=new Option("Cidade6","Valor") group[12][0]=new Option("Cidade1","Valor") group[12][1]=new Option("Cidade2","Valor") group[12][2]=new Option("Cidade3","Valor") group[12][3]=new Option("Cidade4","Valor") group[12][4]=new Option("Cidade5","Valor") group[12][5]=new Option("Cidade6","Valor") group[13][0]=new Option("Cidade1","Valor") group[13][1]=new Option("Cidade2","Valor") group[13][2]=new Option("Cidade3","Valor") group[13][3]=new Option("Cidade4","Valor") group[13][4]=new Option("Cidade5","Valor") group[13][5]=new Option("Cidade6","Valor") group[14][0]=new Option("Cidade1","Valor") group[14][1]=new Option("Cidade2","Valor") group[14][2]=new Option("Cidade3","Valor") group[14][3]=new Option("Cidade4","Valor") group[14][4]=new Option("Cidade5","Valor") group[14][5]=new Option("Cidade6","Valor") group[15][0]=new Option("Cidade1","Valor") group[15][1]=new Option("Cidade2","Valor") group[15][2]=new Option("Cidade3","Valor") group[15][3]=new Option("Cidade4","Valor") group[15][4]=new Option("Cidade5","Valor") group[15][5]=new Option("Cidade6","Valor") group[16][0]=new Option("Cidade1","Valor") group[16][1]=new Option("Cidade2","Valor") group[16][2]=new Option("Cidade3","Valor") group[16][3]=new Option("Cidade4","Valor") group[16][4]=new Option("Cidade5","Valor") group[16][5]=new Option("Cidade6","Valor") group[17][0]=new Option("Cidade1","Valor") group[17][1]=new Option("Cidade2","Valor") group[17][2]=new Option("Cidade3","Valor") group[17][3]=new Option("Cidade4","Valor") group[17][4]=new Option("Cidade5","Valor") group[17][5]=new Option("Cidade6","Valor") group[18][0]=new Option("Cidade1","Valor") group[18][1]=new Option("Cidade2","Valor") group[18][2]=new Option("Cidade3","Valor") group[18][3]=new Option("Cidade4","Valor") group[18][4]=new Option("Cidade5","Valor") group[18][5]=new Option("Cidade6","Valor") group[19][0]=new Option("Cidade1","Valor") group[19][1]=new Option("Cidade2","Valor") group[19][2]=new Option("Cidade3","Valor") group[19][3]=new Option("Cidade4","Valor") group[19][4]=new Option("Cidade5","Valor") group[19][5]=new Option("Cidade6","Valor") group[20][0]=new Option("Cidade1","Valor") group[20][1]=new Option("Cidade2","Valor") group[20][2]=new Option("Cidade3","Valor") group[20][3]=new Option("Cidade4","Valor") group[20][4]=new Option("Cidade5","Valor") group[20][5]=new Option("Cidade6","Valor") group[21][0]=new Option("Cidade1","Valor") group[21][1]=new Option("Cidade2","Valor") group[21][2]=new Option("Cidade3","Valor") group[21][3]=new Option("Cidade4","Valor") group[21][4]=new Option("Cidade5","Valor") group[21][5]=new Option("Cidade6","Valor") group[22][0]=new Option("Cidade1","Valor") group[22][1]=new Option("Cidade2","Valor") group[22][2]=new Option("Cidade3","Valor") group[22][3]=new Option("Cidade4","Valor") group[22][4]=new Option("Cidade5","Valor") group[22][5]=new Option("Cidade6","Valor") group[23][0]=new Option("Cidade1","Valor") group[23][1]=new Option("Cidade2","Valor") group[23][2]=new Option("Cidade3","Valor") group[23][3]=new Option("Cidade4","Valor") group[23][4]=new Option("Cidade5","Valor") group[23][5]=new Option("Cidade6","Valor") group[24][0]=new Option("Cidade1","Valor") group[24][1]=new Option("Cidade2","Valor") group[24][2]=new Option("Cidade3","Valor") group[24][3]=new Option("Cidade4","Valor") group[24][4]=new Option("Cidade5","Valor") group[24][5]=new Option("Cidade6","Valor") group[25][0]=new Option("Cidade1","Valor") group[25][1]=new Option("Cidade2","Valor") group[25][2]=new Option("Cidade3","Valor") group[25][3]=new Option("Cidade4","Valor") group[25][4]=new Option("Cidade5","Valor") group[25][5]=new Option("Cidade6","Valor") group[26][0]=new Option("Cidade1","Valor") group[26][1]=new Option("Cidade2","Valor") group[26][2]=new Option("Cidade3","Valor") group[26][3]=new Option("Cidade4","Valor") group[26][4]=new Option("Cidade5","Valor") group[26][5]=new Option("Cidade6","Valor") var temp=document.doublecombo.stage2 function redirect(x){ for (m=temp.options.length-1;m>0;m--) temp.options[m]=null for (i=0;i<group[x].length;i++){ temp.options[i]=new Option(group[x][i].text,group[x][i].value) } temp.options[0].selected=true } //--> </script> </form> </body> </html> Abraços!!!!
-
Putz Brother!! Desculpa pela minha exdruxula resposta. Nem vale a pena tentar. Foi mouse, prestei atenção no que você queria quando abri sua página de cadastro. Foi uma p*** falta de atenção. Acho que neste caso, você tem que usar um sisteminha em JavaScript, para que seja alimentado as cidades sem dar refresh no seu website e não perder as informações preenchidas. Vou dá uma pesquisada na web, e se encontrar coloco algo para lhe ajudar. Abraços!!!
-
Brother!!! Leiam esta materia antes de falar algo, por favor. Abraços!!!
-
Brother!! Talvez, quando o site ficar 'maduro' ele fique bom.... :lol: Alem de tar verdão, as fontes do menu do lado esquerdo estão pessimo. Nem deu pra tirar algo proveitoso, desculpe, mas é realidade. Abraços!!!
-
Brother!! Quando se usa PWS não é possivel se enviar e-mail, ou até hoje, eu nunca vi alguém conseguir. você tem que ter o IIS instalado na maquina, que obrigatoriamente, roda no Win2000 & XP Pró. Abraços!!!
-
Não brother!! Para criar uma session faça os seguinte: Session("Nome_da_sua_Session") <% .. .... 'Após o login estar "OK" Session("Logado") = True Session("Usuario") = Request.Form("Usuario") ..... ...%> Abraços!!!
-
Fiz um, simples, mas funciona, só precisa mexer alguns detalhes no BD ou se prefirir na instrução SQL: Index.asp <html> <head> <title>Index.asp</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <script language="JavaScript" type="text/JavaScript"> <!-- function MM_jumpMenu(targ,selObj,restore){ //v3.0 eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'"); if (restore) selObj.selectedIndex=0; } //--> </script> </head> <body> <form name="form1" method="post" action=""> <select name="Estados" onChange="MM_jumpMenu('parent',this,1)" > <option>Estados</option> <option value="Cidades2.asp?Est=AC">AC</option> <option value="Cidades2.asp?Est=AL">AL</option> <option value="Cidades2.asp?Est=AM">AM</option> <option value="Cidades2.asp?Est=AP">AP</option> <option value="Cidades2.asp?Est=BA">BA</option> <option value="Cidades2.asp?Est=CE">CE</option> <option value="Cidades2.asp?Est=DF">DF</option> <option value="Cidades2.asp?Est=ES">ES</option> <option value="Cidades2.asp?Est=GO">GO</option> <option value="Cidades2.asp?Est=MA">MA</option> <option value="Cidades2.asp?Est=MG">MG</option> <option value="Cidades2.asp?Est=MS">MS</option> <option value="Cidades2.asp?Est=MT">MT</option> <option value="Cidades2.asp?Est=PA">PA</option> <option value="Cidades2.asp?Est=PB">PB</option> <option value="Cidades2.asp?Est=PE">PE</option> <option value="Cidades2.asp?Est=PI">PI</option> <option value="Cidades2.asp?Est=PR">PR</option> <option value="Cidades2.asp?Est=RJ">RJ</option> <option value="Cidades2.asp?Est=RN">RN</option> <option value="Cidades2.asp?Est=RO">RO</option> <option value="Cidades2.asp?Est=PR">RR</option> <option value="Cidades2.asp?Est=RS">RS</option> <option value="Cidades2.asp?Est=SC">SC</option> <option value="Cidades2.asp?Est=SE">SE</option> <option value="Cidades2.asp?Est=SP">SP</option> <option value="Cidades2.asp?Est=TO">TO</option> </select> </form> </body> </html> Cidades2.asp <% Dim Estado Estado = CStr(Request.QueryString("Est")) Dim Conn, strConn, cBanco, Rs Set Conn = Server.CreateObject("adodb.connection") Set Rs = Server.CreateObject("adodb.recordset") cBanco = Server.MapPath("db/Cidades.mdb") strConn = "Provider = Microsoft.Jet.Oledb.4.0; Data Source = "& cBanco &";" Conn.Open(strConn) Select Case (Estado) Case "AC" cSQL = "Select * From AC" Case "AL" cSQL = "Select * From AL" Case "AM" cSQL = "Select * From AM" Case "AP" cSQL = "Select * From AP" Case "BA" cSQL = "Select * From BA" Case "CE" cSQL = "Select * From CE" Case "DF" cSQL = "Select * From DF" Case "ES" cSQL = "Select * From ES" Case "GO" cSQL = "Select * From GO" Case "MA" cSQL = "Select * From MA" Case "MG" cSQL = "Select * From MG" Case "MS" cSQL = "Select * From MS" Case "MT" cSQL = "Select * From MT" Case "PA" cSQL = "Select * From PA" Case "PB" cSQL = "Select * From PB" Case "PE" cSQL = "Select * From PE" Case "PI" cSQL = "Select * From PI" Case "PR" cSQL = "Select * From PR" Case "RJ" cSQL = "Select * From RJ" Case "RN" cSQL = "Select * From RN" Case "RO" cSQL = "Select * From RO" Case "RR" cSQL = "Select * From RR" Case "RS" cSQL = "Select * From RS" Case "SC" cSQL = "Select * From SC" Case "SE" cSQL = "Select * From SE" Case "SP" cSQL = "Select * From SP" Case "TO" cSQL = "Select * From TO" End Select Set Rs = Conn.Execute(cSQL) %> <html> <head> <title>Cidades2.asp</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body> <select name="Cidades" id="Cidades"> <option value="Cidades Disponiveis">Cidades Disponiveis</option> <%While Not Rs.EOF%> <option value="<%=Rs(1)%>"><%=Rs(1)%></option> <% Rs.MoveNext%> <%Wend%> </select> </body> </html> <% Rs.Close Set Rs = Nothing Conn.Close Set Conn = Nothing %> Tá simples de tudo, veja se é isto que você precisa brother. Obs: tá faltando uns estados ai, mas é um detalhezinho bobo. Abraços!!!
-
Brother!! Erro na imagem ? A Imagem esta no mesmo diretorio que esta sendo enviado o arquivo ? Abraços!!!
-
Brother!! Tá virando questão de honra..... <% cBanco = Server.MapPath("db/Enquete.mdb") Set Conn = Server.CreateObject("adodb.connection") strConn = "Provider = Microsoft.Jet.oledb.4.0; Data Source = "& cBanco &";" Set Rs = Server.CreateObject("adodb.recordset") Conn.Open(strConn) Login = CStr(Request.QueryString("Login")) Pontos = Request.QueryString("Pontos") Rs.Open "UpDate Usuarios Set Pontos ='0' Where Login ='"& Login &"'", Conn, 3,3 Response.Write("Amo o ursolouco!") Rs.Close Conn.Close Set Rs = Nothing Set Conn = Nothing %> Abraços!!!
-
Brother!! <% Set Conn = Server.CreateObject("adodb.connection") cBanco = Server.MapPath("banco.mdb") strConn = "Provider = Microsoft.Jet.Oledb.4.0; Data Source = "& cBanco &";" Conn.Open(strConn)%> Veja se pode lhe ajudar.. Abraços!!!
-
Vejamos!!! Olha ai, que por hoje é só, vou pra kasa, e agora só segundona Abraçoss
-
Brother!! Testei seu código, ele processa normal, porem escreve na tela o email que o cara digitou no campo email. Faz o seguinte: Coloca os dois código aqui pra mim ver...
-
Brother!! você diz: - O cara preenche - Envia - Processa - Volta - E os valores ainda tem que estar lá ? É isso ? Tò meio confuso na sua dúvida, ainda não entendi direito. Acho que seja: <% txtarea = Session("Mensagem")%> Porque o valor do campo da txtArea, tem que ser preenchido no retorno, e não sei se dá pra fazer isto em ASP.
-
Brother!! Ele não esta redirecionando para o arquivo deleta.asp ? Olha com calma seu código...
-
Deividy!! Mail enviado com CDonts !! [v. Ursolouco] <% nome = Request.QueryString("nome") email = Request.QueryString("email") email = CStr(email) Dim msg, texto Set msg = Server.CreateObject("CDONTS.NewMail") texto = "<html><body>" texto = texto & "<center>Este email está sendo enviado no formato HTML</center><p>" texto = texto & "Você pode colocar qualquer TAG que desejar. " texto = texto & "<a href=http://www.cohesp.com.br>LINK</a>." texto = texto & "</body></html>" msg.From = "deividy@cohesp.com.br" msg.To= email msg.Subject = "Email em HTML" msg.BodyFormat = 0 msg.MailFormat = 1 msg.Body = texto meuGif = Server.MapPath("logoAgenteAmbiental.gif") msg.AttachFile(meuGif) msg.Send Set msg = Nothing %> Veja se funciona amigão!! Abraços!!
-
Não, qual o erro desta vez ?
-
Acho que sim!! Experimente reiniciar o sistema (se for local é claro)!!!
-
Hãn.... ? Endoidou é ? ASP dando este tipo de erro ?
-
Vixe!!! Esqueci o "L" zinhu... Valeu... E ai deividy, resolveu ?
-
Brother!!! Nada a ver isto, você acha que, um diretor, de uma grande compania, que desenvolve um software que é ultilizado por milhões de usuário no brasil e no mundo iria falar isso por pedido ou relação a outra empresa ? Nada a ver..... Acho que o cara falou aquilo, porque chegou a um ponto que os engenheiros não estão conseguindo dar continuidade no desenvolvimento para distribuição da aplicação, só isso..
-
É Brother!! Esta foi mesmo a unica solução que encontrei. Já instalei o 2000zão lá em casa e tá rodando. Valeu Laranjeira!! Abraços Brother!!! MODERADOR: Feche o tópico por favor..
