Gönderen: 15-Mayıs-2007 Saat 11:47 | Kayıtlı IP

mrb asp ye yeni başlaldım bi haber scripti hazırlıyorum

bir haber kayıt formu oluşturdum

bir de haber_ekle.asp sayfası var

kodlar şu şekilde

Veri kaynağı adı bulunamadı ve varsayılan sürücü belirtilmemiş hatası veriyor IIS te çalıştırdığımda.Ama odbc de veritabanını da seçtim.Yardımcı olursanız sevinirim.

<%
set baglanti=server.createObject("adodb.connection")
baglanti.Open "Driver={Microsoft Access driver(*.mdb)};DBQ="& server.MapPath("haber.mdb")

ekleyen=request.form("ekleyen")
email=request.form("email")
baslik=request.form("baslik")
detay=request.form("detay")

set kayit=Server.CreateObject("ADODB.RecordSet")
Sql_komutu="select * from haber"
kayit.Open Sql_komutu,baglanti,1,3

if isim ="" or posta ="" or mesaj ="" then
Response.Write "<font size=""+1""><b><font color=""#FF0000"">HATA!</font><br><br>L ütfen bütün alanları doldurunuz</b></font><br><br><br& gt;<br>"
Response.Write "<a href=""javascript:history.back()"">&lt;&lt;Geri&l t;/a></b>"
else
Kayit.AddNew
Kayit("tarih")=date()
Kayit("saat")=time()
Kayit("durum")="Pasif" 'Pasif, mesajin yayinda olmamasi demektir ve her mesaj baslangiçta pasiftir
Kayit("ekleyen")=ekleyen
Kayit("email")=email
Kayit("detay")=detay
Kayit("baslik")=baslik
Kayit.Update
Response.Write "<font size=""+1""><b><font color=""#00FF00"">TEBRIKLER!</font><br><br >Haberiniz basarili bir sekilde kaydedildi</b></font><br><br><br& gt;<br>"
Response.Write "<a href=""haber_form.asp"">&lt;&lt;Geri</a>< ;/b>"
end if
Kayit.close
Set Kayit = Nothing
%>