AndreRet

And here I am thinking nothing goes on beyond the blue and white stuffy stuff above us..... Man, I have some catching up to do!!!!:-/

Try this link.... [url]http://www.daniweb.com/forums/thread223993.html[/url] and download the zip file.

Just to say hi to all the .NET helpers out there. I have made the dreaded (but forced) change from vb6 to .NET. I will rely a lot on your expertise in this forum, and thanks to those that will be prepared to sort all my questions. I have been …

There is a much easier way of doing this - [CODE]Private Sub Command1_GotFocus() Command1.Picture = LoadPicture("D:\Icons\Po.ico") End Sub Private Sub Command1_LostFocus() Command1.Picture = Nothing End Sub Private Sub Form_Load() Command1.Picture = LoadPicture("D:\Icons\Po.ico") End Sub[/CODE] Just use you got/lost focus subs.

Try the following links. [url]http://blogs.msdn.com/sql_protocols/archive/2005/10/22/483684.aspx[/url] [url]http://www.connectionstrings.com/sql-server-2008[/url] [url]http://blogs.msdn.com/sql_protocols/archive/2006/02/21/536201.aspx[/url] - here, you need to get the error status from your errorlog file which normally resides in c:\Program Files\MS SQL Server\MSSQL10 or 9 or whatever version\Log Files\Errorlog.txt. Go to the line where connection error failed. Will normally state something to the effect of …

Attached has shut down, e boot etc code. Hope this helps out....

He is damn good.... As with all things in life, practise it and you will become good at what you do. I'll never forget my "First App" in vb6. a Digital clock with about 5 lines of code. WOW, I was the man!!! Now I develop and make money from …

Try the following link also on Daniweb, it has close to 24 different forms with different connections and data calls. This will help any beginner getting fluent. - [URL="http://http://www.daniweb.com/forums/thread223993.html"]http://http://www.daniweb.com/forums/thread223993.html[/URL]

I had the same problem, and as vb5prgrmr said, you need to update your installable redistributable pack of all vb runtime files.

vb5prgmr is correct in saying that adForwardOnly is probably your problem. Use [CODE]rs.MoveFirst[/CODE] and then call your [CODE]rs.Find '.....[/CODE]

You have nor mentioned whether you have created a database first, which dbase you will use (Access, SQL) etc. If you have, save your login detail in database (If this going to be online, think about encrypting the data), then use the relative connection string ([URL="http://http://www.connectionstrings.com"]http://http://www.connectionstrings.com[/URL]), call up the data …

Follow the link..... [URL="http://http://www.connectionstrings.com/mysql"]http://http://www.connectionstrings.com/mysql[/URL]

You would do something like - [CODE]Text1.Text = ListView1.ListItems(2) 'Where (2) is the index in the listview. This can be changed to whichever list item you want to add.[/CODE]

Try the following link. I have posted this a while back. This gives you all possible connections and actions. [URL="http://http://www.daniweb.com/forums/post989850.html#post989850"]http://http://www.daniweb.com/forums/post989850.html#post989850[/URL]

And you have done what thus far? This is a help forum. Pay us enough money and we will do your work for you, otherwise send us what you have done thus far and we will gladly assist.

As per your previous post on package errors, now that you have done it properly and included all files as was referenced, the size of the package will increase. As vb5prgmr mentioned above, you only need the .lst, .CAB and the .exe files. You do not have to include the …

I'm not sure in excell, but the basics will be VERY similar. I am working on a customer type of "Individual". Try the following - [CODE]Dim u As Integer Dim v As Integer Dim w As Integer Dim x As Integer Dim y As Integer Dim z As Integer x …

When you use your Package and Deployment wizard, make sure all the files that you have referenced is in the distribution list. REMEMBER, you have to manually add your database as well, otherwise it will generate errors. So, to answer your question, click on references and confirm that they are …

Am I correct in my assumption of the following: You need a new application created for your wife's company with the following criteria: 1. Be able to add your existing and new clients to a database. 2. Be able to add stock to your database. 3. Be able to manage …

Your question is a bit vague. It seems that you are either calling the function when adding the control, or your function is related to that TYPE of control, hence running the function as soon as a control is added. This much I could gather. Add a bit more on …

Where are you in your development stage? What code do you have so far? Are you experiencing errors in your code? Please tell us more in order for us to help you.

Add a textbox to your form - [CODE]Text1.Text = dtpPicker1.Value 'Do your normal data connection code 'Your sqlStatement will look something like this... "SELECT * FROM YourTableName WHERE YourFieldName >= DateValue(" & "'" Text1.Text & "')",con, AdLockOptimistic 'etc ...[/CODE]

I am laso sure it should be Predator. Mine must be ALL the Die Hard and Leathal Weapon movies.

Try to close your media player and then reload the wave file - [CODE]MM1.Close[/CODE] Hope this helps.

I am not sure about the datareport, but inprinter it is the - [CODE]Printer.Orientation = 2[/CODE]

This has been answered as well in the other post. vb5prgrmr is correct - [CODE]Printer.Orientation = 2[/CODE]

We had the same question about 2 weeks ago. The solution was posted, just follow the link. I had the first try attempt which did not work so good. Try the second, it works just fine... - [URL="http://http://www.daniweb.com/forums/thread239164.html"]http://http://www.daniweb.com/forums/thread239164.html[/URL]

It is very close to that time of the year again where many (fortunate) people start planning where to go for the holidays. Do you have any plans made, going somewhere? Share your plans with us. If you do travel, plan ahead and please be carefull. We ALL would like …

As above, check your RTF boxes properties. Otherwise try and force the text to what you want by using format etc.

The following will help with the computation. If you need help on the printing side, please specify if you are to print to your printer, the form etc. - [CODE]Function Power2(ByVal exponent As Long) As Long Static res(0 To 31) As Long Dim i As Long ' Raise 2 to …

The attachment will help you a lot. If you want something similar to Visat, you are most welcome around with the code. This should put you on track for that extra bit of "look" in your app. The attachment covers FULL tranparency only.

sbs_1993, please do not "hijack" someone elses post. Start your own post in the forum, and we will try and help where we can. To answer your question on the steps needed, herewith - [QUOTE]Steps: (1) Open a New Project in VB6 and click on the icon "ActiveX DLL" This …

If you want to add the caption as you type, use it in a text box change event. - [CODE]Private Sub Text1_Change() Me.Caption = Text1.Text End Sub[/CODE]

You can use the following link to troubleshoot any connection errors. You will be surprised to know that there is tons of errors, and this covers most of them with some useful links to more. - [URL="http://http://blogs.msdn.com/sql_protocols/archive/2008/04/30/steps-to-troubleshoot-connectivity-issues.aspx"]http://http://blogs.msdn.com/sql_protocols/archive/2008/04/30/steps-to-troubleshoot-connectivity-issues.aspx[/URL] Hope this helps solving your problem. It took me 3 weeks to sort …

You can also try and the loop to a list box - [CODE]Private Sub Command1_Click()Dim i As Integer, j As Integer For i = 1 To 10000 For j = 1 To 10000 Print "SDFGH=========";j List1.AddItem j 'Or the like Next j Next i End Sub[/CODE] If this is not …

I agree. It "feels" much quiter than normal. Not so many questions get posted as normal. I miss my challenge to try and answer those questions. mmmmmmm. Maybe holidays started earlier....

Thats the problem on trying to raise the dead. lol You are missing an .ocx file (Activex). Go to Refrences and see what is missing. Hopefully it is an ocx that can be downloaded. If written by owner of app, well, if you can not retrieve this from the old …

Wow, you still have a lot to go.... First draw up a diagram showing exactly what you want to do. Then a diagram for your database, preferably as follow: DateForBooking, DateForArrival, DateForBookingOut,RoomNumber, ValuePerDay/Night and so forth... Then decide how are you going to keep track of every rooms booking. You …

Your sql statement as follows - [CODE]Dim strDate as Date strDate = dtPicker>value RS.Open "SELECT * FROM MyDatabaseName WHERE YourDateFieldName >= DateValue('" & strDate & "')" Do While RS.EOF = False Listbox1.AddItem RS("TheFieldYouWantToAddName") RS.MoveNext Loop[/CODE] This will add all the dates equal or After the date selected. If you want …

With so many "'" and txt...Text values you are certainly prone for errors. I would personally settle for the following - [CODE]ri!clientname = txtClientName.text 'Follow this with all your textboxes, it is much easier to control. ri.Update[/CODE] If you do understand what I mean by this, let me know and …

Your sub (code in that sub) is looking for an object - [CODE]ByVal sender As System.Object[/CODE] When you declare an object, you have to show it. In this event you are coding under click event, refering to an object, probably a menu? (AddToolStripMenuItem)

Happy birthday Danni. Yes I know its late but what the heck, we are getting there.... [QUOTE]Getting Older Birthday It’s birthday time again I see; Another year's gone by. We’re older than we used to be; The thought could make me cry. For getting older is not such fun, When …

Your easiest way is to do the following - [CODE]Form2.Label1.Caption = UserNameBox Me.Hide 'Or what ever your loginform is calle i.e. frmLogin.Hide[/CODE] Go to this link where vb5prgrmr gave a solution to a similar problem before [URL="http://http://www.daniweb.com/forums/thread234516.html"]http://http://www.daniweb.com/forums/thread234516.html[/URL] [QUOTE]Several ways in which to do this and here are three... 1.) (Pass) …

I was thinking along these lines. Play around a bit. Got it from another site. It worked fine in my testing. - [CODE]Public Declare Function TerminateProcess Lib "kernel32" Alias "TerminateProcess" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long 'OR Public Declare Function TerminateThread Lib "kernel32" Alias "TerminateThread" (ByVal …

As per your message, just move your 1st database's records to the end, run the excell file app I gave you and this will add the new records. - [CODE]RS. MoveLast[/CODE] This should help you out. You should not add the excell data to the second and then try to …

Try and re-post your problem as a NEW thread, you posted as a code snippet. I will then send you help.

Are you trying to add the same number or continous number into ALL 11 mask edit boxes at the SAME time? [QUOTE]So that Amount as well as account Number should come in 4 Cm each Box[/QUOTE] Not sure what you mean by this. Please elaborate more and I will see …

As per attachment, this will put you on the right track. You don't need the Windows Scripting Host or the System File Object. And it doesn't mess with the registry. Why add the dependencies or risk being flagged a Virus risk? The download contains the Shortcuts and Special Folders module …

The attached will solve your problem. Remember to reference excell in your project, otherwise it will still not work.

Try the following for the controls - [CODE]Private Sub Form_Resize() With Frame1 .Left = 0 .Top = 0 .Width = Me.ScaleWidth .Height = Me.ScaleHeight End With With Text1 .Top = Frame1.Top + 200 .Left = Frame1.Left + 100 .Width = Frame1.Width - 200 .Height = Frame1.Height - 300 End With …