Acil yardım lütfen

05-08-2009, 02:21:23

Üyeliği durduruldu

merhaba arkadaşlar

aşşağıda ki kodla sayfadan ilgili remi çekiyorum.fakat çoğu sayfada resim

images/resim.jpg çıkıyor
istediğim şey bunun önüne www.orneksite.com nasıl koyarım database yazzdırıken

Basla5 = InStr(1,resim, "<img src=""" , 1) + Len("<img src=""")
Bitir5 = InStr(Basla5, resim, """ alt=" , 1) - Basla5
resim2 = Mid(resim, Basla5, Bitir5)

burraya yazdırıyorum
kdGenel("resim") = resim2

05-08-2009, 03:27:11

#2

electronicboy

Yardım etmeye çalıştım ama tam olarak ne yapmak istediğini anlayamadığımdan cevap veremedim. Daha ayrıntılı ve açıklayıcı anlatırsanız yardımcı olabilirim.

Kolay gelsin.

05-08-2009, 13:36:09

#3

~~gokoco~~

Üyeliği durduruldu

<img src="images/news/4351.jpg" alt=""/>

kodundan resim url yi çekiyorum ama database de kodda sadece images/news/resim.jpg yazıyor ben diyorumki database eklerken bunun başına site adresini nasıl koyabilirim

05-08-2009, 19:53:14

#4

lovemove

databaseye değilde direk resmi göstereceğin kısımda

<img src="http://www.siteadresi.com<%=resimyolu%>" alt=""/>

şeklinde yapabilirsin. databaseyi şişirmene gerek yok site adresinide ekleyerek..

05-08-2009, 21:21:52

#5

~~gokoco~~

Üyeliği durduruldu

doğru söylüyrsun ama tek site değilki.3-4 siteden çekiyorum

lovemove adlı üyeden alıntı: mesajı görüntüle

databaseye değilde direk resmi göstereceğin kısımda
<img src="http://www.siteadresi.com<%=resimyolu%>" alt=""/>
şeklinde yapabilirsin. databaseyi şişirmene gerek yok site adresinide ekleyerek..

06-08-2009, 03:49:32

#6

bytuncay

botlamı çekiyon ?

06-08-2009, 15:10:38

#7

~~gokoco~~

Üyeliği durduruldu

bytuncay adlı üyeden alıntı: mesajı görüntüle

botlamı çekiyon ?

evet dostum botla çekiyorum ama çektiğim kod sayfakodlarında sadece image ile başladığından yani site adresi olmadığından resmi aynen öyle çekebiliyorum

06-08-2009, 20:40:22

#8

~~WebScriptleri~~

Üyeliği durduruldu

resim = "http://www.site.com/" & resim

07-08-2009, 13:14:45

#9

~~gokoco~~

Üyeliği durduruldu

arkadaşlar kod aşşağıda resim2 sadece çektiğim sitede images/resim.jpg yi kaydeedbiliyor benim istediğim ise [media]http://www.siteadresi.com/images/resim.jpg[/media] olması.ama bi türlü sayfa adresini başına ekleyip database kaydedemiyorum .lütfen yardımcı olun ...bilen kimse yokmu

Basla4 = InStr(1,strhtml, "<div id=""detay_foto"" style=""float:left; display:inline; width:300px; height:200px; margin-top:14px; margin-left:13px;""> " , 1) + Len("<div id=""detay_foto"" style=""float:left; display:inline; width:300px; height:200px; margin-top:14px; margin-left:13px;"">")
Bitir4 = InStr(Basla4, strhtml, "<div id=""detay_bas"" style=""float:left; width:420px; height:25px; margin-top:8px; margin-left:5px;"">" , 1) - Basla4
resim = Mid(strhtml, Basla4, Bitir4)

Basla5 = InStr(1,resim, "<div id=""detay_foto"" style=""float:left; display:inline; width:300px; height:200px; margin-top:14px; margin-left:13px;""><img src=""" , 1) + Len("<div id=""detay_foto"" style=""float:left; display:inline; width:300px; height:200px; margin-top:14px; margin-left:13px;""><img src=""")
Bitir5 = InStr(Basla5, resim, """ width=" , 1) - Basla5
resim2 = Mid(resim, Basla5, Bitir5)
title=cevir(title)
haber=cevir(haber)
onmetin=cevir(onmetin)
resim2=cevir(resim2)

set rs=server.CreateObject("adodb.recordset")
sorgu="select * from tblhaberler where url='"&strURL&"'"
rs.open sorgu,strcon,1,3
if rs.eof then
SQL = "SELECT * FROM tblHaberler"
kdGenel.Open SQL, strCon, 1, 3
kdGenel.AddNew
kdGenel("baslik") = title
kdGenel("ozet") = onmetin
kdGenel("editor") = 1
kdGenel("haber") = haber
kdGenel("yorum") = true
kdGenel("onemli") = true
kdGenel("durum") = true
kdGenel("onay") = true
kdGenel("manset")= true
kdGenel("resim") = resim2
kdGenel("kucuk_resim") = resim2
kdGenel("kategori") = 13
kdGenel("tarih") = Now()
kdGenel("url")= strURL
kdGenel.Update
kdGenel.close