10,992 Topics

Member Avatar for
Member Avatar for PinoyDev

Good day! Is there a way to make the data report to show only the fields selected by the user? I have a form where the user can select the fields(from ms access table) in the list box(checkbox enabled) to show in data report. The total fields is almost 50. …

Member Avatar for Santanu.Das
0
151
Member Avatar for Gebby

Now retiring and would like to resume hobby of writing programmes. Is VB6 Enterprise the one to buy or has it been superceeded?

Member Avatar for Gebby
0
214
Member Avatar for Xiao_1

in the reisgter how i put it togeter time and date of the code when i keyin the admin No and admin card then it record the the access datatbase. Private Sub btnRegister_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRegister.Click If String.IsNullOrWhiteSpace(txtcard.Text) Or String.IsNullOrWhiteSpace(txtadmno.Text) Then MessageBox.Show("Please complete the …

Member Avatar for LesF
0
184
Member Avatar for PinoyDev

Good day! I am now currently ugrading our database to mySQL. My problem is that, how to convert the any msaccess SHAPE command to a mySQL database syntax using 6 and get the same result? Below is the sample code: spath = App.Path & "\employeeaccnt.mdb" cn.Open "Provider=MSDATASHAPE; Data Provider=Microsoft.JET.OLEDB.4.0;Data Source=" …

0
93
Member Avatar for BORIS_4

t = txtSearchMo.Text z = Combo1.Text Adodc1.Recordset.Filter = "br_name like '" + t + "'" Or "mo like '" + z + "'" why this code have mismatch error appear?? help me pls

Member Avatar for BORIS_4
0
50
Member Avatar for Xiao_1

how i put it like i am a student so i choose student and key in username n password, if choose worng like i click lectuere but i not, so cant is worng cant login Private Sub cbinfo_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbinfo.SelectedIndexChanged Dim conn As …

Member Avatar for Xiao_1
0
100
Member Avatar for razstec

Hi everyone, I haven't touch in vb6 in 12 years so im very rusty... :s But now i need a little exe that allow to open and view office and pdf files, i dont need it to save or allow changes. Since its going to work with a batch file …

Member Avatar for Reverend Jim
0
124
Member Avatar for bonzo2008

I have commondialog that i can search for *.bmp,*.jpg files thats okej, now the problem is. saving the picture to the rot + filename next time I start the program I will change the picture to another file that shall be saved in rot + filename the first picture shall …

Member Avatar for BitBlt
0
194
Member Avatar for Xiao_1

when i login it will come 2 form one is info and other one is register form when i login that time my info come out come a samll form say error complet the box it should not come out this..!! where go worng

Member Avatar for Xiao_1
0
121
Member Avatar for Jeremybcent

I get the error "Syntax Error (missing operator) in query expression" sql = "SELECT Chores.ChoresID, Chores.ChoresDate, Materials.MaterialName, Advisers.AdviserInit, Advisers.AdviserSurname," _ & "Area.Area, Chores.StudentNo, Student.Forename" _ & "FROM Chores" _ & "INNER JOIN Materials on Chores.MaterialID = Materials.MaterialID" _ & "INNER JOIN Advisers on Chores.AdviserID = Advisers.AdviserID" _ & "INNER JOIN …

Member Avatar for Jeremybcent
0
199
Member Avatar for Xiao_1

at the projct No i have choses it should the the project name on the textbox but did not come out Private Sub cbbproject_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbbproject.SelectedIndexChanged Dim conn As New System.Data.OleDb.OleDbConnection() conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\temp\Database1.accdb" If conn.State = ConnectionState.Open Then conn.Close() conn.Open() Dim …

Member Avatar for Santanu.Das
0
99
Member Avatar for Lacrecen

Good day!~ May i know the difference between creating database using Visual Data Manager and using MS Access. which is better?

Member Avatar for Lacrecen
0
257
Member Avatar for bonzo2008

Hi the line with image4.picture don't work the rest of the code is printing out as it shall do. The image4.picture is in hidden position and the path is Okej.( can see it when the image4 is vissible=true) How or where is the problem ?? Help is use full with …

Member Avatar for bonzo2008
0
1K
Member Avatar for Shafra

I want a visual basic 6.0 project vb as front end and ms access as back end with atleast 2 users admin & operator. can any body help me to do my project please?

Member Avatar for deceptikon
0
43
Member Avatar for Xiao_1

Why done work is it some thing worng i only wan edit one or delete one of it? Private Sub btnedit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnedit.Click If String.IsNullOrWhiteSpace(txtadmin.Text) Or String.IsNullOrWhiteSpace(txtname.Text) Or String.IsNullOrWhiteSpace(txtcourse.Text) Or String.IsNullOrWhiteSpace(txtic.Text) Or String.IsNullOrWhiteSpace(txtgender.Text) Or String.IsNullOrWhiteSpace(txtaddress.Text) Or String.IsNullOrWhiteSpace(DateTimePicker1.Value) Or String.IsNullOrWhiteSpace(txttel.Text) Or String.IsNullOrWhiteSpace(txtemail.Text) Or String.IsNullOrWhiteSpace(txttype.Text) …

Member Avatar for Santanu.Das
0
172
Member Avatar for Lacrecen

can someone enlighten me what 's the difference between having a codeless database conenction and using manual code to connect to database. which is better? for me, i think it is easier to do database using connection using object properties like datasource, datamember. i find it difficult using manual coding …

Member Avatar for Lacrecen
0
86
Member Avatar for metchoy tumanda
Member Avatar for Lacrecen

Hello!~ i'm currently doing a database about examination system.. i already have a database for login,registration, and questionaires. my problem is on my question database.. i managed to connect the questions and choices in visual basic (or so i thought) questions are on multiple choices.. my question is : how …

Member Avatar for Lacrecen
0
159
Member Avatar for Xiao_1

is this coorrct if write like this: Public Class Lecturer_Form Private Sub Lecturer_Form_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim conn As New System.Data.OleDb.OleDbConnection() conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\temp\Database1.accdb" If conn.State = ConnectionState.Open Then conn.Close() conn.Open() Dim sql As String = "Select A.StaffNo,A.TimeIn,A.TimeOut, B.ProjectNo, C.AdminNo, C.UserName From tbl_lecturer …

Member Avatar for Xiao_1
0
180
Member Avatar for Pintu82

I have create a project, There are so many reports. I want change report orientation as Landscape and paper size is width =8.27" and Height=4".But I can't do this. Please Help Me.

Member Avatar for David_50
0
50
Member Avatar for Xiao_1

in stuednt admin i wan it to insert and also select from tbl_stuendadmin how to put it togeter If String.IsNullOrWhiteSpace(txtcard.Text) Or String.IsNullOrWhiteSpace(txtadmno.Text) Then MessageBox.Show("Please complete the on the box.", "Authentication Error", MessageBoxButtons.OK, MessageBoxIcon.Error) Exit Sub End If Dim Conn As System.Data.OleDb.OleDbConnection Dim ConnectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\temp\Database1.accdb" Conn = …

Member Avatar for Santanu.Das
0
147
Member Avatar for Sal_1
Member Avatar for happygeek

Think that macro viruses written in VBA (Visual Basic for Applications) are just something that people using the Internet a couple of decades ago had to worry about? Think again. Word macro attacks never went away, they just went into decline. New evidence suggests they could be making something of …

Member Avatar for happygeek
1
1K
Member Avatar for pikai

Dim con5 As New ADODB.Connection Dim rs5 As New ADODB.Recordset Private Sub Command1_Click() con5.Provider = "Microsoft.JET.OLEDB.4.0;" con5.Open App.Path + "\da.mdb" rs5.Open "[DEMO]", con5, adOpenStatic, adLockOptimistic 'The above code can't work when the database is protected. 'Please Tell, How can I solve it

Member Avatar for Santanu.Das
0
251
Member Avatar for Silvainius

Hello again. I am back with the problem of using booleans with command buttons. Any reasearch I've done for other methods to complete my memory game have been for Vb2005, VB.net, VB2010, etc. Where as I'm stuck with VB5 not Knowing what to do. `PLEASE NOTE: boolFirst is declared and …

Member Avatar for Reverend Jim
0
159
Member Avatar for Xiao_1

i trying to put this in the combobox why did not come out Private Sub Lecturer_Form_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim conn As New System.Data.OleDb.OleDbConnection() conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\temp\Database1.accdb" If conn.State = ConnectionState.Open Then conn.Close() conn.Open() Dim sql As String = "Select [StaffNo] From tbl_lecturer …

Member Avatar for Xiao_1
0
239
Member Avatar for Xiao_1

Private Sub cbbproject_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbbproject.SelectedIndexChanged Dim conn As New System.Data.OleDb.OleDbConnection() conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\temp\Database1.accdb" If conn.State = ConnectionState.Open Then conn.Close() conn.Open() Dim sql As String = "Select * From tbl_assignment Where ProjectNo ='" & cbbproject.Items(cbbproject.SelectedIndex) & "'" Dim sqlCom As New System.Data.OleDb.OleDbCommand(sql, conn) …

Member Avatar for Santanu.Das
0
120
Member Avatar for Xiao_1

I have two listbox and two button, one button is assign another is unassign in listbox1 have adminNo I wan the listbox1 of adminno go to listbox2 one by one when pressing button assign and i also can unassign go back to listbox1 one by one also is it: *listbox1.item.forword(sqlRead("AdminNo").ToString)*

Member Avatar for Santanu.Das
0
112
Member Avatar for shivam.prabhat
Member Avatar for Santanu.Das
0
93
Member Avatar for Silvainius

I am trying to make a memory game using labels and command buttons, and I have run across an issue in which when I try to set up a timer with a loop within a Sub function. My current code for this: Private Sub Form_Load() tmrStart.Interval = "1" End Sub …

Member Avatar for Silvainius
0
171
Member Avatar for jared.geli

I can post a single line of row I selected from datagridview but I want to select specific multiple rows then display it in my crystal report. BTW I'm using VB2010. Dim cmd As New OleDbCommand("Select * From Data1 Where ID = " & Form4.DataGridView1.SelectedRows(0).Cells(0).Value.ToString() & "", Form4.con) Dim adpt …

Member Avatar for waterm
0
2K
Member Avatar for don75cua

Hi, Im teaching myself VB, specifically, how to create forms(im using VS Express 2013). I wanted to use the values from an xls file( already exported it as LMS.csv, a table with 4 rows X 3 columns) as constants for my form. I've tried the codes below but its not …

Member Avatar for don75cua
0
128
Member Avatar for andrew80

Hi, i have 25 questions with images in quiz. i want to make the quiz in Visual Basic. Any idea on how to start making this project? The quiz will have time limit to answer the questions and score in the end. any help is welcome thanks a lot

Member Avatar for llgms
0
86
Member Avatar for Xiao_1
Member Avatar for _Kimberly

* Instruction: Bonus Develop a calculator application that will allow the user to enter the desired calculation (A for Addition, S for Subtraction) and enter two numbers. When “Calculate” button is clicked, if the user entered two numbers, the application will display the appropriate result. Otherwise, a message box will …

Member Avatar for JerryFJustic
0
213
Member Avatar for Prodip Joydhar
Member Avatar for Prodip Joydhar

I have create a project that control an student database. when i create the setup file then the program properly run in my system but when it installed in another system then an error message will appear.The message is "File not found". I want to create a set up file …

Member Avatar for Santanu.Das
0
36
Member Avatar for Prodip Joydhar

Dim db As New Connection 'Dim tbpro As New ADODB.Recordset 'Dim db As Database Dim tbpro As Recordset Private Sub Command1_Click() rsMyRecordset.Open (App.Path & "\" & "super.mdb") rsmyreco End Sub Private Sub Form_Load() 'db.ConnectionString = (App.Path & "\" & "super.mdb") 'tbpro.ActiveConnection "table1", db, adOpenDynamic, adLockOptimistic db.Open (App.Path & "super.mdb") Set …

Member Avatar for ranod
0
195
Member Avatar for Xiao_1

i cant add in the data? code of add info: Private Sub btnAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdd.Click If String.IsNullOrWhiteSpace(txtadmin.Text) Or String.IsNullOrWhiteSpace(txtname.Text) Or String.IsNullOrWhiteSpace(txtcourse.Text) Or String.IsNullOrWhiteSpace(txtic.Text) Or String.IsNullOrWhiteSpace(txtgender.Text) Or String.IsNullOrWhiteSpace(txtaddress.Text) Or String.IsNullOrWhiteSpace(txttel.Text) Or String.IsNullOrWhiteSpace(txtemail.Text) Or String.IsNullOrWhiteSpace(txttpye.Text) Then MessageBox.Show("Please complete the on the box.", "Authentication Error", MessageBoxButtons.OK, …

Member Avatar for Santanu.Das
0
367
Member Avatar for Papa_Don

Group, I'm trying to improve a macro in an EXCEL spreadsheet. The spreadsheet has multiple tabs (sheets), some of which have grouped rows in them. My "cleanup" routine needs to check to see if these grouped rows exist. Is there some code that does this (hopefully boolean)? If it helps, …

Member Avatar for ddanbe
0
758
Member Avatar for Papa_Don

Group, I've created a large spreadsheet with a fair amount of code behide it. Historically it has run well and with no issues. However it has started giving me a "Run-time error '9': Subscript out of range" error. I have no idea what is causing it. It is stoping at …

Member Avatar for Papa_Don
0
2K
Member Avatar for Xiao_1

hi do you all have any info of student attendance checking system using VB with Microsoft access woth the simple, guide, referenc or simple code on this

Member Avatar for Xiao_1
0
92
Member Avatar for Xiao_1
Member Avatar for Xiao_1
0
280
Member Avatar for PinoyDev

Good day! I just want to know on how to correctly use SendMessage API. When the save as dialog box popsup, Save button will be automatically click. Let say I have hwnd and classname value. Please see below Public Declare Function SendMessage Lib "user32" Alias "SendMessageW" (ByVal hwnd As Long, …

Member Avatar for SalmiSoft
0
857
Member Avatar for rajit_1

Hi, Below codes work fine without db with password, but if i have an password on db it wont work,, what do i need to do cr2.WindowState = crptNormal cr2.ReportFileName = App.Path & "\Reports\customerid.rpt" cr2.DataFiles(0) = d:/rajit.mdb cr2.Action = 1

Member Avatar for adil.hussein.77
0
68
Member Avatar for shivam.prabhat

I want to know that how can I use date picker and show that particular records in datagrid. I am using vb6.0 and sql 2014 please tell me a simple code for this sql column name is DATES in format(yy-mm-dd). Thanks it will be a greate help....

0
92
Member Avatar for rajit_1

Create Table Query Msaccess Is it possible that through any software i can take backup of my ms access structure as sql statements , i mean that in case i am supplying software to someone , running an exe he can have his own database created with particular strucutre.. I …

Member Avatar for joyaguilar
0
158
Member Avatar for Xiao_1

this is my code i dose not work: ( help me i am create for new user from VB with access) Public Class newuserForm Private Sub btncreate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btncreate.Click If txtword.Text = "" Or txtid.Text = "" Then MessageBox.Show("Please complete the required fields..", …

Member Avatar for Xiao_1
0
339
Member Avatar for GIFT_2
Member Avatar for hericles
0
23
Member Avatar for Killakia

Hello all I'm learning VB and I've hit a road block. I've tried looking in books and searching the web but I can't seem to find an answer at all. I've been trying to get the streamreader to read my text file and display it in a list box. Hever …

Member Avatar for Santanu.Das
0
250

The End.