Arama butonu
Bu konudaki kullanıcılar: 1 misafir
3
Cevap
953
Tıklama
0
Öne Çıkarma
Asp ile resim üzerine yazı yazma
C
10 yıl
Teğmen
Konu Sahibi

Üstadlar sitemde şu an kalite problemi dışında sorunsuz olarak sorunsuz olarak resim yükleyebiliyorum. Yüklediğim resimlere yazı yazmak istiyorum. İnternette bir sürü kod buldum ama bir türlü yapamadım. Bu işlerden de pek anlamıyorum. Bendeki kodları versem resim ekleme kodunu uygun yerlere ekleyebilir misiniz ? Teşekkürler...

quote:


<!-- BEGIN PAGE CONTENT -->
<div id="contentTop"></div>
<div id="content-wrap">
<div id="content" class="container_16 clearfix">

<!-- BEGIN PORTFOLIO CONTENT -->
<div id="contentPortfolio" class="grid_16 fadehover">

<div class="path"><a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=112578925&url=default.asp" data-href="default.asp">Ana Sayfa </a><img src="images/arrowPath.png" alt="" /> <strong>
Resim Yükleme</strong></div>
<!-- BEGIN FIRST SET -->


<%
' transfer ettiğimiz dosyayı isimlendirirken dosya adına günün tarihini iliştirmesi için aşama oluşturuyoruz...
' dosyayı transfer ettikten sonra bu verileri kullanacağız. cpr1 : tarih, cpr2 : ay, cpr3 : gün

cpr1=Year(date) ' tarih için Yılı öğrendik

if month(date) < 10 then ' eğer ay 10 rakamından küçükse başına 0 ekledik
cpr2 = "0" & month(date)
else
cpr2 = month(date) ' değilse ayı olduğu gibi aldık
end if

if Day(date) < 10 then ' eğer gün 10 rakamından küçükse başına 0 ekledik
cpr3 = "0" & Day(date)
else
cpr3 = Day(date) ' değilse günü olduğu gibi aldık
end if
' tarih oluşturma bölümü bitti

safha = Request.QueryString("safha")
On Error Resume Next
If safha = "" Then
%>


<form action="dosyayukle.asp?safha=yukle" method="post" ENCtype="multipart/form-data">


<p align="center">
<b><font size="2" face="Arial">
Buradan Sadece Resim Yükleyebilirsiniz.
Zirve Forum ve Muhasebe İle İlgili Olmayan Dosyalar Silinecektir</font></b><font face="Arial"><br><br>
</b>
<input class="form" type="file" name="dosyaisim" size="49"><font size="2">
</font></font>
</td></tr>
<tr><td align="center">
<font face="Arial">
<br>
<br>
<input class="buton" type="submit" value=" Resmi Yüklemek İçin Tıklayınız" onClick="this.value='Resim Dosyası Yükleniyor... Lütfen Bekleyiniz...'"><font size="2">
<br>
 </font></font></td></tr>
</table>
</form>
<font face="Arial" size="2">
<p align="center">
<% end If %>

<%
If safha="yukle" Then ' Eğer dosya yükleme talimatı verilmiş ise
dosyayeri = "upload" ' Gönderdiğimiz dosyanın kaydedileceği dizini belirliyoruz

' Dosya isminin ilerdede çakışmaması için veya dosya ismine biraz daha hava katmak için random sayı üretiyoruz
Randomize
Numara = INT (RND*9999999999)+1

Server.ScriptTimeout=1000
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = False
Sayac = Upload.SaveToMemory

If Sayac = 0 Then
response.redirect "../in/panel.asp?id=8"
Response.End
End If

For Each File in Upload.Files
If FILE.EXT<>".jpg" then 'bu tip dosyalara müsaade veriyoruz
If FILE.EXT<>".jpeg" then 'bu tip dosyalara müsaade veriyoruz
If File.ImageType="UNKNOWN" Then 'biraz önce müsaade verdiklerimizin dışında bütün resim formatlarını kabul ediyoruz.
response.redirect "../in/panel.asp?id=8"
Response.End
End if
End if
End if
Next


Set dosya = Upload.Files ("dosyaisim")
dosyaadi = cpr1&cpr2&cpr3&"_"&saynumara&Numara&Right(dosya.FileName,4)
Path = Server.MapPath(dosyayeri & "/" & dosyaadi)
dosya.SaveAs Path

Set Jpeg = Server.CreateObject("Persits.Jpeg" )
Jpeg.Open Path

If Jpeg.OriginalWidth > 990 then
Jpeg.Width = 990
Jpeg.Height = (Jpeg.OriginalHeight * 990) / Jpeg.OriginalWidth
End If

Jpeg.Canvas.Brush.Solid = False
Jpeg.PNGOutput = True
Jpeg.ToRGB
Jpeg.Quality = 90 'resim kalitesi %100
Jpeg.Interpolation = 0
Jpeg.PreserveAspectRatio = True
Jpeg.Crop 0, kenarpayi, ebat, ebat+kenarpayi 'Üstten kırparak ölçüyü ortalıyoruz
Path2 = Server.MapPath(dosyayeri & "/" & dosyaadi)
Jpeg.Save Path2
say close : set say = nothing

%>

<tr>


</td>
</tr></table></p>
<p align="center">


<b>Tebrikler... Yükleme İşlemi Başarı İle
Tamamlandı. Aşağıdaki Kodları Kullanabilirsiniz. <br>Yeni bir resim dosyası yüklemek
için </b><a href="dosyayukle.asp">
<span style="text-decoration: none; font-weight: 700">tıklayınız</span></span></a><br>
<hr></p>
<br>
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="75%" id="table1" height="1">
<tr>
<td width="24%" height="22" align="right">
<font face="Arial" size="2">
<b>Direk Link :  </b></font></td>
<td width="76%" height="22">
<font face="Arial">
<input type="text" name="T2" size="81" value="http://www.xxx.com/upload/<%=dosyaadi%>"></font></td>
</tr>
<tr>
<td width="24%" height="16" align="right">
<font face="Arial" size="2">
<b>Forum İçin Kod :  </b></font></td>
<td width="76%" height="16">
<font face="Arial">
<input type="text" name="T1" size="81" value="< Resime gitmek için tıklayın >"></font></td>
</tr>
</table>
</div>
<p align="center"><font face="Arial" size="2">
<a target="_blank" href="http://www.xxx.com/upload/<%=dosyaadi%>">
<br>
<img src="http://www.xxx/upload/<%=dosyaadi%>" align="middle" border="0"></a>
<%end if%>
<script>
$(document).ready(function(){
//Examples of how to assign the ColorBox event to elements
$(".example7").colorbox({width:"90%", height:"80%", iframe:true});

});
</script>

<!-- END THIRD SET -->


</div> <!-- end #contentPortfolio .grid_16 -->
<!-- END PORTFOLIO CONTENT -->

<div id="pagination" class="grid_16"></div><!-- end #pagination -->

</div> <!-- end #content -->
</div> <!-- end #content-wrap -->
<!-- END PAGE CONTENT -->

<!-- BEGIN FOOTER -->
<div id="footer-wrap">
<div id="footer" class="container_16 clearfix">
</div> <!-- end #footer -->
</div> <!-- end #footer-wrap -->
<!-- END FOOTER -->



T
10 yıl
Teğmen

Resimlerin başka siteler tarafından calınmasını onlemek ıcın istiyorsan başka tabi ama örnegın bır beyaz esyanın uzerıne yazı ıle veya resım ıle yenı ındırımlı gıbı css ıle basitce ıstedıgın bır yerıne ekleyebılırsın. ihtiyacın olursa paylasırım.



B
10 yıl
Binbaşı

.net in drawing kutuphanesi ile yaparsin



< Bu ileti mini sürüm kullanılarak atıldı >
Bu mesaja 1 cevap geldi.
B
9 yıl
Onbaşı

dosya.SaveAs path 'ın altına alttaki kodu koyacaksın. Alttaki kodda dosya ismi olarak imgs klasördeki Given.jpg kullanıldı.
Bu dosya alınıp, üzerine yazı yazılıp custom.jpg olarak aynı yere kayıt ediliyor. sen Given.jpg yerine kendi dosya ismini koyacaksın.
kaydederkende custom.jpg yerine kendi kullandığını. Yazının resim üzerindeki koordinatıda bu satırda PointF(130, 224);
ha birde using System.Drawing; ekleyeceksin. Bu asp net deki yazılımı, asp de sen bilirsin. :)
Kolay gelsin.



 
string path = Server.MapPath("imgs");
var bmp = new Bitmap(path + "\\Given.jpg");
var gra = Graphics.FromImage(bmp);

var text = "Crazy Love is Ankara";
var font = new Font("Tahoma", 24);
var brush = Brushes.Blue;
var point = new PointF(130, 224);

gra.DrawString(text, font, brush, point);
bmp.Save(path + "\\Custom.jpg");

gra.Dispose();
bmp.Dispose();


Bu arada bu, asp.net C# kodu. sana uyarmı bilmem.
Bence visual studio web development Express indir. ücretsiz. Çok çabuk adapte olursun.





< Bu mesaj bu kişi tarafından değiştirildi budamıBudha -- 5 Şubat 2016; 12:36:21 >

DH Mobil uygulaması ile devam edin. Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin. Gizle ve güncelleme çıkana kadar tekrar gösterme.