هلا
عندي مشكلة في اداة Place Holder انا بضيف ادوات في Place Holder وقت التنفيذ عن طريق الكود التالي
Dim i, a As Integer
Dim da As New SqlDataAdapter("Select * from Employee_ where Employee_Team='IT'", con)
Dim ds As New DataSet
Dim nu As Integer
nu = 1
da.Fill(ds)
i = Me.Steps_.Text
For a = 1 To i
Dim DropDown As New DropDownList
With DropDown
.ID = nu
.Width = 150
.DataSource = ds
.DataTextField = "Employee_Name"
.DataValueField = "Employee_ID"
.DataBind()
End With
Dim spacer_ As LiteralControl = New LiteralControl("Step :" & nu & " ")
PlaceHolder1.Controls.Add(spacer_)
PlaceHolder1.Controls.Add(DropDown)
Dim spacer As LiteralControl = New LiteralControl("<br /> <br />")
PlaceHolder1.Controls.Add(spacer)
nu = nu + 1
Nextالكود شغال تمام ومافي اي مشكلة
هلا المشكلة انو بعد ما يظهر DropDownList واختار القيم ما بقدر اعرف القيم التي تم اختيارها من DropDownList علشان اخزنه فب الداتا بيس
Dim i As Integer
Dim nu As String
nu = 1
i = Me.Steps_.Text
Dim DropDown As New DropDownList()
For a = 1 To i
nu = nu + 1
Dim ddlist As DropDownList = DirectCast(PlaceHolder1.FindControl("DropDown" & nu), DropDownList)
Dim cmd As New SqlCommand
cmd.CommandText = "Insert Into Step_ (Object_ID,Step_Number,Step_Employee,Step_Status,Step_Comm,Step_Date)Values(@Object_ID,@Step_Number,@Step_Employee,@Step_Status,@Step_Comm,@Step_Date)"
cmd.Connection = con
cmd.Parameters.Add("@Object_ID", SqlDbType.NVarChar).Value = Object_ID.Text
cmd.Parameters.Add("@Step_Number", SqlDbType.NChar).Value = nu
cmd.Parameters.Add("@Step_Employee", SqlDbType.NVarChar).Value = ddlist.ToString
cmd.Parameters.Add("@Step_Status", SqlDbType.NVarChar).Value = "Arriv"
cmd.Parameters.Add("@Step_Comm", SqlDbType.NVarChar).Value = "NA"
cmd.Parameters.Add("@Step_Date", SqlDbType.SmallDateTime).Value = Date.Now
cmd.ExecuteNonQuery()
Nextالتتيجة
Line 93: cmd.Parameters.Add("@Step_Employee", SqlDbType.NVarChar).Value = ddlist.ToString
Object reference not set to an instance of an objectوشكرااا