Ir para conteúdo
Fórum Script Brasil

ursolouco

Veteranos
  • Total de itens

    2.314
  • Registro em

  • Última visita

Tudo que ursolouco postou

  1. Sei lá Brother... Nestes casos, particularmente gosto de deixar os campos com mesmo nome e apenas alterar seu 'value'. Recolho os dados e com um Looping 'For Each' percorro os dados e monto um vetor.. para depois inseri-los no banco de dados.
  2. ursolouco

    Incluir Produto....

    Nobre Senhores!! Já que esta sendo aceita sugestões, pode ser feito uma coisa, que particularmente achei impressionante, é realizar uma busca dentro do seu banco de dados, separa-los em vetores, armazenar em 'Application("")' [aberta para cada usuário] e ir mudando os valores e somente, lá no finalzinho, fazer login e tudo mais, realizar as alterações no banco de dados e reduzir o estoque (hehhehe, básicamente aprendi isso no livro de e-commercer com ASP). Se for de valor, fica aí a minha dica.. Abraços!! [urso]
  3. ursolouco

    Interação Com O Flash

    Inserir dados no ASP via formulário no Flash.
  4. Aspers!!! Usando 'HTML FILE CONTROL' com VB.Net!!! <html> <head> </head> <body> <h3>Using Html File Control</h3> <form enctype="multipart/form-data" runat="server"> Selecione o arquivo para Upload: <input type="file" id="fileControl" runat="server"><br> Salve como: (Insira o nome e a extensão): <input id="txtTargetName" type="text" runat="server"><br> <input type=button id="btnLoad" value="Upload" OnServerClick="btnLoad_Click" runat="server"><br> <span id=span1 runat="server" /><br> </form></html> <script language="VB" runat="server"> Sub btnLoad_Click(s As Object, e As EventArgs) If txtTargetName.Value = "" Then span1.InnerHtml = "Erro: Insira um nome para o arquivo" Return End If If Not (fileControl.PostedFile Is Nothing) Then Try fileControl.PostedFile.SaveAs((Server.Mappath("\ursername\db\") + txtTargetName.Value)) span1.InnerHtml = "Arquivo enviado para<b>.\db\" & _ txtTargetName.Value & "</b> em seu servidor web." Catch err As Exception span1.InnerHtml = "Erro ao salvar arquivo em <b>.\db" & _ txtTargetName.Value & "</b><br>" & err.ToString() End Try End If End Sub </script> </body> Util para upload dentro do Brinkster
  5. ursolouco

    Logoff

    Vanessa!! (porque este nome não me traz sorte ? ) Nas paginas, onde devem ser restrita, você esta usando 'If' ? <% If Session("Logado") <> "OK" Then Response.Redirect("Login.asp") End If %> O código, esta aparentemente certo, mas o que tem que ser visto é ser as areas restritas devem fazer uma verificação sempre antes de liberar o acesso OBS: você não é de campinas né ? []s
  6. ursolouco

    Novo Moderador !

    Salve Galera!! Vamos por um 'pingo' neste 'I' de uma vez por todas, mas antes..... "Tá todo mundo falando que o sapinho foi facil, mas que vocês tomaram uns tapas dele tomaram.........." Vide cores agora Bom, agradeço a todos aqui, vou deixar bem claro que não vou deixa-los na mão e/ou coisa do tipo, só vou dizer que estarei aqui, com menos frequencia, afinal de contas, o telefone de casa tá cortado, e talvez, os caras aqui do trampo tão pra cortar o acesso a web dos manos do suporte e não sei como vai ser ... Gostaria de deixar aqui, um salve especial para os seguinte membros: - William Rodrigues: Sem palavras Rapaz, siga sua trilha, mantenha sempre sua cabeça erguida, tome coragem e não pense no que fez, sempre no que vai fazer, não olhe e se arrependa, apenas pense no que vai dizer e fazer. Com certeza, você chega lá Brother. - Pgmador: Brother, sem palavras..... você foi o primeiro cara que quando cheguei que demonstrou conhecimento, capacidade, personalidade a atitude de ajudar as pessoas. - Reginaldo_ASP: Sem dúvidas, um dos caras mais firmeza que já conheci na web. Sempre dando novas idéias e criatividade para a seção ASP durante sua participação e administração da seção. - [Guto]: Tem tudo para ser um ótimo profissional. Alem de caracter e responsabilidade, é um ótimo ser. Boa Sorte Brother - Bicicleta: Chegou ontem, mas é um cara que me ajudou pakas quando iniciei no Imasters e sempre me mostrou por onde ir. - Halakaluf: Tá sumido, mas é muito legal. - Morphetinho: Adoro aloprar este cara , sempre me respondeu quando administrador e sempre me deu novas idéias. - Resopi: Brother, você é muito nota 10, mas ainda pode trazer muita coisa boa pra que. Seja mais você. - PqpSalomao: Parceiro e comparsa total de estudos de 'C#'!! - Dark0: Reconheço em você um otimo cara para se tomar conta da seção. Administre isso aqui, como se fosse sua conta bancária e uma coisa: Ponha o xicote pra estralar, porque quem apita aqui é você!!! Bom Srºs, não dá pra lembrar de todos aqui, peço desculpas, deixo um abraço especial aqueles que mantinham contato por MSN e me faziam rir pra baralho a tarde. Dark0!!! Feche o tópico senão todos aqui vão querer dar opinião sobre minha resposta. Abraços!!! [urso] OBS: Meu e-mail esta aí, mas ele não é seu suporte personal
  7. ursolouco

    Novo Moderador !

    Brother!! aquele lá é facinho mesmo , é legal, mas olha o atual que coloquei na assinatura, e outra, manda PM pedindo novos desafios, vamos deixar este tópico, voltado apenas para finalidade da minha despedida do cargo Abraços!! [urso]
  8. Brother!! 'Caracteres Iso Latino ou Session.Lcid = 1046 'Formato Brasileiro ou até mesmo, vejas as configurações regionais do seu servidor (testes/host) Abraços!!!
  9. ursolouco

    Ajuda

    <% Response.Write(Left(Rs("Descricao"),90) & "...")%> Faça isso dentro do seu Link... OBS: 90 é quantidade de caracteres que vai exibidos na tela
  10. ursolouco

    Qual O Erro?

    cBanco = Server.MapPath("./diretorio/banco.mdb") Abraços!!!
  11. ursolouco

    Problema Com Include

    <!-- #include file="./../teste/teste.asp" --> Tenta ai.. rapidin..
  12. ursolouco

    Problema Com Include

    Grande Nelson!! Usa include virtual e passa o nome dos diretorios...
  13. ursolouco

    Up Load

    Acho que você pode guardar numa Session("Imagen")... manjo ?
  14. ursolouco

    Novo Moderador !

    Opa!!! Acho que vou voltar aqui todo dia Valeu Brother!!! T+
  15. Hum... Vendo se ter caracteres invalidos numa string sem RegExp!! OBS: para verificar mais caracteres, basta adiciona-los na variavel 'Invalido' <% Result = Array() Palavra = "Sport Club Corinthians Paulista %" Invalido = "!,@,#,$,%,¨,&,*,(,),_,+,},{,^,?,:,>,|,Ç,ç,',[,],},{" vInvalido = Split(Invalido,",") Contador = 0 For I = LBound(vInvalido) to UBound(vInvalido) Contador = Contador + 1 Redim Preserve Result(Contador) Result(i) = Instr(Palavra, vInvalido(i)) Next For I = 0 to UBound(Result) If Result(i)>0 Then Response.Write("Localizado o Caractere ") Response.Write("<b>"& "'" & vInvalido(i) & "'" & "</b>") Response.Write(" considerado invalido para o sistema.") End If Next %>
  16. ursolouco

    Erro Na Conexao

    Pode ser Brother!! Dá uma ligadinha pros manus e racha o cabloco que lhe atender... Tem que morrer mesmos esses infelizes do suporte tecnico... (como se eu não fosse um). Ta ai, dada a dica. Abraços!!!
  17. ursolouco

    Erro Na Conexao

    Salve Ale!!! Experimente o seguinte: <% Dim Conn 'Declarando objeto Set Conn = Server.CreateObject("adodb.connection") 'Instanciando objeto Dim cBanco 'declarando variavel, que vai ter o caminho do banco de dados cBanco = Server.MapPath("banco.mdb") 'pegando o caminho do banco de dados Dim strConn 'decrarando uma string de conexao strConn = "Provider = Microsoft.jet.oledb.4.0; Data Source = "& cBanco &";" 'passando valores para variavel Conn.Open(strConn) 'abrindo conexão Response.Write("adoro o urso") 'escrevendo na tela Conn.Close 'fechando a conexao Set Conn = Nothing 'liberando a conexao de memoria %> No seu codigo, acredito que esteja usando DSN local, tem que ser visto se no seu Host é permitido a criação e ultilização de DSN. Altere ou teste este pequeno codigo. Abraços!! [urso]
  18. ursolouco

    Banco De Empregos

    Cordialmente e esperando um 'virgem' aqui reiniciar um 233, vou responder este tópico!!!! Mas antes de mais nada, Parabéns ao Dark0 por ter mandando os caras pararem de conversar. Viemos aqui pra tirar dúvida ou conversar ? (Ah, o Victor adora um papo, agora que estou percebendo isso, é pra aumentar POST ? ) Vamos aos fatos: Sentiu que se filme foi queimado né, mas aqui, ninguém vai fazer nada pra ninguém de graça (digo pelos que conheço, já o Vitor....) Moleza só no colo de veio amigo.... Queria que toda empresa tivesse este tipo de atitude, de falar, quanto custa pela sua informação, só assim, teriamos maior reconhecimento e valorização. Disse quase tudo, só faltou completar: Podem me chamar de mercenario, burro, incapaz e tudo mais, mas sistema de graça, pra vc, eu não faço. sem mais... [ursão]
  19. ursolouco

    Erro Na Conexao

    Mostre o código da sua conexão para gente dá uma olhada !
  20. ursolouco

    Novo Moderador !

    Que nada Bici!!! você sabe o quanto me ajudou naquele concorrido e articulado forum do Imasters, particularmente, até hoje, vi poucas pessoas conhecerem bem Matriz como vc, gastao e a Marcinha . Hoje, já manipulo legal vetores e até sei paginar o bagulho (pesquisa por paginação, que coloquei um código aqui) . Nobre Pgmador!! Brother, Sabes o quanto o Admiro... não vou deixa-los na mão, afina de contas, hoje, ainda, estou no suporte tecnico, mas logo, estarei no desenvolvimento e é mais que provavel que algumas dúvidas vão surgir e sei onde vou encontrar boa referencia Como sempre ajudei, um dia vou precisar de ajuda, e vou continuar ajudando na medida do possivel e de acordo com as regras do jogo. Abraços!! [urso]
  21. ursolouco

    Novo Moderador !

    Salve Srºs!!! Tendo em vista que aumentou gradativamente o fluxo de trabralho aqui no suporte não me restando tempo suficiente para auxiliar com a devida atenção a seção Asp/Asp.Net, estou aqui, através deste tópico deixando o cargo de moderador. Quero deixar bem claro, que não é nada pessoal ou contra alguém aqui , mas a minha vontade seria de indicar o [Guto] para o cargo de moderador da seção, devido a ele ser um excelente programador e, até hoje, sempre demonstrou capaz de administrar conflitos e trazer novos desafios de programação para seção e, acredito ainda mais, que o mesmo, junto ao Dak0 (muito firmeza este cara) vai administrar bem a seção. Mas por ser uma comunidade, deixo aberto este tópico para que os membros (acima de 100 POSTs) escolham o novo moderador para seção. Até mais galera..... Abraços!!! [urso]
  22. ursolouco

    Record

    Eu, particularmente, nem lembro de Pascal, e muito menos de Record . Me perdoe nesta parte. A estrutura de Array, em ASP, é simples. <% Dim Programadores(3) Programadores(0)="Guto" Programadores(1)="Reginaldo" Programadores(2)="Nelson" Programadores(4)="Dark0"%> Para se adiquirir o maior valor da Matriz: <% Maior = Ubound(Programadores)%> Menor valor da Matriz: <% Menor = LBound(Programadores)%> Escrevendo na tela: <% For I = Menor To Maior Response.Write(Programadores(I) & "<br>") Next %> Básicamente, esse seria a forma mais facil e simples de se trabalhar ou iniciar em vetor. Abraços!! [urso]
  23. ursolouco

    Enquete

    Mateus!! Esta variavel, aparentemente, já foi declarada. Recomendo que remova o <%Option Explicit %> o exclua uma das declarações : Dim strSQL Abraços!! [urso]
  24. ursolouco

    Cadastro De Membros

    Salve Guto!! Ontem, em casa, sem internet é claro, começei a bolar um esqueminha sobre Re-Indexação da tabela, e cheguei a seguinte conclusão: Método: Excluir - Deletar o item da tabela - Seleciona-la inteiramente, - Montar um looping 'For' dentro de um 'While' - Criar um contador dentro do looping - E a cada passagem do While, por AddNew do RecordSet eu atualizo o campo da tabela com o valor do contador - Incremento o contador até a condição do While se tornar false Mais ou menos cheguei nesta lógica... até iria começar a executar mas já era tarde pra baraiu... (sai com uma delas ontem ) Achei até melhor pra fazer depois... Qual consenso você chegou para excluir um dado e depois reindexar a tabela ? Abraços!! [urso] OBS: Bicicleta ? Forum Imasters ? Eita cabra bon... esse eu reconheço...
  25. ursolouco

    Cadastro De Membros

    Então Guto!! Olha só que barato loko que passa na cabeça da gente: Exemplo: 01 - Reginaldo 02 - Guto 03 - Pgmador 04 - Dark0 05 - Wellington 06 - Zé Luis Vamos supor que o 03 (Pgmador) exclua seu cadastro, teria uma brecha na tabela, certo ? Se não re-indexarmos a tabela (fazer com que o membro 04, se torne 03), vamos ter uma brecha até que alguém se cadastre novamente e ocupe a posição 03. O que tentei dizer é o seguinte: Membro 03 excluiu seu cadastro, refaça na minha tabela (a coluna ID/Numero) organizando novamente os códigos.. Melhorou agora ? Dark0!!! Foi isso que tentei dizer... compreendeu agora ? Eu já li, algo sobre isso, mas não estou me recordando... O PC do trampo deu pau, to na maquina de um kara aki do lado e não estou conseguindo achar o referido código na web. Mas vamos pensar em algo que vai ser possivel fazer a estrutura ficar ok novamente... Abraços!!! [urso]
×
×
  • Criar Novo...