SCREEN SAVE

KAKASHIHATAK 06/01/2011 12:35:03
#361354
Sei que deve ser uma coisa muito facin + como meu conhecimento e pouco se torna muito complicado para min

O que estou tentando faser e o seguinte
E capturar a tela e salvar em uma determinada pasta com a data do dia ( se possivel a ora tbm ) em JPEG

se alguem puder me ajudar

OBRG
RODRIGOFERRO 06/01/2011 12:40:18
#361356
Resposta escolhida
Isso que voce quer é o Print Screen segue links

http://social.msdn.microsoft.com/Forums/pt-BR/vsvbasicpt/thread/b82cc605-3ec4-48ba-b865-df39113f9d25/
http://www.portugal-a-programar.org/forum/index.php?topic=21645.0

Abraços
KAKASHIHATAK 06/01/2011 12:51:33
#361357
consgui + agora tem um otro problema

Precisaria q ele pegase a pasta q esta ( a aplicaçao ) e salve a img com a data e add alguma coisa a + no nome, pois se for salva 2 img no mesmo dia uma vai subistitui a outra =S

Vlw
RODRIGOFERRO 06/01/2011 13:00:53
#361358
Vamos la vou te mostrar o caminho das pedras, e lhe ensinar a pescar...

Tratamento de datas... http://www.macoratti.net/vbn_data.htm
Tratamento da pasta do Aplicativo : http://social.msdn.microsoft.com/Forums/pt-BR/vsvbasicpt/thread/56eb287f-2b56-45f2-9afb-9e5fba44ab2d

captura a data [Ô]now[Ô] poe no nome do arquivo e salva em [Ô]app.path/seu_diretorio[Ô]

Abraços
KAKASHIHATAK 06/01/2011 18:28:45
#361447
to usando o exemplo que vc me passou

Dim img As Image


img = GetScreenSnapshot(True) [ô]salvar a tela ativa
img.Save([Ô]c:    emp\laercio_tela_corrente.bmp[Ô])

so q como pod ver ele salva em um lugar fixo com um nome fixo
queria que salvase na pasta da aplicaçao com um nome que fosse se auto incrementando ( por isso pensei na data)
tentei usar o CurDir pra pegar a localizaçao e add o nome e talz + nun da =X
( desculpa se falei tonteira, to me esforsando ao maximo pra aprender )
RODRIGOFERRO 06/01/2011 23:02:26
#361479
no caso com é vb.net faça assim


Dim now As DateTime = DateTime.Now
Dim strDate As String = String.Concat(now.Day, [Ô]_[Ô], now.Month, [Ô]_[Ô], now.Year)
Dim strTime As String = now.Hour.ToString() & [Ô]_[Ô] & now.Minute.ToString() & [Ô]_[Ô] & now.Second.ToString()

img.Save(Application.StartupPath & [Ô]\[Ô] & strDate & [Ô]_[Ô] & strTime & [Ô].jpg[Ô])


Abraços
KAKASHIHATAK 07/01/2011 08:59:12
#361499
vlw ZEROCAL
me ajudanu de novo hein~~

funciono melhor pra min assim
caminho = CurDir()
img.Save(caminho & [Ô]\[Ô] & strDate & [Ô]_[Ô] & strTime & [Ô].jpg[Ô])

Obg de novo
Tópico encerrado , respostas não são mais permitidas