negociadorweb

Utilizando o LCase() todos os caracteres ficarão em minusculos. Use a funcao abaixo que ela vai retornar por exemplo: SÃO JOSÉ DOS CAMPOS em São José dos Campos para usar a funcao basta fazer a chamada: <% Response.Write(ConverteMaiuscula("SÃO JOSÉ DOS CAMPOS"))%> []'s Public Function ConverteMaiuscula(Texto) Dim sPalavra, iPosIni Dim iPosFim, sResultado iPosIni = 1 Texto = LCase(Texto) & " " Do Until InStr(iPosIni, Texto, " ") = 0 iPosFim = InStr(iPosIni, Texto, " ") sPalavra = Mid(Texto, iPosIni, iPosFim - iPosIni) iPosIni = iPosFim + 1 If sPalavra <> "de" And sPalavra <> "da" And sPalavra <> "do" And _ sPalavra <> "das" And sPalavra <> "dos" And sPalavra <> "a" And sPalavra <> "e" Then sPalavra = UCase(Left(sPalavra, 1)) & LCase(Mid(sPalavra, 2)) End If sResultado = sResultado & " " & sPalavra Loop ConverteMaiuscula = Trim(sResultado) End Function

Mano, algumas rotinas para trabalhar com FSO Abraços <% '************************************ 'Trabalhando com Drives (C:,D:,etc...) '************************************ Sub ShowDriveInfo(drvPath) Dim fso, drv, s Set fso = CreateObject("Scripting.FileSystemObject") Set drv = fso.GetDrive(fso.GetDriveName(drvPath)) s = "Drive " & UCase(drvPath) & " - " s = s & drv.VolumeName & "<br>" s = s & "Total Space: " & FormatNumber(drv.TotalSize / 1024, 0) s = s & " Kb" & "<br>" s = s & "Free Space: " & FormatNumber(drv.FreeSpace / 1024, 0) s = s & " Kb" & "<br>" Response.Write s End Sub %> utilização: <% ShowDriveInfo("C:") %> <% '************************************ 'Criando arquivos txt e escrevendo neles '************************************ Dim fso, tf Set fso = CreateObject("Scripting.FileSystemObject") Set tf = fso.CreateTextFile("c:\testfile.txt", True) ' Escreve uma nova linha tf.WriteLine("Testando 1, 2, 3.") ' Escreve 3 linhas novas em branco tf.WriteBlankLines(3) ' Escreve outra linha. tf.Write ("Teste de FSO.") tf.Close %> Basicamente é isso.... tem mais coisa, mas pra não confundir você é melhor ir devagar... []'s

Pode ser permissao sim, mas saca só a sua instrução.... Tem um request.form e um request.querystring. Dá uma olhada nisso.... ou você usa o post( request.form ) ou get (request.querystring) abraços.

Meu, sinceramente acho os scripts do chacal muito bons, porém muito básicos. Eu os aconselho mesmo para aqueles que precisam de uma referência para estudos. Quero deixar claro que não estou desmerecendo o programador, afinal não duvido da sua capacidade, apenas expondo meu ponto de vista. Tem um album online para download muito bom, aliás, um dos melhores que já ví por ai. Algumas funcionalidades que ele inclui: * thumbs * area restrita para administração * Uploads de imagens sem precisar instalar componentes * visualizacao das imagens * envio para amigos, etc... muito bom mesmo, e o melhor???? É 100% GRÁTIS. Segue o link: http://www.b-cp.com/igallery/default.asp Abraços.

Sugiro que você comente a linha do seu código que impede que o erro seja exibido "On Error Resume Next". Feito isso, poste o erro gerado aki. Assim fica mais fácil de ver o que tá dando errado. []'s

E ae mano, tudo bem? Primeiro vamos pegar o maior valor dentro do array, ok? Isso pode ser feito pelo código: ok.. até aqui não oi nenhum mistério para você. Agora vamos fazer um loop que irá percorrer todo o array. Se ele encontrar valores iguais ao armazenado anteriormente, então guarda a posição do registro no array. Vamos lá: Acho que é isso. Se não for, dá o toque, valeu? Abraços.

Acho que seria mais facil, na hora em que ele for chamar a funcao js passar o asp, tipo: novo("<%=id%>") é bem mais rápido e mais pratico.

Alguém conhece um script open source bom para indicar? valeu

Fala brow, na paz? você quer mostrar as 5 últimas noticias na principal do seu site, correto? Não precisa fazer um while de 1 ate 5, você pode passar direto no sql, qtos registros ele deve retornar. Por exemplo: Retorna os 5 registros da tabela por ordem de data: A instrução acima vai retornar os 5 registros mais atualizados da sua tabela por ordem de data. A mesma regra vale para quando o usuário quiser ver todas. Só q ao invés de usar o Top 5 * você vai selecionar do modo normal: Lembrando que não é bom usar o Select * From, sempre que possível utilize a instrução passando somente os campos que realmente vai utilizar, ok? Assim você ganha em desempenho. qualquer coisa dá o toque

é os seguinte: Eu sou terceirizado na CEF e estamos desenvolvendo um sistema que irá integrar varias rotinas no Brasil inteiro de outros sistemas da caixa. O primeiro desafio do sistema é fazer com que uma leitora especifica de cheques conectada no cliente envie dados para um campo tipo text no aplicativo. é mais ou menos isso.... o usuario abre uma tela do sistema, que está todo em asp, passa o cheque na leitora e os dados do cheque são capturados pelo sistema e mostrado para o usuario na tela para confirmacao dos dados. qualquer ajuda é bem vinda

veja o exemplo do código em http://www.codeworks.it/net/VBNetRs232.htm

com o vb tem jeito....... o que acontece é que eu tenho o codigo em vb.net que eu achei em um site, porem eu preciso dessa conexao com o vbscript. Um amigo programador disse que tem como sim porem ele tb não sabe como fazer. ele sabe que tem como pois ele já viu um codigo assim funcionando, só que o amarradinho do outro programador que fez o codigo não quis dar o fonte nem vender. é f...

Galera, é o seguinte.... Preciso conectar uma porta serial NO CLIENTE para um aplicativo que estou desenvolvendo aqui no meu serviço... Alguma dica? Código? Solução? De ante-mao obrigado a todos...

apoiado.... abaixo a colnagem de códigos........ hehehe......... na dúvida, põe aqui os códigos que a gente "resorve" []'s :ph34r:

acho que ele quer é ler o arquivo em vez de simplesmente mostrar seu conteudo. se for isso mesmo, dá um toque q a gente dá um jeito aqui. se não, entendi errado. []'s :ph34r: