Başka sunucudan dosya okumak

14-03-2013, 19:02:43

Arkadaşlar merhaba,

Başka bir sunucudaki html dosyasını asp ile çekmek istiyorum.
Bunun en kolay yolu nedir acaba?

Not: Farkeder mi bilmiyorum ama karşıdaki dosya da asp uzantılı. Ama html hali benim işimi görüyor.

teşekkürler,

16-03-2013, 16:39:05

#2

~~ShekerChi~~

Üyeliği durduruldu

microsoft xmlhttp nesnesi ile bir url'nin kaynak kodunu okuyabilirsin.
ama unutmaki asp dosyanın içinde asp kodlar varsa bunlar yorumlanıp da ekrana yansır ve haliyle son halini çekmiş olursun.

eğer dosyanın orjinalini okumak istiyorsan da kod üzerinden ftp bağlantısı yapıp dosya okuyabilirsin.

örnek xmlhtp kullanımı:

Alıntı

Function BinaryToString(Binary)
Dim cl1, cl2, cl3, pl1, pl2, pl3
Dim L
cl1 = 1
cl2 = 1
cl3 = 1
L = LenB(Binary)
Do While cl1<=L
pl3 = pl3 & Chr(AscB(MidB(Binary,cl1,1)))
cl1 = cl1 + 1
cl3 = cl3 + 1
If cl3>300 Then
pl2 = pl2 & pl3
pl3 = ""
cl3 = 1
cl2 = cl2 + 1
If cl2>200 Then
pl1 = pl1 & pl2
pl2 = ""
cl2 = 1
End If
End If
Loop
BinaryToString = pl1 & pl2 & pl3
End Function

site = "https://www.r10.net/"

Set HTTP = Server.CreateObject("Microsoft.XMLHTTP" )
HTTP.Open "Get" , site, False
HTTP.SEnd
Sayfa_Al = BinaryToString(HTTP.ResponseBody)
Set HTTP = Nothing

response.write Sayfa_Al

18-03-2013, 10:25:44

#3

aset0n

teşekkür ederim, aradığım tam da buydu