Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly
Sign up
Appearance settings

Commit 987d131

Browse files
Teardown (#30)
* Update SQLlibDatabaseTests.cls * Update SQLlibDeleteTests.cls * Update SQLlibInsertTests.cls * Update SQLlibSelectTests.cls * Update SQLlibStaticTests.cls * Update SQLlibUpdateTests.cls
1 parent cffa2fe commit 987d131

File tree

6 files changed

+30
-0
lines changed

6 files changed

+30
-0
lines changed

‎testing/ClassModules/SQLlibDatabaseTests.cls‎

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -33,6 +33,10 @@ Sub iTestCase_Setup()
3333
End With
3434
End Sub
3535

36+
Sub iTestCase_TearDown()
37+
38+
End Sub
39+
3640
Function mssqlTest()
3741
MyDatabase.DBType = "mssql"
3842

‎testing/ClassModules/SQLlibDeleteTests.cls‎

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -8,9 +8,15 @@ Attribute VB_Creatable = False
88
Attribute VB_PredeclaredId = False
99
Attribute VB_Exposed = False
1010
Implements iTestCase
11+
1112
Sub iTestCase_Setup()
1213

1314
End Sub
15+
16+
Sub iTestCase_TearDown()
17+
18+
End Sub
19+
1420
Function iTestCase_GetAllTests()
1521
iTestCase_GetAllTests = Array("SimpleDeleteTest")
1622
End Function

‎testing/ClassModules/SQLlibInsertTests.cls‎

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -16,6 +16,10 @@ Sub iTestCase_Setup()
1616
Set MyInsert = Create_SQLInsert
1717
End Sub
1818

19+
Sub iTestCase_TearDown()
20+
21+
End Sub
22+
1923
Function iTestCase_GetAllTests()
2024
iTestCase_GetAllTests = Array("SimpleInsertTest", "InsertSelectTest", "InsertMultipleTest")
2125
End Function

‎testing/ClassModules/SQLlibSelectTests.cls‎

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -14,6 +14,11 @@ Dim Interfaced As iSQLQuery
1414
Sub iTestCase_Setup()
1515

1616
End Sub
17+
18+
Sub iTestCase_TearDown()
19+
20+
End Sub
21+
1722
Function iTestCase_GetAllTests()
1823
iTestCase_GetAllTests = Array("SimpleSelectTest", "GetByPropertyTest", "JoinTest", "DistinctTest")
1924
End Function

‎testing/ClassModules/SQLlibStaticTests.cls‎

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -16,6 +16,11 @@ Sub iTestCase_Setup()
1616
Set MyStatic = Create_SQLStaticQuery
1717
Set Interfaced = MyStatic
1818
End Sub
19+
20+
Sub iTestCase_TearDown()
21+
22+
End Sub
23+
1924
Function iTestCase_GetAllTests()
2025
iTestCase_GetAllTests = Array("NoArgumentTest", "AddargumentMissingColonTest", "CorrectUseTest", _
2126
"ChangeArgumentTest", "EscapeTextTest", "MultipleArgumentTest", "ClearArgumentsTest", _

‎testing/ClassModules/SQLlibUpdateTests.cls‎

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -8,9 +8,15 @@ Attribute VB_Creatable = False
88
Attribute VB_PredeclaredId = False
99
Attribute VB_Exposed = False
1010
Implements iTestCase
11+
1112
Sub iTestCase_Setup()
1213

1314
End Sub
15+
16+
Sub iTestCase_TearDown()
17+
18+
End Sub
19+
1420
Function iTestCase_GetAllTests()
1521
iTestCase_GetAllTests = Array("SimpleUpdateTest")
1622
End Function

0 commit comments

Comments
(0)

AltStyle によって変換されたページ (->オリジナル) /