Каждый флажок представляет собой простое значение True/False. Если только вы не используете флажок TriState...
Если вы используете обычный флажок, вы можете либо использовать одно поле базы данных для каждого флажка, либо назначить значения битовых флагов каждому флажку и "или" вместе и сохранить полученное значение.
Много сказать не могу.
У имени тестовую БД, таблицу деятельности с значение activityid сферах и направлениях деятельности
Получил форму с одним текстовым полем под названием txtactivity. Свойство Visible имеет значение false.
получил ярлык с текстовыми действиями.
Есть шесть флажков с шестью различными вариантами.
И конечно же пуговица
Код работает, но нуждается в некотором дополнительном прикосновении. Если ты сможешь сделать его более метким, это будет круто.
Imports System.Data.SqlClient
Public Class Form1
'path variable use for Get application running path
Dim path As String = (Microsoft.VisualBasic.Left(Application.StartupPath, Len(Application.StartupPath) - 9))
Dim con As New SqlConnection("Data Source=localhost;Initial Catalog=test;Integrated Security=True")
Dim cmd As SqlCommand
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If CheckBox1.Checked = False And CheckBox2.Checked = False And CheckBox3.Checked = False And CheckBox4.Checked = False And CheckBox5.Checked = False And CheckBox6.Checked = False Then
MsgBox("Please select atleast one activity")
Else
If CheckBox1.Checked Then
CheckBox1.Text = CheckBox1.Text
Else : CheckBox1.Text = ""
End If
If CheckBox2.Checked = True Then
CheckBox2.Text = CheckBox2.Text
Else : CheckBox2.Text = ""
End If
If CheckBox3.Checked = True Then
CheckBox3.Text = CheckBox3.Text
Else : CheckBox3.Text = ""
End If
If CheckBox4.Checked = True Then
CheckBox4.Text = CheckBox4.Text
Else : CheckBox4.Text = ""
End If
If CheckBox5.Checked = True Then
CheckBox5.Text = CheckBox5.Text
Else : CheckBox5.Text = ""
End If
If CheckBox6.Checked = True Then
CheckBox6.Text = CheckBox6.Text
Else : CheckBox6.Text = ""
End If
txtactivity.Text = CheckBox1.Text + " " + CheckBox2.Text + " " + CheckBox3.Text + " " + CheckBox4.Text + " " + CheckBox5.Text + " " + CheckBox6.Text
Dim sql As String = "INSERT INTO Activity VALUES(@Activities)"
Dim cmd As New SqlCommand(sql, con)
cmd.Parameters.AddWithValue("@Activities", txtactivity.Text)
cmd.ExecuteNonQuery()
MessageBox.Show("Information has been saved", "Save", MessageBoxButtons.OK)
End If
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
con.Open()
End Sub
End Class
Помимо того, что исходному вопросу уже более 2 лет ... в чем смысл таких строк, как "CheckBox1. Text = CheckBox1. Text"???
в чем смысл txtactivity? код
txtactivity как использовать
Я бы проигнорировал код, который вы задаете о tbh
надеюсь, это поможет :
http://forums.asp.net/t/1324797.aspx/1?Problem+вставка+флажок+значение+в+База данных в SQL+[^]
Нет, я пытался сослаться на вышеупомянутую ссылку для того же запроса, но они не ясны.Кто-нибудь может помочь с кодом?
А? вы тот же человек,который отправил этот вопрос? В любом случае, никто не поможет вам, если все, что вам нужно, - это код. Здесь это не так работает. Вы должны были начать с чего-то и задавать вопросы здесь, Если вы где-то застряли.
Привет,
попробовать это
установите AutoPostBack= " true "в Checkbox во время разработки, а также установите событие" OnCheckedChanged", которое будет вызывать функцию code behind каждый раз, когда пользователь выбирает/снимает флажок ...
Поэтому, когда событие OnCheckedChanged вызывается в коде позади, вы можете написать свой код, который попадет в базу данных, а перед этим проверить, какой флажок установлен CheckboxName.Checked = True, а затем вызовите функцию, которая вставит значение checked Checkbox в базу данных