Yeni Galeri Grubu Ekle

Galeri Grubu Listesine Dön

<% islem=request.QueryString("islem") select case islem case "Kaydet" Title=YariTemizle(Request.Form("Title")) LanguageID=Temizle(Request.Form("LanguageID")) KWidth=Temizle(Request.Form("KWidth")) 'KHeight=Temizle(Request.Form("KHeight")) BWidth=Temizle(Request.Form("BWidth")) 'BHeight=Temizle(Request.Form("BHeight")) conn.execute("insert into Table_GalleryGroup (Title,Raw,KWidth,BWidth,CreatedDate,ModifyDate,CultureID) values ('"& Title &"',0,'"& KWidth &"','"& BWidth &"','"& Replace(Now(),".","/") &"','"& Replace(Now(),".","/") &"','"& LanguageID &"')") Set TabYonlendir = Conn.Execute("SELECT TOP 1 * FROM Table_GalleryGroup order by CreatedDate desc") If not TabYonlendir.EOF Then Response.Redirect("gallerygroup.asp?LanguageID="&LanguageID) end if TabYonlendir.Close %>

! Galeri Grubu Eklendi ...

<%end select%>