我正在将 VB6 应用程序转换为 C#。我从 VB6 应用程序的顶部开始,然后从那里开始。什么是所有的RS。东西?我不明白?
Sub Main()
Dim RS As ADODB.Recordset
Dim FileName As String, FilePath As String
Dim Test As Boolean
Dim ResultCode As xcdError
Dim oAccess As Access.Application
Dim Zip_File As String
On Error GoTo ErrorHandler
' Make a connection to the database
Call MakeDBConnection
' Create a recordset of the directories to check
Set RS = New ADODB.Recordset
RS.ActiveConnection = DB
RS.CursorType = adOpenDynamic
RS.LockType = adLockOptimistic
RS.Open "Select ConversionDefinition.* From ConversionDefinition"
' Check the directories for Raw Data
' If the required data is found, then start the coversion application
If Not (RS.EOF And RS.BOF) Then
RS.MoveFirst
Do While Not (RS.EOF)