Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

VB .Net ÀûÓÃFTP.exeÉÏ´«ÎļþÖÁFTP·þÎñÆ÷

Public Class Form1
Private Sub CmdTrans_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdTrans.Click
Dim psi As New System.Diagnostics.ProcessStartInfo
Dim ftpFileName As String
psi.FileName = "ftp.exe"
psi.RedirectStandardInput = False
psi.RedirectStandardOutput = True
psi.UseShellExecute = False
ftpFileName = "E:\ftp.txt"
psi.Arguments = "-s:" & ftpFileName
Dim proc As Process
proc = Process.Start(psi)
'Wait process
proc.WaitForExit()
Console.WriteLine(proc.StandardOutput)
Console.ReadLine()
End Sub
End Class

ftp.txtÖеÄÄÚÈÝ£º
open 192.168.1.110
user dumeifang dumeifang
put E:\ip.html
quit
¿ØÖÆÌ¨ÖеÄÊä³ö£º
ftp> open 192.168.1.110
Connected to 192.168.1.110.
220 Serv-U FTP Server v8.2 ready...
User (192.168.1.110:(none)):
530 Invalid user name.
Login failed.
ftp> user dumeifang dumeifang
331 User name okay, need password.
230 User logged in, proceed.
ftp> put E:\ip.html
200 PORT Command successful.
150 Opening ASCII mode data connection for ip.html.
226 Transfer complete. 1,672 bytes transferred. 1.63 KB/sec.
ftp: ·¢ËÍ 1672 ×Ö½Ú£¬ÓÃʱ 0.00Seconds 1672000.00Kbytes/sec.
ftp> quit
221 Goodbye, closing session.
ftp -s:filenameÊǰÑһЩftpµÄÃüÁîдÈëfilenameÖУ¬FTP×Ô¶¯ÔËÐÐÀïÃæµÄÄÚÈÝ


Ïà¹ØÎĵµ£º

C´úÂëÓïÑÔתVB´úÂëµÄÎÊÌ⣺

Ë­ÄܰïÎÒ°ÑÕâ¶Î´úÂëת³ÉVbµÄ´úÂ룬²»Ê¤¸Ð¼¤£¬Ð»Ð»£¡
void CTempDlg::OnOK()
{
  UpdateData(1);
  int nlen=m_edit1.GetLength();
  char *username=m_edit1.GetBuffer(nlen);//¶¨ÒåÒ»¸öÐÂ×Ö·û´®username,³¤¶ÈΪnlen£¬²¢½«m_edit1ÖеÄ×Ö·û´®Ò»¸ö¸ö·ÅÈëµ½usernameÊý×éÖÐ
  char strA[]="90123456 ......

[VB]VBÖе÷ÓÃMSN 6.2 APIº¯Êý

VBÖе÷ÓÃMSN 6.2 APIº¯Êý
¡¡¡¡Á˽âÕâ·½ÃæÄÚÈÝµÄÆðÒòÊÇÔçÉÏÓÐλÅóÓÑÈÃÎÒ¿´Ò»¶Î¹ØÓÚMSN¿ª·¢³ÌÐò£¬ÏÖÔÚÎÞ·¨ÔËÐУ¬ÎÒ´ò¿ª¹¤³Ì·¢ÏÖÊÇÕë¶Ô4.7±àдµÄ£¬¶øËûµÄ¼ÆËã»ú°²×°µÄ6,2£¬ÒòΪÎÒÒ²ÓÃ6.2ËùÒÔÎÒÔÚVBÖв鿴ÁËһϣ¬·¢ÏÖÊÇȱÉÙMessenger Type Library¡£µ«ÊǶàÁËMessenger API Type Library£¬¿ÉÄÜÊÇ×öΪMessenger Type LibraryµÄÌ ......

[VB]ÀûÓÃAPI°ÑÒ»¸ö¿Ø¼þ°ó¶¨µ½ÁíÒ»¸ö¿Ø¼þÀï

 ÀûÓÃAPI°ÑÒ»¸ö¿Ø¼þ°ó¶¨µ½ÁíÒ»¸ö¿Ø¼þÀï
  ÀûÓÃAPI°ÑÒ»¸ö¿Ø¼þ°ó¶¨µ½ÁíÒ»¸ö¿Ø¼þÀï¡£²»¹ýÒª¿Ø¼þÓÐHWNDÊôÐÔ¡£ÀýÈ磺
    New_OldParent& = SetParent(Me.Text_txt.hWnd, Me.picture_bj.hWnd)
    °Ñtxt¿Ø¼þÌí¼Óµ½picture¿Ø¼þÀïʹÓá£
    ×¢£ºÊ¹Óà ......

ÔÙ̸ÓÃVBÎÞ´°¿Ú͸Ã÷Usercontrol±àд͸Ã÷¸¡¶¯°´Å¥

    È¥ÄêÔøÐ´¹ýһƪ²©ÎÄ£¬Ãû³Æ½Ð¡¶ÓÃVBÎÞ´°¿Ú͸Ã÷Usercontrol±àд͸Ã÷¸¡¶¯°´Å¥¡·£¬¸ÃÎÄÓÐÒ»¸ö¹ÛµãÊÇ´íÎóµÄ£¬¼´Í¸Ã÷ÎÞ´°¿ÚUsercontrol²»Ö§³ÖÉè¼ÆÊ±µãÑ¡¡£Æäʵ£¬Í¨¹ýÔÚUserControl_HitTest¹ý³ÌÀï¼ÓÈëHitResult = vbHitResultHitÓï¾ä£¬¾Í¿ÉÒÔʵÏÖÉè¼ÆÊ±µÄµãÑ¡ÁË£¬Îª´Ë£¬Ð޸ĴúÂëÈçÏ£º
'* ******************* ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ