
118 CHAPTER 3
PCDSQL
Dim sDST As String
Dim oDSTDIC As New DocInternalClass
Dim oDSTLogin As New PCDLogin
Public oDSTSQL As New PCDSQL
Private Sub cbCancel_Click()
Dim nResult As Long
sDST = ""
nResult = oDSTSQL.ReleaseResults()
Unload DSTForm
End Sub
Private Sub cbDoQuery_Click()
nResult = oDSTSQL.Execute( "SELECT DOCNAME, “ _
& “DOCNUMBER, STATUS, AUTHOR from “ _
Comentários a estes Manuais