Posts
 
Reputation
Joined
Last Seen
0 Reputation Points
60% Quality Score
Upvotes Received
1
Posts with Upvotes
1
Upvoting Members
1
Downvotes Received
1
Posts with Downvotes
1
Downvoting Members
1
0 Endorsements
Ranked #2K
~5K People Reached
About Me

I love programming

Interests
Programming
PC Specs
VB6 and Windows XP
Favorite Forums
Favorite Tags
Member Avatar for eppitis1

hello, i have this code [CODE] Option Explicit Dim dbFilename As String Dim nodeid As String Dim rs As New ADODB.Recordset Dim cn As ADODB.Connection Private Sub DTPicker_start_date_change() If Me.DTPicker_end_date.Value < Me.DTPicker_start_date.Value Then Me.DTPicker_end_date.Value = Me.DTPicker_start_date.Value + TimeSerial(24, 0, 0) End If refreshRs End Sub Private Sub DTPicker_end_date_change() If Me.DTPicker_end_date.Value …

Member Avatar for rovelyn
0
581
Member Avatar for juniorj

i want to display a selected record from my database to the data report in VB6. i used the foll. code, where cuno is the value of a textbox. i m passing the value of cuno through a module. SELECT * FROM Bill WHERE ID=cuno but when i run it, …

Member Avatar for vb5prgrmr
0
2K
Member Avatar for Israelsimba

i know that a select statement is the best way to go around retrieving records from a database. the problem im facing is selecting a record then assigning a certain field from that record to a variable eg x..... so in simple english, it has to be something like....select clientnumber …

Member Avatar for AndreRet
0
129
Member Avatar for Sorb3t3ro

Hi! I have a VB6 project and I used ms access as my database(Database.mdb), I packed my project including the database, I already install it on my PC, but when I use or run my newly installed VB6 project and type the username and password I got this error: Run-time …

Member Avatar for vb5prgrmr
0
2K
Member Avatar for bsewell

Hi all, I'm trying to populate a datagrid as part of a search function for my application. I've tried running my code, which gets executed with no errors but the contents ain't showing up in the datagrid. Please fix this for me :) [CODE]Private Sub Search_Click() Dim dbuser As String, …

Member Avatar for AndreRet
0
158
Member Avatar for pankaj.garg

Need help for creating an diary alphabetically...some doubts 1. Do i need to create separate recordset for each alphabet (A-Z) ? 2. How do i get the 1st letter of the name entered into a textbox ? (hav heard that "VB Controls" help...but couldnt find a control to help me..) …

Member Avatar for akhileshbc
1
119
Member Avatar for deftones
Re: time

Hey, I faced one tiny problem, but I can't figure it out. What I need is basically "label1 = format(now, "hh:mm:ss")", but I want start counting time from zero: "00:00:00".. Any help?

Member Avatar for akhileshbc
0
85
Member Avatar for akhileshbc

Hi, I am Akhilesh B Chandran. I am from Kerala(India). I love programming, graphic designing, animation, gaming, etc... I am specialized in VB6 I am 19years old. Present status: studying B.Tech (Computer Science) I am always to help anyone... :) Thank you ! - Akhilesh

0
39
Member Avatar for pytup

I've got that. that should be displayed after log on ( it can be rewrite with use IF statement) [CODE]Private Sub cmdLogon_Click() Dim age As Integer age = InputBox("please enter your age") Select Case age Case Is >= 18 MsgBox "you are" & " " & age & ", let's …

Member Avatar for akhileshbc
0
125
Member Avatar for Jaisonkv

Hi.... I am a student. When i tried to connect VB with Access, it is giving me this message "Run-time error 13, Type Mismatch" Below is the code [code=vb]Dim DBase As Database Dim RBase As Recordset Set DBase = OpenDatabase("DB Name") Set RBase = DBase.OpenRecordset("Table name") [/code] The funniest thing …

Member Avatar for akhileshbc
0
129
Member Avatar for Israelsimba

My subscription system is now running though with errors here and there.the error that concerns me a lot is a runtime error that says [QUOTE]multiple steps generated an error check value status[/QUOTE] and points to this code....[CODE]r.Fields("companyphone") = txtcphone.Text r.Fields("companywebsite") = txtcwebsite.Text[/CODE] and this code is in my save button. …

Member Avatar for akhileshbc
0
99