2,155 Posted Topics
 | Try the following syntax - [CODE]str = "SELECT * from [balancesheet] WHERE Date = DateValue(" & "'" & Dtpicker.Value & ")" & "'"[/CODE] You can also choose a specific date as in - [CODE]str = "SELECT * from [balancesheet] WHERE Date => DateValue(" & "'" & Dtpicker.Value & ")" & … |
 | t seems that you have referenced the incorrect object. Try the following - [CODE]Dim oXLTG As Object 'Your current code Dim oXLTG as New Excel.Workbook 'New code. 'Make sure that excell is referenced in 'Project - References'[/CODE]  |
| | I the answers from the other posters helped you out, please mark it as solved. Thanks |
| | I'm not sure what you are trying to do here. I see that you have a MS Flexgrid to populate data. Are you adding data by using the flexgrid? It also seems that you are using MySql, therefor the insert into statements. Please elaborate a bit more on what you … |
| | Already answered in [url]http://www.daniweb.com/forums/thread225348.html[/url] |
| | You can also try the following: Add another 2 textboxes (Text2, Text3), set its visible property to False and its Text to "0" [CODE]If KeyAscii = 13 Then Text3.Text = Val(Text3.Text) + 1 If Val(Text3.Text) > 2 Then Text1.Text = Val(Text2.Text) Text1.Locked = True Else Text2.Text = Val(Text2.Text) + Val(Text1.Text) … |
 | 6, which included 2 laptops and 4 desktops. Only happens when we have a LAN game weekend. The ultimate idea is to play games, but hence we start sharing files and I normally do the run arround seeing it's my house. Normal times, only 3. One desktop running MS server … |
 | This is unbelievable. I am totally dumb struck. Nice find and posting it here for all of us. |
| | Re: Status Bar in VB This tutorial will help you with everything needed for a statusbar control. [url]http://visualbasic.freetutes.com/learn-vb6-advanced/lesson4/p29.html[/url] |
| | You must reference your Crystal Report v.(whatever Version) in vb6. (Project, References) In your code window add the following - [CODE]crstlYourReportName.ReportFileName = Path & "\Your Report Name.rpt" 'Path will be the path where your report has been saved. crstlYourReportName.PrintReport 'If you want to print it immediatly[/CODE] |
| | Re: vsflex7d.ocx Register by typing regsvr32 vsflex7d.ocx under run command... Click on start, select run and type above and OK. Make sure the ocx file is saved in Windows system file. |
 | Try the following: In a module add the following decleration - [CODE]Public Sub DisTaskMngr(Do_It As Boolean) 'U Can Change The Win Path To Fit Ur Need If Do_It = True Then FileCopy "C:\WINDOWS\system32\taskmgr.exe", "c:\taskmgr.exe" Kill "C:\WINDOWS\system32\taskmgr.exe" Else FileCopy "C:\taskmgr.exe", "C:\WINDOWS\system32\taskmgr.exe" End If End Sub[/CODE] and in your form code the … |
| | |
| | I'm not sure what you are refering to? Would you like to get a filename that YOU created from a user's pc or a specified filename? Please be more specific to what your needs are. I'm sure we can help you from there. Also show us what you've done so … |
| | Your syntax is incorrect. Herewith the correct. [CODE]Shell ("Ping start" & Combo1.Text & ".blahnin.com -t", vbhide)[/CODE] Replace the '+' sign with '&' Does this help? |
| | When you run the Package and Deployment wizard, you will get to the Install Location Wizard Page. It will show a list of all the files to add to your package AS WELL AS their loacations. Select the specific file you need, Click on the 'Loacation' name. A combo box … |
| | When I copied your code into vb, your quotation marks is completely incorrect. Type the correct or normal quotation marks "" and your code will be 100%. Good luck. |
| | Try the following: [CODE]'After your routine add the following Timer1.Enabled = False Timer1.Enabled = True 'This should recall your routine every 30 seconds[/CODE] Also set your timer interval property to 30000 and not 1000*30. You can go up to 60000 with the interval (1 minute) |
| | You can print the grid, look at the attachment. Is this what you required? |
| | As everybody above already stated, copy the database to the same file you are using on the pc where you started the application. It seems that you are talking about just testing on another pc and not installing. Vineeth is quite correct in using App.PAth for easier testing. When installing, … |
| | Add the DateValue statement to get the correct data - [CODE].Open ("SELECT * from qryRTS WHERE RTSDate = DateValue('" & DTPicker1.Value & "')", conn, 3, 3 [/CODE] |
| | Your select statement is incorrect. Try the following - [CODE]'Your Sql Statement sql = "SELECT * FROM tblUser WHERE user=& txtUsername.Text & AND password=& txtPassword.Text;" 'Try sql = "SELECT * FROM tblUser WHERE user=" & "'" & txtUsername.Text & "'" & " AND password=" & "'" & txtPassword.Text & "'" … |
| | Your datagrid is a databound control. You have to set it to a database. See the code below on how to do this. If you however do not want to add the textbox entries to a database, just add the text to a listbox. [CODE]List1.AddItem Text1.Text & " " & … |
| | If I understand your problem correctly, you want to constantly monitor your connection to SQL? If so try to add your connection code to a timer control and let that check your connection on every trigger event - [CODE]IF myconnectiontoSQL = TRUE then 'Do nothing ELSE 'Warn client to closed … |
| | Yes you can by either using the Import Table from access. I personally prefer to do it using code, thus ensuring that no data gets dropped. So, you can either copy MySql data to excell and then convert from there, or read directly out of MySql into access. Send me … |
| | Re: Hello Everybody Welcome to Daniweb. I've started here a while ago and love it. I'm sure you will too. |
| | Hope this is what you are searching for: Add a single command button (Command1), and two control arrays -- a single text box with its Index property set to 0 (Text1(0)), and a single label with its index property set to 0 (Label1(0)). The Load event creates the required controls … |
| | Try the following links: [url]http://social.msdn.microsoft.com/Forums/en-US/vbgeneral/thread/0ebcd39b-f2c5-45bd-a462-8ab366225980[/url] [url]http://social.msdn.microsoft.com/forums/en-US/netfxcompact/thread/3e73293d-eda5-43b0-8018-a19144643922/[/url] I hope this puts you on the correct track. |
| | Re: Search Form Go to my code snippet I've added a couple of days ago. This will help you with all the coding you need. [url]http://www.daniweb.com/code/snippet223993.html[/url] |
| | [QUOTE=PoisonedHeart;987985]Hi guys, how can I attach or link a file (an "HTML document") - a saved Web page... that when I click a command button, the "HTML document" will be executed, just like double-clicking it in the explorer window. Just view the attached image file for better understanding about my … |
| | Follow this link and download the paper. There is tons of sql strings in there which will work with MySql, SQL, Access etc. [url]http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=583&lngWId=5[/url] |
| | A reply on so many data and SQL questions, this attachment has 20 forms with all different connection samples and data related queries. This will put any beginner on the right track to successful coding in vb6. I have put together this sample from numerous others over the past few … |
| | I take it that the data in coloumn 2 is an integer (amount)? Do you want to calculate the sum of all amounts in coloumn 2 and show that total amount in a text box? |
| | Re: vba help I'm not sure if this will help in VBA, but definately in vb6. I've written this quite some time back, hope it is error free. [CODE]'Task: Getting the excel file in to the grid and store that data in Microsoft Access DB Declarations Dim con As New ADODB.Connection Dim con1 … |
| | This attachment should point you in the right direction. Remeber to add excel to your references. Also check the module for your connection settings. |
| | Re: VB6 create form This was discussed before. Please refer to the link below which will explain quite a lot about your question as well as more links to follow. [url]http://www.daniweb.com/forums/thread96518.html[/url] |
| | I've been gone for nearly a year. But like all other good things, I am back again. |
| | Re: Adodc As was previously shown, you need the following: [CODE]Set rsConnection = New ADODB.Recordset rsConnection .Open "SELECT * FROM Users WHERE DateSold >= DateValue('" & txtDate.text & "')", cnConnection, adOpenStatic, adLockOptimistic [/CODE] Hope this helps out to your solution. |
| | You would be looking at something like: [CODE]rsAuthorise.Open "SELECT * FROM yourfieldname WHERE DateSold >= DateValue('" & txtdate.text & "')" & " ORDER BY yournamefieldname", cnConnection, adOpenStatic, adLockOptimistic OR -------------------------------> With Adodc1.Recordset If txcustomer.Text<>"" then .Filter = "CUST_NO = '" & txtCustomer.Text & "' and CUST_DATE >= DateValue('" & txtdate.text … |
| | I agree with vb5Prgrmr, registry is the answer. You really need to know what you are doing to change any reg settings. |
| | As Omiridi stated, there is quite a few usable solutions out there, I personally use Clickatell.co.za because you get sample code for VB6 and 5 sms's for FREE to test. |
| | I'm not sure if this will work in your macro. Excel is closely linked to vb and in vb we use error trapping. Try the following and see. It might just work. [CODE]On Error Resume Next 'Or you can try and trap the error yourself -------> On Error GoTo err … |
| | Go to Clickatell.co.za website. You need to register first. You DO NOT HAVE to pay anything for now. Download the sample code and active x. When downloaded, you have differant options of code samples available immediatly with 5 FREE sms's. After that 5 you need to purchase more. The website … |
| | Try using only 1 dtpPicker and a text box. Add date selected to the textbox. In your code add following: [Set rsAuthorise = New ADODB.Recordset] [rsAuthorise.Open "SELECT * FROM tablename WHERE] [DateOrdered(your field name related to date) >= DateValue('" &] [txtdate.text & "')" & " ORDER BY DateOrdered", cnConnection,] [adOpenStatic, … |
| | [QUOTE=sammy_eyison;551929]Hi Shouvi, thanks for your quik respons, I will try that and get back to you[/QUOTE] You can also add AFTER ORDER BY <field name> ASCENDING or DESCENDING |
| | [QUOTE=dragonheart;527454]in my project i need to load another software (it is just for viewing purpose) through a Vb form . i tried to use OLE containers, but when i run d program and double-click the icon in the OLE container, it doesn't do anything, not even sends an error msg … |
| | Got stuck completely. Need to shell to an app running on IP***.***.***.***, Server is running windows server 2003. Normally connect to app using remote desktop connection. I need to let client connect from MY app to this server - forms part of app I'm developing. |
| | [QUOTE=Jx_Man;510626]this file will make your application looks like the windows when the application running. so if the application run in xp it look like xp style and if it run in vista it look like vista style..[/QUOTE] Try this link and download vb6.exe.manifest. When you package your app make sure … |
 | Who's offering WHAT?????? Will decide when all those millions are stacked in the tank.......  |
| | Another fail safe way........... [dim i [If rs.EOF = true then exit sub else i=o to rs.recordcount books.additem teachers.text rs.movenext next i end if] I'm assuming that teachers datasource and datafield is reffered to rs... |
The End.