1 Konuyu açan KONURALP

  • KONURALP
  • Üye
  • Offline
  • Kayıt Tarihi: 07.10.2006
  • İleti: 348

Konu: saat

internet üzerinden o anki  (gun,ay,yıl     saat:dakika)  zamanı nasıl  ve nereden çekebilirim


tecrübesi olan varmı ?

teşekkürler

2 Cevaplayan birol

  • birol
  • Üye
  • Offline
  • Kayıt Tarihi: 09.01.2007
  • İleti: 202

Re: saat

Merhaba,

Aşağıdaki program Türkiye saatini verir. Kaynak site Türkiye saatini hesaplayarak veriyor. Yani yaz saati, kış saati durumlarında otomatik olarak değişmesi lazım.


Visual Fox Pro
1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

clear

local cts1,loie,mresp,tx1,txdate,txtime

cts1="http://free.timeanddate.com/clock/izmyrnq/n19/tltr28/tt0/tw0/tm3/td2/th1/tb4"

loie=createobject("InternetExplorer.Application")

loie.navigate(cts1)

do while loie.readystate <> 4

    doevents

enddo

mresp=loie.document.body.innerhtml

tx1=getwordnum(mresp,19)

txdate=substr(tx1,15,10)

txtime=substr(tx1,29,8)

? txdate

? txtime

retu