Seorang administrator atau seorang dokter dapat melakukan penambahan berita kesehatan, disini untuk mempermudah pengguna mengetahui informasi kesehatan. Fungsi penambahan berita dapat dilihat seperti berikut :

Berikut adalah program untuk menambahkan berita :

Berikut adalah program untuk menambahkan berita :
using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.IO;
using System.Collections;
using System.Configuration;
using System.Data.SqlClient;
using System.Data;
public partial class Admins_TambahLokasi : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e) //fungsi ketika program dijalankan
{
string selectedValue = DropdownList1.SelectedValue;
showImages();
DropdownList1.SelectedValue = selectedValue;
}
private void showImages() //fungsi menampilkan gambar pada dropdown
{
string[] images = Directory.GetFiles(Server.MapPath("~/App_Themes/Default/GalleryMap/"));
ArrayList imageList = new ArrayList();
foreach (string image in images)
{
string imageName = image.Substring(image.LastIndexOf(@"\") + 1);
imageList.Add(imageName);
}
DropdownList1.DataSource = imageList;
DropdownList1.DataBind();
}
private void clearText() //fungsi hapus text pada textbox
{
txtNama.Text = "";
txtDeskripsi.Text = "";
txtAlamat.Text = "";
txtNotelp.Text = "";
txtWebsite.Text = "";
}
protected void btUpload_Click(object sender, EventArgs e) //fungsi upload gambar
{
try
{
string filename = Path.GetFileName(FileUpload1.FileName); //membuat variable untuk penyimpanan gambar
FileUpload1.SaveAs(Server.MapPath("~/App_Themes/Default/GalleryMap/" + filename)); //lokasi penyimpanan gambar
lblOutput.Text = "image" + filename + "file success upload"; //menampilkan pesan jika sudah berhasil di upload
Page_Load(sender, e);
}
catch (Exception er) //jika proses upload gagal akan menampilkan pesan eror
{
lblOutput.Text = "Upload failed";
lblOutput.Text = er.Message;
}
}
protected void btnSave_Click(object sender, EventArgs e) //fungsi simpan
{
string connString = ConfigurationManager.ConnectionStrings["forumssConnectionString1"].ConnectionString;//memanggil koneksi database
string query = "insert into [forumss].[dbo].[LokasiRS](namaRs,deskripsi,alamatRs,notelp,website,gambar) values(@namaRs,@deskripsi,@alamatRs,@notelp,@website,@gambar)";//membuat variable query yang berisi untuk input data
using (SqlConnection con = new SqlConnection(connString))
using (SqlCommand command = new SqlCommand(query, con))
{
command.Parameters.Add("@namaRs", SqlDbType.VarChar, 100).Value = txtNama.Text.Trim();
command.Parameters.Add("@deskripsi", SqlDbType.VarChar, 5000).Value = txtDeskripsi.Text.Trim();
command.Parameters.Add("@alamatRs", SqlDbType.VarChar, 2000).Value = txtAlamat.Text.Trim();
command.Parameters.Add("@notelp", SqlDbType.VarChar, 50).Value = txtNotelp.Text.Trim();
command.Parameters.Add("@website", SqlDbType.VarChar, 50).Value = txtWebsite.Text.Trim();
command.Parameters.Add("@gambar", SqlDbType.VarChar, 1000).Value = "../App_Themes/Default/GalleryMap/" + DropdownList1.SelectedValue;
try
{
con.Open();
command.ExecuteNonQuery();
clearText();
lblOutput.Text = "Success";
}
catch (Exception err)
{
con.Close();
clearText();
lblOutput.Text = err.Message;
}
}
}
}





