SQL SERVER 数据库插入数据后,默认值不起作用
没有用INSERTdt.Rows.Add() '增加一行
dt.Rows(0)("lsh") = Strlsh
dt.Rows(0)("bhbh") = Trim(TxtBh.Text)
dt.Rows(0)("qymc") = Trim(TxtQymc.Text)
dt.Rows(0)("clmc") = List2.Items(t).ToString
dt.Rows(0)("djjbr") = UserName
dt.Rows(0)("fjrq") = DayT0
dt.Rows(0)("fjr") = Trim(Combo1.Text)
dt.Rows(0)("sjbmqy") = Trim(Combo2.Text)
dt.Rows(0)("sjr") = Trim(Combo3.Text)
Dim cb As New SqlCommandBuilder(da)
da.UpdateCommand = cb.GetUpdateCommand '这句不加也可以
da.Update(ds)
不知是何原因。