005. xfnSqlDump

xfnSqlDump 함수

• • 특정 테이블의 특정 레코드를 SQL Insert 구문으로 생성하는 함수입니다.

  • 사용가능한 Field Type

    • BIT, TINYINT, SMALLINT, INT, BIGINT, FLOAT, REAL, DECIMAL, NUMERIC, SMALLMONEY,

    • MONEY, SMALLDATETIME, DATETIME, CHAR, VARCHAR, NCHAR, NVARCHAR, TEXT, NTEXT

  • 사용 불가능한 Field Type

    • IMAGE, BINARY, VARBINARY

구문

• • xfnSqlDump(ByVal lngDumpType As xENM_SQL_DUMP_TYPE, ByVal strFullTableName As String

  •                 , Optional ByVal strOutPutFilePathName As String = "C:\dump.sql", Optional ByVal strWhere As String = ""

  •                 , Optional ByVal blnIsPutGoLast As Boolean = True) As Boolean

반환값

• • 성공 :  True를 반환합니다.

  • 오류 :  False를 반환합니다.

참고

• • SQL Server 테이블만 가능합니다.(ORACLE 등은 지원하지 않습니다.)

예제

코드

Private Sub cmdTest_Click()

    'xfnSqlDump 함수 Test

    Dim strTableName As String   '테이블명

    Dim strPath As String        '파일

    '테스트테이블 생성

    'create table TestDump (id  int, name nvarchar(30))

    'insert into TestDump(id, name) values(1, 'TD21')

    'insert into TestDump(id, name) values(2, 'Manager')

    strTableName = "TestDump"

    strPath = "D:\" & strTableName & ".sql"

    If Not xfnSqlDump(xenmDumpTypeInsert, strTableName, strPath) Then

        xsbErrMsg strTableName & vbNewLine & xstrErrDesc

        Exit Sub

    End If

    '실행후 D:\TestDump.sql 파일 확인 내용

'    /*********************************************

'       SQL Sump

'       Dump 일시: 2010/6/18 10:42:27

'       호스트명: tomas-N(192.168.100.112)

'       개체명:        dbo.TestDump

'       Dump 방식: INSERT

'       WHERE:

'       행수: 2

'       Dump에 포함되지 않은 컬럼명: 없음

'    *********************************************/

'

'

'    -- Record Number: 1

'    INSERT INTO [dbo].[TestDump] ([id], [name])

'       VALUES (1, N'TD21')

'

'    -- Record Number: 2

'    INSERT INTO [dbo].[TestDump] ([id], [name])

'       VALUES (2, N'Manager')

'    GO

End Sub