arkadaşlar kodun baş ve sonunda scrit açılış ve kapanış tagları var gremiyorsunuz şu an kod koruması var tahribat forumdabirde lütfen denemeden yorum yapmayın abrazame con el mar

Dim KyaziKyazi =" arkadaşlar bu yazının yavaşça akmasını istiyorum scriptte nereyi değiştirmeliyim..."window. status = space & Kyazii = 150Stat Sub Repeat i=20window. status = space & KyaziStat End SubFunction Stat Dim pText, pLen i = i - 1 If i <= 0 Then pLen = Len If pLen = 0 Then Repeat :Exit Function pText = Right(Window. Status, (pLen - 1)) Window. Status = pText End If if i > 0 then pText =Space & LTrim end if Window. Status = pTextSetTimeout "Stat ", 30End Function abrazame con el mar