Ir para conteúdo
Fórum Script Brasil

Marcos Remar

Membros
  • Total de itens

    27
  • Registro em

  • Última visita

Tudo que Marcos Remar postou

  1. Na verdade eu gostaria realmente de selecionar o campo e não só trocar de cor, pois o q que acontece é que o foco sai do flexgrid. E depois eu gostaria de coloca-lo no mesmo lugar.
  2. Olá pessoal gostaria de saber de vocês. se è possivel colcar foco em um item do FlexGrid como se uma pessoa mesmo estivesse clicado nele. Desde já gradeço.
  3. vlw cara brigadão mas o que eu queria era tipo quando o formulario estivesse minimizado ele reconhecesse quando for pressionado as teclas do teclado. Poque dessa maneira só é disparado o evento do KeyPress quando o formulário está com foco.
  4. Olá pessoal estou fazendo um programa e preciso capturar uma tecla digitada (ou uma combinação delas Ex.:"Ctrl+s") quando ela é pressionada. Independente de onde estiver o foco. desde já agradeço.
  5. Show amigo era isso mesmo mais uma vez brigadão Abraços!
  6. Mas e se por exemplo eu quiser chamar a tecla F11 ou ALT + F4?
  7. Olá pessoal Estou com mais uma dúvida gostaria de saber como posso fazer com que o vb pressione teclas, como se o programa estivesse digitando. desde já agradeço!
  8. vlw amigo achei isso aqui: Acesso à área de Transferência O Objeto Clipboard é uma referência à Área de transferência, vejamos como utiliza-lo: Clipboard.gettext Este comando retorna o conteúdo da área de transferência. Clipboard.clear Limpa conteúdo da área de transferência. Clipboard.settext "Teste" Settext adiciona um novo texto p/ a área de transferência, no entanto p/ funcionar á necessário limpá-la primeiro usando o clear. Palavras Chave: Acesso à área de Transferência Acesso à área de Transferência
  9. Olá pessoal Estou fazendo eu programa e estou precisando saber como é que posso passar uma string para a área de transferêcia. E depois gostaria de executar a função de colar (para colar em um text por exemplo). desde já agradeço.
  10. Marcos Remar

    Criar URL

    Alguém sabe como eu posso criar uma url tipo: www.meusite.com.br/criar_isso parecida com a que é usada no flogão. O site imasters também usa isso: http://www.imasters.com.br/artigo/6808/php...oes_-_parte_02/ Não é possivel que eles tenham criado um diretório so para esse artigo. Será que alguém sabe como cria isso!? Abração pessoal
  11. Olha eu comprei esse cabo ontem e o cara da loja testou ele como cross over to achando q não é isso ta parecendo dos pcs mesmo.
  12. Ola pessoal eu sei que esse assunto para a maioria e muito facil mais la vai. Eu to querendo montar uma rede crossover aqui to com duas placas de rede instaladas o cabo de rede crossover conectado nas duas placas e os 2 pcs ligados. Mas o icone do lado do relogio diz que um dos cabos da rede esta desconectado e esta com um xis. Obrigado pessoal qualquer ajuda vai ser muito util. :)
  13. Olá pessoal estou com problema nesse script, olha só. Esse é o script! Essa é a biblioteca de funções! O erro ta acontecendo na função desconecta!
  14. Pessoal da uma olhada nisso. Response.write "Senha<br><input name="senhai" type="password" id="senhai" value="senha" size="18" onfocus="if(this.value=='senha')this.value=''">" Será que é possível validar esse código ai!
  15. Olá pessoal sou programador asp e sempre utilizei o access, mas agora estou precisando desenvolver no sql server. Gostaria que vocês me ajudasem a fazer pelo menos uma conexão básica com uma página, pra mim depois ir prosseguindo. Estou utilizando o sql server 2000 no windows 2000. Grato.
  16. Olá pessoal, gotaria de saber de vocês como eu posso criar Stored Procedures simples para usar com asp. já vi vários manuais mais nenhum deu jeito. Eu estou com o windows xp profissional e sql server 2000. Quem puder me dizer como posso criar uma fico agradecido.
  17. Marcos Remar

    Topicos Exclusivos

    Gostaria que fosse feito um tuto com uma função para conexão com bd access, com o código completo.
  18. Dá uma olhada no codigo, ainda não pego. Teste.asp E a outra que é o include. Config.asp
  19. Não é isso não, é tipo uma função mesmo, botar tudo dentro de uma sub ou function e depois chamar so a função
  20. Olá pessoal eu gostaria da ajuda de vocês para criar uma função para fazer conexão com um bd access. Como eu tenho que abrir conexões toda hora isso ajudaria bastante a economizar linhas de código. Tem um tópico no forum sobre isso mas eu não entendi muito bem, e os exemplos eram em sql server. Use como exemplo esse código abaixo criando uma conexão usando include.
  21. Parabéns cara gostei da iniciativa! e do dódigo também
  22. Tranquilo, qualquer dia a gente se encontra em outro tópico ai.
  23. Beleza amigo, pow cara em asp é uma complicação danada fazer upload, o servidor teria que ter varios paths instalados. Mas quando eu estava na mesma situação que a sua achei um script pronto que resolve o problema e sem path. É assim oh: ----- parte 2 ------ <!-- #include file = "upload_funcoes.asp" --> <% ' Chamando Funções, que fazem o Upload funcionar byteCount = Request.TotalBytes RequestBin = Request.BinaryRead(byteCount) Set UploadRequest = CreateObject("Scripting.Dictionary") BuildUploadRequest RequestBin ' Recuperando os Dados Digitados ---------------------- img = UploadRequest.Item("foto").Item("Value") ' Tipo de arquivo que esta sendo enviado tipo_foto = UploadRequest.Item("foto").Item("ContentType") ' Caminho completo dos arquivos enviados caminho_foto = UploadRequest.Item("foto").Item("FileName") ' Nome dos arquivos enviados nome_foto = Right(caminho_foto,Len(caminho_foto)-InstrRev(caminho_foto,"\")) ' Conteudo binario dos arquivos enviados foto = UploadRequest.Item("foto").Item("Value") ' pasta onde as imagens serao guardadas pasta = Server.MapPath("../upload/") nome_foto = "/"&nome_foto ' pasta + nome dos arquivos cfoto = "imagens/lojas" + nome_foto ' Fazendo o Upload do arquivo selecionado if foto <> "" then Set ScriptObject = Server.CreateObject("Scripting.FileSystemObject") Set MyFile = ScriptObject.CreateTextFile(pasta & nome_foto) For i = 1 to LenB(foto) MyFile.Write chr(AscB(MidB(foto,i,1))) Next MyFile.Close end if %> -----/parte 2 ----- O include se refere a parte 3: ---- parte 3 ------ <% ' Upload Sem componentes --------------------------------------- Sub BuildUploadRequest(RequestBin) on error resume next PosBeg = 1 PosEnd = InStrB(PosBeg, RequestBin, getByteString(Chr(13))) boundary = MidB(RequestBin, PosBeg, PosEnd - PosBeg) BoundaryPos = InStrB(1, RequestBin, boundary) Do Until (BoundaryPos = InStrB(RequestBin, boundary & getByteString("--"))) Dim UploadControl Set UploadControl = CreateObject("Scripting.Dictionary") Pos = InStrB(BoundaryPos, RequestBin, getByteString("Content-Disposition")) Pos = InStrB(Pos, RequestBin, getByteString("name=")) PosBeg = Pos + 6 PosEnd = InStrB(PosBeg, RequestBin, getByteString(Chr(34))) Name = getString(MidB(RequestBin, PosBeg, PosEnd - PosBeg)) PosFile = InStrB(BoundaryPos, RequestBin, getByteString("filename=")) PosBound = InStrB(PosEnd, RequestBin, boundary) If PosFile <> 0 And (PosFile < PosBound) Then PosBeg = PosFile + 10 PosEnd = InStrB(PosBeg, RequestBin, getByteString(Chr(34))) FileName = getString(MidB(RequestBin, PosBeg, PosEnd - PosBeg)) UploadControl.Add "FileName", FileName Pos = InStrB(PosEnd, RequestBin, getByteString("Content-Type:")) PosBeg = Pos + 14 PosEnd = InStrB(PosBeg, RequestBin, getByteString(Chr(13))) ContentType = getString(MidB(RequestBin, PosBeg, PosEnd - PosBeg)) UploadControl.Add "ContentType", ContentType PosBeg = PosEnd + 4 PosEnd = InStrB(PosBeg, RequestBin, boundary) - 2 Value = MidB(RequestBin, PosBeg, PosEnd - PosBeg) Else Pos = InStrB(Pos, RequestBin, getByteString(Chr(13))) PosBeg = Pos + 4 PosEnd = InStrB(PosBeg, RequestBin, boundary) - 2 Value = getString(MidB(RequestBin, PosBeg, PosEnd - PosBeg)) End If UploadControl.Add "Value", Value UploadRequest.Add Name, UploadControl BoundaryPos = InStrB(BoundaryPos + LenB(boundary), RequestBin, boundary) Loop End Sub Function getByteString(StringStr) For i = 1 To Len(StringStr) Char = Mid(StringStr, i, 1) getByteString = getByteString & ChrB(AscB(Char)) Next End Function Function getString(StringBin) getString = "" For intCount = 1 To LenB(StringBin) getString = getString & Chr(AscB(MidB(StringBin, intCount, 1))) Next End Function ' Fim upload sem Componentes ----------------------------------------- %> ------/ parte 3 ------- Na parte 1 você cria o formulário. Na parte 2 você confgura o codigo da parte 2, e o include que é a parte 3. A parte 3 é o próprio include. Obs. os Request.QueryString não vão funcionar, declare eles dentro do comentário "Recuperando os Dados Digitados" como o que esta lá.
  24. Marcos Remar

    Qual é Melhor?

    Olá pessoal Estou criando um sitema que já exige muito do server, e queria saber qual dos 3 que exigem menos do server, <_< cookie asp, cookie JavaScript ou session?
×
×
  • Criar Novo...