Click here to Skip to main content
16,006,535 members
Home / Discussions / Visual Basic
   

Visual Basic

 
GeneralRe: Access Database from Website In vb.net Pin
Kiran S. S.11-Apr-07 18:13
Kiran S. S.11-Apr-07 18:13 
GeneralRe: Access Database from Website In vb.net Pin
Dave Kreskowiak12-Apr-07 3:42
mveDave Kreskowiak12-Apr-07 3:42 
GeneralRe: Access Database from Website In vb.net Pin
Kiran S. S.12-Apr-07 18:14
Kiran S. S.12-Apr-07 18:14 
Questionapi problem. Pin
amaneet11-Apr-07 2:34
amaneet11-Apr-07 2:34 
AnswerRe: api problem. Pin
Dave Kreskowiak11-Apr-07 5:14
mveDave Kreskowiak11-Apr-07 5:14 
QuestionHow to copy file from FTP folder Pin
virendra_00711-Apr-07 2:19
virendra_00711-Apr-07 2:19 
AnswerRe: How to copy file from FTP folder Pin
Dave Kreskowiak11-Apr-07 5:06
mveDave Kreskowiak11-Apr-07 5:06 
GeneralRe: How to copy file from FTP folder Pin
virendra_00711-Apr-07 23:36
virendra_00711-Apr-07 23:36 
hi! Dave,
I am using VB6. Main Code is as follows

Dim MyFTP as FTP
With MyFTP
'
' Initialize the FTP connection.
'
If Not .FTPInit(gsServer, gsUser, gsPswd, 0, 0, "", sError) Then
GoTo cmdReceiveError
End If

'
' Transfer the file(s)
'
If bSingleFile Then
Call .FTPGet(gsLocalDir, sFileType, gsFTPDir, sError)
If sError <> "" Then GoTo cmdReceiveError
Else
Call .FTPGetAll(gsLocalDir, sFileType, gsFTPDir, sError)
If sError <> "" Then
sMsg = sError
GoTo cmdReceiveError
End If
End If
'
' Close the connection.
'
Call .FTPClose
End With
lblStatus = sMsg
'
' cleaning.
'
Set MyFTP = Nothing




Dim bFiles As Boolean
Dim sFileName As String
Dim ofile As File
Dim ofiles As Files

bFiles = False
FTPPutAll = False
On Error GoTo FTPPutAllError

Set ofiles = fso.GetFolder(sLocalFolder).Files
For Each ofile In ofiles
sFileName = UCase$(ofile.Name)
If InStr(1, sFileName, UCase$(sFileNameString)) > 0 Then
bFiles = True
If Not FTPPut(sLocalFolder, sFileName, sFTPFolder, sError) Then
Exit Function
End If
End If
Next
Set ofile = Nothing
Set ofiles = Nothing

If bFiles Then
FTPPutAll = True
Else
sError = "No files found."
End If

Virendra
GeneralRe: How to copy file from FTP folder Pin
Dave Kreskowiak12-Apr-07 3:40
mveDave Kreskowiak12-Apr-07 3:40 
QuestionHelp Me.Urgent Pin
Osama12311-Apr-07 1:41
Osama12311-Apr-07 1:41 
AnswerRe: Help Me.Urgent Pin
Christian Graus11-Apr-07 2:03
protectorChristian Graus11-Apr-07 2:03 
AnswerRe: Help Me.Urgent Pin
Krish - KP11-Apr-07 2:06
Krish - KP11-Apr-07 2:06 
GeneralRe: Help Me.Urgent Pin
Christian Graus11-Apr-07 13:38
protectorChristian Graus11-Apr-07 13:38 
AnswerRe: Help Me.Urgent Pin
Krish - KP11-Apr-07 2:10
Krish - KP11-Apr-07 2:10 
QuestionHelp Me Pin
pampam11011-Apr-07 0:34
pampam11011-Apr-07 0:34 
AnswerRe: Help Me Pin
Colin Angus Mackay11-Apr-07 1:01
Colin Angus Mackay11-Apr-07 1:01 
AnswerRe: Help Me Pin
Zaegra11-Apr-07 1:34
Zaegra11-Apr-07 1:34 
AnswerRe: Help Me Pin
Christian Graus11-Apr-07 2:05
protectorChristian Graus11-Apr-07 2:05 
AnswerRe: Help Me Pin
Dave Kreskowiak11-Apr-07 5:05
mveDave Kreskowiak11-Apr-07 5:05 
QuestionHow can I play an embeded resource wav file? Pin
JUNEYT11-Apr-07 0:19
JUNEYT11-Apr-07 0:19 
AnswerRe: How can I play an embeded resource wav file? Pin
Dave Kreskowiak11-Apr-07 5:04
mveDave Kreskowiak11-Apr-07 5:04 
Generalvb.net Pin
rajigopalan10-Apr-07 23:08
rajigopalan10-Apr-07 23:08 
GeneralRe: vb.net Pin
Christian Graus10-Apr-07 23:10
protectorChristian Graus10-Apr-07 23:10 
GeneralRe: vb.net Pin
amaneet11-Apr-07 0:12
amaneet11-Apr-07 0:12 
QuestionComparing images using the GetPixel Method (2) Pin
Zaegra10-Apr-07 23:01
Zaegra10-Apr-07 23:01 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.