0 голосов
спросил от в категории Access
Попробуйте следующее:

Private Sub AddLogEntry() Using DBCon As New OleDbConnection(<PUT ACCESS DB CONNECTION STRING HERE>), DBCmd As New OleDbCommand("",DBCon)  DBCmd.CommandText = "INSERT INTO Log (LDate, LTime, HCall, " & "State, County, Band, Freq, Mode, MCall, HRST, MRST, " & "HOper, MOper, RunStart, RunEnd, NetDuration, HomeCounty, CountyLine) " & "VALUES(@LDate,@LTime,@HCall,@State,@County,@Band,@Freq,@Mode,@MCall,@HRST,@MRST,@Hoper,@Moper,@RunStart,@RunEnd,@NetDuration,@HomeCounty,@CountyLine);"  With DBCmd  .Parameters.AddWithValue("@LDate", lblDate.Text)  .Parameters.AddWithValue("@LTime", lblClock.Text)  .Parameters.AddWithValue("@HCall", txtCall.Text)  .Parameters.AddWithValue("@State", cbxState.Text)  .Parameters.AddWithValue("@County", cbxCounty.Text)  .Parameters.AddWithValue("@Band", cbxBand.Text)  .Parameters.AddWithValue("@Freq", cbxFreq.Text)  .Parameters.AddWithValue("@Mode", cbxMode.Text)  .Parameters.AddWithValue("@Mcall", lblMCall.Text)  .Parameters.AddWithValue("@HRST", cbxHRst.Text)  .Parameters.AddWithValue("@MRST", cbxMRst.Text)  .Parameters.AddWithValue("@Hoper", cbxHOper.Text)  .Parameters.AddWithValue("@Moper", cbxMOper.Text)  .Parameters.AddWithValue("@RunStart", txtRStart.Text)  .Parameters.AddWithValue("@RunEnd", txtREnd.Text)  .Parameters.AddWithValue("@NetDuration", lblNetDur.Text)  .Parameters.AddWithValue("@HomeCounty", lblHomeCounty.Text)  .Parameters.AddWithValue("@CountyLine", cbxCountyL.Text)  End with  DBCon.Open()  if DBCmd.ExecuteNonQuery() = 1 Then   MsgBox("Row was added SUCCESFULLY.")   Me.RefreshGrid()  Else   MsgBox("Insert FAILED.")  Endif  DBCon.Close() End Using End Sub

Пожалуйста, войдите или зарегистрируйтесь чтобы ответить на этот вопрос.

Категории

Добро пожаловать на сайт DraftingCode Q&A, где вы можете задавать вопросы и получать ответы от других членов сообщества.

Похожие вопросы

0 голосов
0 ответов
спросил 10 Сен, 18 от richard maccutchan в категории Access
0 голосов
0 ответов
спросил 26 Апр, 10 от eddy vluggen в категории Access
0 голосов
0 ответов
спросил 01 Янв, 70 от MacFirst (120 баллов) в категории Access
0 голосов
0 ответов
0 голосов
0 ответов
спросил 10 Янв, 18 от maciej los в категории Access
...