Böyle bir sayfaya veritabanına dosya adını yazacak bir upload scripti konusunda yardımcı olurmusunuz ???? Birde aynı isimde var olan dosyanın adını değiştirbilecek...
Kod:
<table width="529" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#6699CC" bgcolor="#F1F1F1">
<tr>
<td height="20" bgcolor="#6699CC" align=center><span class="style41">YENİ KONU GÖNDER </span></td>
</tr>
<tr>
<td><center>
<!--#include file="baglan.asp" -->
<!--#include file="fonksiyon.asp" -->
<%
IF Not Session("giris")="yapildi" Then
Response.Redirect "default.asp"
End IF
IF Request.QueryString("@")="ok" Then
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "Select * from gelen_konu "
rs.open sql,Baglanti,1,3
kategori = veri(Request.Form("kategori"))
baslik = veri(Request.Form("baslik"))
aciklama = veri(Request.Form("aciklama"))
kaynak = veri(Request.Form("kaynak"))
dosya = veri(Request.Form("dosya"))
IF kategori="" OR baslik="" OR aciklama="" OR kaynak="" OR dosya="" Then
Response.Write "<script>alert('Formda Eksiklikler Var?');</script>"
Response.Write "<script>window.navigate('konu_gonder.asp');</script>"
Else
rs.AddNew
rs("kimden") = Session("kul_adi")
rs("kategori") = kategori
rs("baslik") = baslik
rs("aciklama") = aciklama
rs("kaynak") = kaynak
rs("dosya") = dosya
rs("tarih") = date()
rs.Update
Response.Write "<script>alert('Mesajýnýz Gönderilmiþtir.');</script>"
Response.Write "<script>window.navigate('default.asp');</script>"
End IF
End IF
%>
<center>
<br>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#3F3F3F" width="97%" height="26">
<tr>
<td width="100%" height="24"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber6" height="60">
<tr>
<form action="konu_gonder.asp?@=ok" method="post" onSubmit="checkFileUpload(this,'TXT,DOC');return document.MM_returnValue">
<td width="100%" height="60"><table width="100%" border="0" cellspacing="1" cellpadding="3">
<tr height="20" bgcolor="#121212">
<td width="25%" align="center" bgcolor="#F1F1F1"></td>
<td width="75%" align="center" bgcolor="#F1F1F1"> </td>
</tr>
<tr bgcolor="#343434">
<td bgcolor="#F1F1F1" class="nav">Kategori</td>
<td bgcolor="#F1F1F1"><label>
<select name="kategori" id="kategori">
<option value="GENEL KONU" selected="selected">GENEL KONU</option>
<option value="ARAMA ve ETÜD">ARAMA ve ETÜD</option>
<option value="MADEN İŞLETME">MADEN İŞLETME</option>
<option value="MADEN ZENGİNLEŞTİRME">MADEN ZENGİNLEŞTİRME</option>
<option value="MADEN EKONOMİSİ">MADEN EKONOMİSİ</option>
</select>
</label></td>
</tr>
<tr bgcolor="#343434">
<td bgcolor="#F1F1F1" class="nav">Başlık</td>
<td bgcolor="#F1F1F1"><input name="baslik" type="text" class="form1" id="baslik" size="35"></td>
</tr>
<tr bgcolor="#343434">
<td bgcolor="#F1F1F1" class="nav">Açıklama</td>
<td bgcolor="#F1F1F1"><textarea name="aciklama" cols="35" rows="7" class="form1" id="aciklama"></textarea></td>
</tr>
<tr bgcolor="#343434">
<td bgcolor="#F1F1F1" class="nav">Kaynak</td>
<td bgcolor="#F1F1F1"><input name="kaynak" type="text" class="form1" id="kaynak" size="35" /></td>
</tr>
<tr bgcolor="#343434">
<td bgcolor="#F1F1F1" class="nav">Dosya</td>
<td bgcolor="#F1F1F1"><span class="nav">
<input name="dosya" type="file" id="dosya" value="" size="35" />
</span></td>
</tr>
<tr bgcolor="#343434">
<td bgcolor="#F1F1F1" class="nav"> </td>
<td bgcolor="#F1F1F1" class="nav"> </td>
</tr>
<tr bgcolor="#343434">
<td bgcolor="#F1F1F1"> </td>
<td bgcolor="#F1F1F1"><input name="submit" type="submit" class="form1" Value="Gönder"></td>
</tr>
</table></td>
</form>
</tr>
</table></td>
</tr>
</table>
<br>
</center>
</center></td>
</tr>
</table>