BLL/POSTLINEBLL.vb

微信扫码关注公众号，代码整理好后第一时间通知你。

Imports System
Imports System.Data
Imports System.Data.SqlClient
Imports System.Configuration
Imports System.Web
Imports System.Text
Imports System.Collections.Generic
Imports DAL
Imports Model
Public Class POSTLINEBLL
    Public Function Add_POSTLINE(ByVal strpostline As POSTLINE) As Integer
        Dim strpostlinesql As New POSTLINESQL
        Return (strpostlinesql.Add_POSTLINE(strpostline))
    End Function
    Public Sub Update_POSTLINE(ByVal strpostline As POSTLINE)
        Dim strpostlinesql As New POSTLINESQL
        strpostlinesql.Update_POSTLINE(strpostline)
    End Sub
    Public Sub Delete_POSTLINE(ByVal strsalesid As String)
        Dim strpostlinesql As New POSTLINESQL
        strpostlinesql.Delete_POSTLINE(strsalesid)
    End Sub


    Public Function countfield(ByVal strsql As String) As String
        Dim strcartsql As New CARTSQL
        Return strcartsql.countfield(strsql)
    End Function
End Class