C# • C# Windows Form Örnekleri

C# Sql VeriTabanından Rasgele Kayıt Çekme ve Word’e Aktarma

1 ay önce
Yorum ekle
330 views

Bu örnekte C# Windows Form ile SQL Veritabanı bağlantısı kurarak tablo içinden rasgele kayıt çekerek bu kayıtları Word dosyasına aktarmayı göstereceğim.

Örneğimizde Rasgele 10 sınav sorusu üreterek bu soruları word’ e aktaracağız.

Form Tasarımı:

C# Kodları:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
 
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using System.Data.SqlClient;
using wordeaktar = Microsoft.Office.Interop.Word;
 
namespace quiz
{
    public partial class Form1 : Form
    {
        SqlConnection con;
        SqlCommand cmd;
        SqlDataReader dr;
        public Form1()
        {
            InitializeComponent();
        }
 
        private void button1_Click(object sender, EventArgs e)
        {
            richTextBox1.Text = "";
            con = new SqlConnection("server=.;Initial Catalog=dbSinav;Integrated Security=SSPI");
            cmd = new SqlCommand();
            con.Open();
            cmd.Connection = con;
            cmd.CommandText = "SELECT TOP 10 soru FROM SORULAR ORDER BY NEWID()";
            dr = cmd.ExecuteReader();
            while (dr.Read())
            {
                richTextBox1.Text += dr["soru"]+Environment.NewLine;
            }
            con.Close();
 
        }
 
        private void button2_Click(object sender, EventArgs e)
        {
            wordeaktar.Application wordapp = new wordeaktar.Application();
            wordapp.Visible = true;
            wordeaktar.Document worddoc;
            object wordobj = System.Reflection.Missing.Value;
            worddoc = wordapp.Documents.Add(ref wordobj);
            wordapp.Selection.TypeText(richTextBox1.Text);
            wordapp = null;
        }
    }
}
 

Ekran Çıktısı:

Yapılış Videosu:

Şunlar da Hoşunuza Gidebilir

Yorum yap