açılışta süreli mesaj

[mutluedenercan]

Buradan öğrendiklerimle basit bir toplama silme sayfası yaptım...

Açılşta 3 - 5 saniye kadar " Hoşgeldiniz " gibi bir mesaj versin ve bu mesaj kendi kapansın..

Aramada bulduklarımı bu programa uyarlıyamadım.


Bu programın yaptığı , yazılanın toplamını yandaki büyük ekrana verirken
her satır için d1 e mesaj yazıyor...
Sil butonu ile siliyor (hesap makinesi gibi)

Sizi yormaz umarım

 

[Seyit Tiken]

Bu şekilde deneyiniz.

CreateObject("WScript.Shell").Popup "Bu Mesaj Kutusu  3 Saniye Sonra Kapanacak." & vbCrLf & "Haberin Olsun.", 3, "UYARI."

 

[mutluedenercan]

Hocam bu kodu kodların başınada sonunada eklediğimde hata veriyor.
nereye eklemem gerekli

 

[security]

sn:mutluedenercan ekteki dosyayı denermisiniz.

 

[mutluedenercan]

eklediğiniz dosya açışta
rUN TİME ERROR-2147024470(800700E)

HATASI Verdi