2,155 Posted Topics
 | |
| | |
| | |
| | Re: CountDown Timer Use something as below. Modify it to suit what you need. Just add the controls as required - [CODE]Dim Hours As Integer Dim Minutes As Integer Dim Seconds As Integer Dim Time As Date Private Sub Mydisplay() 'This code is common to all three text boxes so I 'put it …  |
| | Vista is a very nasty control freak. It wants to handle every request it gets the way it thinks is right for the user. Hence the bad reps behind Vista. When running your application, make sure that it is runned as the administrator. That should stop the errors from creeping … |
| | Make use of hyperlinks as is used in Office Word or Excel. [CODE]Option Explicit Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long 'Under a … |
| | To save a bmp file is quite easy - [CODE]SavePicture Picture1.Image, "C:Test.bmp" 'If Picture1.Image returns an error, use Picture1.Picture[/CODE] For a jpeg (which is not featured in vb6) - This code will save a picture box picture as jpg. I didn't write the code. Steve McMahon at the http//vbaccelerator.com did. … |
| | I think you need to give us some more information. The way your question reads at the moment is something like - [CODE]Text1.Text = ",,"[/CODE] I'm sure this is not what you meant.:) |
| | |
| | |
| | Welcome to Daniweb Farooq.:) I'm from South Africa, and our teams will meet each other soon....;) |
| | |
| | |
| | Welcome to Daniweb.:) @S.O.S., thanks for removing the link...;) |
| | |
 | |
| | |
| | Abe, your statement is incorrect. The returned data is a string so you have to enclose it in hyphens - [CODE].Open "Select * from TABLENAME where NAME = '" & txtSEARCH.Text & "'", con, adOpenKeyset, adLockPessimistic[/CODE]:) |
| | Welcome to Daniweb Annie.:) Have a look at our Software Development/C++ forum [URL="http://www.daniweb.com/forums/forum8.html"]HERE[/URL]. If you see a question you know the answer to, fly away and answer.;) |
| | This seems like an expectation for help in writing your entire application for you, which we DO NOT do here on Daniweb. Show us what you have in code and we will add or help solving errors etc. We will however not do your project for you.:) |
 | Re: Help pls... Firstly we do not normally respond to titles with "Help", "Urgent" etc contained in it. Please read our posting rules.Being new, no harm no foul. You do however need to show us what you have so far, again our rules, we do not do full projects here. Show your code … |
| | Re: how to rotate Unfortunately not. The following is only a start... Have a look at [URL="http://support.microsoft.com/kb/80406"]THIS[/URL] link or [URL="http://support.microsoft.com/kb/186260"]THIS[/URL] link. They contain code samples. If you do not have the basic knowledge of rendering, this might be a bit heavy though.:) |
 | [QUOTE]Private Sub txtsearch_Click() with data3.Recordset a = txtidno.Text .FindFirst "[id]'" & a & "" ' If .NoMatch Then MsgBox "Record Not Found", vbInformation, "Search" Else txtborrowname.Text = .Fields("borrower's name") txtcourse.Text = .Fields("course") txtyear.Text = .Fields("year") End If End With End Sub[/QUOTE] [CODE]'First declare the a as a string With Data1.Recordset … |
| | And Teamviewer needs passwords for both office and home pc's, making it a more secure connection.:) |
| | Click on start, control panel. Click on network and internet connections Click on Network connections Right click on the network connection that was used at your office Click on "disable" This should disable the connection permanently, stopping synchronization. |
 | |
| | Try the following - [CODE]If rgQty.Value = 0 And rgInvDate.Value = 0 Then Rows(i).Delete 'OR If rgQty.Value = 0 And rgInvDate.Value = vbNullString Then Rows(i).Delete 'I do however think that the last is incorrect because it seems that you are using a grid, which can't have an empty string. It … |
| | |
 | |
| | |
| | |
| | |
| | |
| | |
| | |
 | @Abe, one question. Why do you want to make multiple backups for your database? The code you are currently using checks the database size and compare to the new size. If there is a difference, it will overwrite the old one. |
| | Set your combobox "locked" property to true. That means that when ever a user tries to add more text, it is locked. It will only accept the list text as correct. |
| | Yes, you can play all your games of your external drive. Most of your new games (proper games) is between 2 and 6 GB in size, so you can store almost up to 400 games on your drive!;)  |
| | Re: VB EMAIL What do you have so far? What exactly do you need? Be more specific so we can help you get a solution.:) |
| | ahhhh, vb6, vba? We can not read text language (sms). Please write out the full four and one sheets, we might be able to understand then what you mean.:) So you want to take the data from the other four sheets and put it all into one sheet on you … |
| | Re: vb6 @BhuviRajen, please mark this thread as solved if you have managed to get a solution, found at the bottom of this page, thanks.:) It has been open for some time now. |
| | @a1a4a, please mark this thread as solved if you have managed to get a solution, found at the bottom of this page, thanks.:) It has been open for some time now. |
| | [QUOTE]Do Until rs.EOF Set list = ListView1.ListItems.Add(, ,!RecordNumber) lista.ListItems.SubItems(1) = !Firstname lista.ListItems.SubItems(2) = !Lastname lista.ListItems.SubItems(3) = !Birthdate rs.MoveNext Loop[/QUOTE] Is incorrect. You have no reference to the field name - [CODE]Do while not rs.EOF = true Set list = ListView1.ListItems.Add(, ,rs!RecordNumber) lista.ListItems.SubItems(1) = rs!Firstname lista.ListItems.SubItems(2) = rs!Lastname lista.ListItems.SubItems(3) = rs!Birthdate … |
| | Change your sql statement to the following - [CODE]Dim strDate As Date strDate = dtPicker1.Value rs.open "SELECT * FROM tblrecord WHERE Birthday = DateValue('" & strDate & "')", cn, adOpenDynamic, adLockOptimistic[/CODE] |
| | Yes it is possible IF you have a primary and foreign key set in your tables. You will be using the INNER JOIN sql statement then to get the data from two tables. Search google for more on INNER JOIN syntax and uses.:) |
| | You will have to read our posting rules [URL="http://www.daniweb.com/forums/faq.php?faq=daniweb_policies"]HERE[/URL].:) We need more information AND what code do you have so far? What language, vb6, access, VBA etc.? What daily records? For connection to access, have a look at [URL="www.connectionstrings.com"]THIS[/URL] site. |
| | Re: HELP We do not answer posts starting with "Help, Urgent, Need" etc. You should know this after 10 posts....;) To your question, to get the values calculated, write a loop going through each record - [CODE]'All your open recordset code here FIRST Dim xCount As Integer, xVal As Integer xCount = … |
| | You will be using something like - [CODE]Dim o As Object Set o = Sheet3.Pictures.Insert("Z:\mypic.gif") o.Top = Sheet3.Cells(5,1).Top o.Left = Sheet3.Cells(5,1).Left[/CODE] |
| | Jemz, you from all people should know that we can not help you with what you gave us. Give us more information please.:) |
| | It seems we have all missed this thread by you. Our apologies.:) Have you managed to get a solution in the mean while, with this post being 24 days old? |
The End.