hata veren bağlantı cümlesini
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open server.MapPath("database.mdb")
şeklinde değiştirirmisin.
İzinleri .mdb dosyasına verebilirsin.
Eğer sorun çözülmezse hata verdiği satırdaki kodları yazmanı isterim.
Kanımca dosya izinleri ile ilgili. Çünkü haber_ekle içerisinde oluyor bu hata yani veritabanına yazma işinde.

Sunucu için,
persist de bir upload bileşenidir.
Bunu kullanabilmek için scriptin değiştirilmesi gerekir.
Yani script içinde dosya upload yapılan kısımları persist bileşenin yazım kurallarına göre yeniden yazmak gerekir.