Geri git   Webmaster Forumu - Webmaster Siteleri - Webmaster Forumları > Server Side Programlama > ASP

Webmaster Forumu Wmliz Moderatör Başvuru Formu

Cevap Yaz
 
LinkBack Seçenekler Stil
  #1  
Alt 01-01-2017, 17:12
Admin - ait Kullanıcı Resmi (Avatar)
Administrator
 
Arrow Resim Boyutu Öğrenme hk.

arkadaşlar resim boyutlarını nasıl öğrenebilirim? en-boy olarak.

Kod:
<% 
Set Jpeg = Server.CreateObject("Persits.Jpeg" ) 
Path = Server.MapPath("imgs" ) & "/delivered.jpg" 
Jpeg.Open Path 
iResimWidth = Jpeg.OriginalWidth 
iResimHeight = Jpeg.OriginalHeight 
Set Jpeg = Nothing 
%> 

<%=iResimWidth%><br>
<%=iResimHeight%><br>
şöyle bir kod var ama bu sadece hostta olan resimlerin boyutunu gösteriyor. ben internetteki herhangi bir resmin boyutunu öğrenmek istiyorum.


-----------------------------

Yukarıdaki kodun düzenlenmiş hali ihtiyacı olanların işini görebilir.

Kod:
<%
ImgURL = "http://www.pvplog.com/Resimler/OyunBanner/gw2.jpg"
 
    ON ERROR RESUME NEXT
    Dim xmlhttp
    Set xmlhttp = Server.CreateObject("MSXML2.ServerXMLHTTP")
    xmlhttp.open "GET", ImgURL, False
    xmlhttp.send
    
    If(Err.Number<>0) then
        Response.Write "Resim tespit edilemedi."
    end if
    
    ON ERROR GOTO 0
    
Set Jpeg = Server.CreateObject("Persits.Jpeg") 
   Jpeg.OpenBinary(xmlhttp.responseBody)
    
   iResimWidth = Jpeg.OriginalWidth 
   iResimHeight = Jpeg.OriginalHeight 
Set Jpeg = Nothing 
 
 
Response.Write(iResimWidth)
Response.Write("<br>")
Response.Write(iResimHeight)
%>
Alıntı ile Cevapla


Konuyu Toplam 2 Üye okuyor. (0 Kayıtlı üye ve 2 Misafir)
 
Seçenekler
Stil



Şu Anki Saat: 23:41



Tüm Genel Sorunlar İçin bilgi@wmliz.net
Ban Sorunları İçin ban@wmliz.net
Reklam Vermek İçin reklam@wmliz.net
İçerik sağlayıcı paylaşım sitelerinden biri olan WMliz.net Webmaster Forumu Adresimizde T.C.K 20.ci Madde ve 5651 Sayılı Kanun'un 4.cü maddesinin (2).ci fıkrasına göre TÜM ÜYELERİMİZ yaptıkları paylaşımlardan sorumludur. WMliz.net hakkında yapılacak tüm hukuksal Şikayetler buradan iletişime geçilmesi halinde ilgili kanunlar ve yönetmelikler çerçevesinde en kısa süre içerisinde WMliz.net yönetimi olarak tarafımızdan gereken işlemler yapılacak ve Avukatlarımız size dönüş yapacaktır.


Powered by vBulletin® Version 3.8.4
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Search Engine Friendly URLs by vBSEO
4k film izle