Printable View
I am using VB6 and I want a flash movie to play while showing a message while my database looks up the userid and password codes. Problem is... the database is too small and my flash doesn't get shown. I want to know how I can delay (like 2 seconds ) so I can show that flash doc before it begins looking up in the database. I need some sort of timer control that is triggered by the clicking of the submit button so the user knows that the information is being verified. Thanks on avance!
Please excuse the typing... as I am extemely tired!
Display your flash movie on a seperate thread and explicity force the thread to sleep for 2 seconds after calling the db:
Code:using System;
using System.Threading;
class ShowFlash {
static void Main() {
Thread t = new Thread(new ThreadStart(DisplayFlash));
t.Start();
RetrieveDBInfo();
t.Abort();
}
static void DisplayFlash() {
Console.WriteLine("Display Flash Movie Here..");
}
static void RetrieveDBInfo() {
// Retrieve information from db
Thread.Sleep(2000);
}
}
If you want to make use of threading , SimonVega got a good example otherwise , paste a timer control , disable it , and fire it after the user fill in empty spaces .Quote:
Originally posted by BurnMan2003
I am using VB6 and I want a flash movie to play while showing a message while my database looks up the userid and password codes. Problem is... the database is too small and my flash doesn't get shown. I want to know how I can delay (like 2 seconds ) so I can show that flash doc before it begins looking up in the database. I need some sort of timer control that is triggered by the clicking of the submit button so the user knows that the information is being verified. Thanks on avance!
timer1.interval = 2000
timer1.enabled =true
the code should go inside a button the user will click !
Thanks for the clarification...;)Quote:
the code should go inside a button the user will click !
Will this work in VB6, because it looks like c++ coding with the braces!
OK when the user fills in the userid and the password, they click on the submit. I then want the flash movie that says "Validating" to appear and run.. but the database is too small for it to play because it finds the data too fast. How can I from The submit button in VB6 get that flash movie to play for 2 or 3 seconds and then search the database? Thaks, I hope ths is clearerr.... here is the code I have so far under the command button:
Private Sub cmdSubmit_Click()
' Validate Inputs
On Error GoTo Err_Check
Dim strsql As String
strsql = "Select * FROM tblUsers Where UserName = '" & txtUserName.Text & "'"
flaVerify.Visible = True
cmdSubmit.Enabled = False
Set rst = New ADODB.Recordset
rst.Open strsql, cnn, adOpenForwardOnly, adLockReadOnly
If Not rst.EOF And Not rst.BOF Then
If rst!Password = txtPwd.Text Then
frmSwitch.Show
Me.Hide
Else
flaVerify.Visible = False
MsgBox "Invalid Password"
cmdSubmit.Enabled = True
End If
Else
flaVerify.Visible = False
MsgBox "Invalid User Name"
cmdSubmit.Enabled = True
End If
rst.Close
Exit_Check:
Set rst = Nothing
Exit Sub
Err_Check:
MsgBox Err.Description, "Login Function"
Resume Exit_Check
End Sub
Just noticed you mentioned VB6...This is a .NET Forum.
The code I posted is in C#. Here is a VB.NET equivalent:
Code:Imports System
Imports System.Threading
Public Module Module1
Sub Main()
Dim t As New Thread(AddressOf ShowFlash.DisplayFlash)
t.Start()
ShowFlash.CallDB()
t.Abort()
End Sub
End Module
Public Class ShowFlash
Public Shared Sub DisplayFlash()
Console.WriteLine("Display Flash...")
End Sub
Public Shared Sub CallDB()
Console.WriteLine("Call DB")
Thread.Sleep(2000)
End Sub
End Class
Will this work in VB6?
What !:eek: VB6 ???Quote:
Originally posted by BurnMan2003
Will this work in VB6?
yes... VB6, I have to finish this by semester's end, and I don't have time to learn another language and the ne wstuff in .NET. Can you please help! Thanks man!
It won't work .Quote:
Originally posted by BurnMan2003
Will this work in VB6?
Just try what I've posted , it should work !
Using my coding from the command button, where should I insert your code for best results?
Hold on
k... Thanks!
Try using the Shell() VB function, passing in the path to your wav file. This will run on a seperate thread.
try this now : add timer1 to your form !
VB Code:
Will try it.. thanks!
Gonna have to check it out, because it is still bypassing showing the flash movie when I click the button. It shoudl always show the flash before jumping pages, and it isn't... why????
Is flaVerify form or flash object ?? Does the form overrides the movie ??
flaVerify is the flash movie.... not sure what you mean my overrides movie. It should be shown for 2 seconds before the database is even accessed to search.. just for show you know!
try this site which has a good splash screens . It's easy but you missed something out there . I gotta go now :D
I added StopTimer sub . see if it helps !
Quote:
Originally posted by Pirate
try this now : add timer1 to your form !
VB Code: