C#.NET
private void SendFile(TKFP.Net.FtpClient ftpClient, string serverPath, string localPath)
{
TKFP.IO.FileInfo file = new TKFP.IO.FileInfo(ftpClient, serverPath);
if (file.Exists)
{
System.Windows.Forms.MessageBox.Show("ファイルは既に存在します。");
return;
}
file.TransferType = TKFP.Net.TransferTypes.ASCII;
file.ReadFrom(localPath);
System.Windows.Forms.MessageBox.Show("ファイルを送信しました。");
}
VB.NET
Private Sub SendFile(ByVal ftpClient As TKFP.Net.FtpClient, ByVal serverPath As String, ByVal localPath As String)
Dim file As New TKFP.IO.FileInfo(ftpClient, serverPath)
If file.Exists Then
System.Windows.Forms.MessageBox.Show("ファイルは既に存在します。")
Return
End If
file.TransferType = TKFP.Net.TransferTypes.ASCII
file.ReadFrom(localPath)
System.Windows.Forms.MessageBox.Show("ファイルを送信しました。")
End Sub
VB.NETのコードはC#.NETを元に「
C#.NET to VB.NET Translator」によって作成したものです
次のプログラムはTKFP.Net.FtpClientのインスタンスとサーバーパス、ローカルファイルを指定すると、 ファイルをアスキーモードで送信します。TransferTypeプロパティを設定する以外は特別に必要な処理は行っていません。