choia 0 Denunciar post Postado Novembro 17, 2006 cara aquela linha de codigo que você me passou esta certa e funcionando corretamente, mas surgiu mais uma duvida como eu faço para jogar esse comando WinExec(PChar('COMMAND.COM /C snmputil get '+a+'.'+b+'.'+c+'.'+d+' public .1.3.6.1.2.1.1.1.0 '), SW_NORMAL);em uma variavel para jogar em um memo ou se da para jogar direto no memo??obrigado Compartilhar este post Link para o post Compartilhar em outros sites
Hugo Slepicka 0 Denunciar post Postado Novembro 17, 2006 Ué... você quer jogar ela num memo, alterar e ai executar??? é isso??? se for, crie: var comando : String;comando := 'COMMAND.COM /C snmputil get '+a+'.'+b+'.'+c+'.'+d+' public .1.3.6.1.2.1.1.1.0 '; no caso ai você chamaria ela assim: WinExec(PChar(comando), SW_NORMAL); Compartilhar este post Link para o post Compartilhar em outros sites
choia 0 Denunciar post Postado Novembro 17, 2006 Ué...você quer jogar ela num memo, alterar e ai executar???é isso???se for, crie: var comando : String;comando := 'COMMAND.COM /C snmputil get '+a+'.'+b+'.'+c+'.'+d+' public .1.3.6.1.2.1.1.1.0 ';no caso ai você chamaria ela assim:WinExec(PChar(comando), SW_NORMAL); OK deu certo obrigado Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Novembro 17, 2006 E qual era o problema ? Compartilhar este post Link para o post Compartilhar em outros sites
Hugo Slepicka 0 Denunciar post Postado Novembro 17, 2006 tamo ai... http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif Compartilhar este post Link para o post Compartilhar em outros sites
choia 0 Denunciar post Postado Novembro 17, 2006 E qual era o problema ?cara eu tenho que colocar na tela para o usuario ler como eu faco isso??? Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Novembro 17, 2006 Ler o que ? Depende o que você diz como ler... Compartilhar este post Link para o post Compartilhar em outros sites
choia 0 Denunciar post Postado Novembro 17, 2006 Ler o que ? Depende o que você diz como ler...entao o comando em cima ele pega o harwere e o softwere da maquina e salva em um arquivo txteu quero colocar isso para o usuario visualizar Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Novembro 17, 2006 Mas no caso não poderia ler este arquivo texto gerado ? Seria no caso pegar o arquivo texto, e então mostrar em um Memo ou algo do tipo. Compartilhar este post Link para o post Compartilhar em outros sites
choia 0 Denunciar post Postado Novembro 17, 2006 Mas no caso não poderia ler este arquivo texto gerado ? Seria no caso pegar o arquivo texto, e então mostrar em um Memo ou algo do tipo.isso ele tem que ler do arquivo gerado! Compartilhar este post Link para o post Compartilhar em outros sites
bdexterholland 0 Denunciar post Postado Novembro 17, 2006 WinExec(PChar(comando), SW_hide);winexec ('notepad '+<url do arquivo>,sw_show); ou ainda WinExec(PChar(comando), SW_hide);memo1.lines.loadfromfile(<url do arquivo); Pegou ? ;] Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Novembro 17, 2006 Se usar um Memo, pode fazer diretamente por ele... Memo.Lines.LoadFromFile(caminho_do_arquivo); Compartilhar este post Link para o post Compartilhar em outros sites
choia 0 Denunciar post Postado Novembro 17, 2006 WinExec(PChar(comando), SW_hide);winexec ('notepad '+<url do arquivo>,sw_show);ou aindaWinExec(PChar(comando), SW_hide);memo1.lines.loadfromfile(<url do arquivo);Pegou ? ;]cara a url do arquivo seria isso "C:\Documents and Settings\social\Desktop\trabalho_final_redes" se for esta dando erro "[Error] Unit1.pas(56): ')'expected but ':' found"...cara to ficando maluco Compartilhar este post Link para o post Compartilhar em outros sites
bdexterholland 0 Denunciar post Postado Novembro 17, 2006 WinExec(PChar(comando), SW_hide);winexec ('notepad '+<url do arquivo>,sw_show);ou ainda WinExec(PChar(comando), SW_hide);memo1.lines.loadfromfile(<url do arquivo);Pegou ? ;]cara a url do arquivo seria isso "C:\Documents and Settings\social\Desktop\trabalho_final_redes" se for esta dando erro "[Error] Unit1.pas(56): ')'expected but ':' found"... cara to ficando maluco Kara, num é para você colocar o código ao pé da letra, substitua o <url do arquivo pela url do arquivo ou uma variável que contenha a url do arquivo.... WinExec('notepad C:\Documents and Settings\social\Desktop\trabalho_final_redes/arquivo.txt', SW_hide); lembrando que: url= universal resource location = Nesse caso é o caminho completo do arquivo. ex.: c:\windows\win.ini Compartilhar este post Link para o post Compartilhar em outros sites
choia 0 Denunciar post Postado Novembro 17, 2006 WinExec(PChar(comando), SW_hide);winexec ('notepad '+<url do arquivo>,sw_show);ou ainda WinExec(PChar(comando), SW_hide);memo1.lines.loadfromfile(<url do arquivo);Pegou ? ;]cara a url do arquivo seria isso "C:\Documents and Settings\social\Desktop\trabalho_final_redes" se for esta dando erro "[Error] Unit1.pas(56): ')'expected but ':' found"... cara to ficando maluco Kara, num é para você colocar o código ao pé da letra, substitua o <url do arquivo pela url do arquivo ou uma variável que contenha a url do arquivo.... WinExec('notepad C:\Documents and Settings\social\Desktop\trabalho_final_redes/arquivo.txt', SW_hide); lembrando que: url= universal resource location = Nesse caso é o caminho completo do arquivo. ex.: c:\windows\win.ini cara deu certu obrigado Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Novembro 17, 2006 Salva direto no c:\, mais simples de achar o arquivo... Compartilhar este post Link para o post Compartilhar em outros sites