Bazen öylesi durumlar olurki .vbs ile clipboard a birşey kopyalanması gerekir işte bunu yapabilmek için aşağıda iki farklı metod verilmiştir , işinize yarayanı seçip kullanabilirsiniz aşağıdaki Kod 1 ile
Kod 1
Msg = " Deneme 1 " & vbCrLf
Msg = Msg & " Deneme 2 "
Set objWord = CreateObject("Word.Application")
objWord.Visible = FALSE
With objWord
.Documents.Add
.Selection.TypeText Msg
.Selection.WholeStory
.Selection.Copy
.Quit 0
End With
aşağıdaki Kod 2 ile Something One , Something Two , Something Three yazıları Clipboarda kopyalanacaktır.
Kod 2
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec("clip")
Set oIn = oExec.stdIn
oIn.WriteLine "Something One"
oIn.WriteLine "Something Two"
oIn.WriteLine "Something Three"
oIn.Close
bu kodları bir notepad e yapıştırıp ve Dosya - Farklı Kaydet... seçeneğine tıklayın
Açılan pencerede herhangi bir isim verin (dosya ismini istediğiniz şekilde düzenleyin ) ve uzantısı .vbs olarak kaydedip çalıştırın
Sayın Velociraptor,
Kodlar için teşekkür ederim, çalışıyorlar. Edit yapılamıyor ama olsun. 🙂
Ben vbs script dilini bilmiyorum ama öğrenmek isterdim.
Selamlar
Mümkündür aşağıdaki scripti kullanabilirsiniz
Web Link ...
Merhaba,
Güzel paylaşım teşekkürler.
Bunun üzerinde değişiklik yapabilirmiyiz.
Tek satır olarak metnin içinde günün tarihi de yazsın şeklinde.
Örneğin vbs çalıştırıldığına tırnak içindeki metni clipboarda alsın
"Siparis | gunun tarihi | Purchase Department |"
Yani ortadaki günün tari yazan yerde, o günün tarihi atması lazım.