Jump to content


Photo

can't close object


  • Please log in to reply
5 replies to this topic

#1 10224

10224
  • Members
  • 3 posts

Posted 30 April 2006 - 08:27 AM

hi

I'm trying to close my application but it still active and i need to use ctrl+alt+del

/////////////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////

Private Sub connect(txt_user, txt_pass)
  
 '   load licence strKey
	Set objGlobal = CreateObject("sfFTPLib.Global")
	If objGlobal.LoadLicenseKeyData(strKey) Then
		Label23.Caption = "OK licence"
	Else
	   Label23.Caption = "Failed licence"
	End If
	
	Set objFTP = CreateObject("sfFTPLib.FTPConnectionSTA")
	
	objFTP.Host = txtServer
	objFTP.Username = txt_user
	objFTP.Password = txt_pass
	objFTP.HidePassword = True
	objFTP.LogFile = "VB6Demo.log"
	objFTP.Port = 21
	objFTP.Protocol = ftpProtocolNormal
	objFTP.Passive = True

 
   If objFTP.Connect = sfFTPLib.enumError.ftpErrorSuccess Then
	   objFTP.DataTransferType = ftpDataTransferTypeImage
	   Exit Sub
	Else
	   DoEvents
	   objFTP.Disconnect
	   objFTP.Close
	   Call connect(txt_user, txt_pass)
	End If
end sub
///////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////

Private Sub exit_Click()
		 
		   On Error Resume Next
		   objFTP.Abort
		   objFTP.Disconnect
		   objFTP.Close
		   Unload Me
		   End
   
End Sub


******************************************************
******************************************************

why the project still active in memory ???? and how could i force him to close ??

thanks

david

#2 eyebex

eyebex
  • Licensed User
  • 1860 posts
  • Gender:
    Male

Posted 30 April 2006 - 10:42 AM

If you need technical support please purchase a license and enter your license ID into your forum profile.

#3 10224

10224
  • Members
  • 3 posts

Posted 30 April 2006 - 10:53 AM

If you need technical support please purchase a license and enter your license ID into your forum profile.


i ask the Q in public support .
why should i purchase a license if i have simple problem and you cant help me ??



thanks

david

#4 mb

mb

    Developer

  • Administrators
  • 11521 posts
  • Gender:
    Male
  • Location:
    Worldwide

Posted 30 April 2006 - 12:08 PM

Are you using VB6?

#5 10224

10224
  • Members
  • 3 posts

Posted 30 April 2006 - 12:10 PM

Are you using VB6?



yes i am using vb6 with sp6

thanks
david

#6 mb

mb

    Developer

  • Administrators
  • 11521 posts
  • Gender:
    Male
  • Location:
    Worldwide

Posted 30 April 2006 - 12:15 PM

Try the sample applications provided in the setup package. If it works there is probably something wrong with your code.

The code you posted seems incomplete to me. Provided the full code.

Also you forgot to mention what version you are using.

Regards,
SmartFTP




0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users