JAVA 웹 과 비교를 하기위한 기타 기능 추가
This commit is contained in:
@@ -4,14 +4,14 @@
|
||||
Select Case e.KeyCode
|
||||
Case Keys.O
|
||||
If e.Control Then
|
||||
ExportView("c:\ExportData.txt", Me)
|
||||
ExportView("c:\ExportData.txt")
|
||||
End If
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
'//그리드뷰의 내용을 내보낸다(ArinDataView 의 일부)
|
||||
Public Sub ExportView(ByVal Filename As String, ByVal Dv As DataGridView)
|
||||
If Dv.RowCount < 1 Then
|
||||
Public Sub ExportView(ByVal Filename As String)
|
||||
If Me.RowCount < 1 Then
|
||||
MsgBox("저장가능한 목록이 없습니다", MsgBoxStyle.Information, "확인")
|
||||
Return
|
||||
End If
|
||||
@@ -23,7 +23,7 @@
|
||||
SD.FilterIndex = 0
|
||||
SD.RestoreDirectory = True
|
||||
If SD.ShowDialog <> Windows.Forms.DialogResult.OK Then Return
|
||||
SaveTextfile(Dv, SD.FileName, CChar(IIf(SD.FilterIndex = 2, ",", vbTab)))
|
||||
SaveTextfile(Me, SD.FileName, CChar(IIf(SD.FilterIndex = 2, ",", vbTab)))
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Reference in New Issue
Block a user