views:

704

answers:

0
Imports System.Data
Imports System.IO
Imports personal_dtls.perds
Imports personal_dtls.perdsTableAdapters


    Private Sub insert_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles insert.Click
            Dim adapter As New perdsTableAdapters.Daily_AttndTableAdapter
            adapter.InsertQuery("as", "asd", "cs", 98, 98, 9, 67)
    End Sub