VB.NET Programming Corner!

[zyalista]

Sir need ko po ng help sa ginagawa ko. newbie lang po ako and wala pa po masyadong background sa programming. ask ko lang po kung paano po mapapalabas yung previous reading para po sa billing. naggttry po kasi akong gumawa ng water billing system. vb 2010 po gamit ko tapos acces 2016 para po sa database. sana po may makatulong. Thanks in advance.

 

[dreamreaper008]

Sir patulong naman. gusto ko sanang ma view ang report ko. kaso hindi mabuksan ang form. ganito ang lalabas.

View attachment 1261516

hindi gagana sa mga client pc. mag eerror sya.

thanks

post mo yung code na may error...

Edit: check mo din kung parehas ng version yung crystal report na nasa dev at yung nakadeploy sa user.

 

[unknown23]

Help po mga master sa programmer. paano po maging online ang system na ginawa ko, kailangan ba e-upload pa ang database sa online.? / i'm using vb.net 2010 mysql database.
may free website sana akung nakita kaya lang may malaking problema, free na sana pero hindi pwede sa production/business
https://db4free.net/signup.php ito po yung link. baka may ibang link pa, kahit may monthly pay po ok lang .tnx

Ok na. Alam ko na Kung paano po maging online ang windows app.

 

[blueknight11]

Pa subscribe po. salamat.

 

[spleken001]

sa mga may kailangan ng tulong jan
PM nyo lang ako
Vb.net + mysql database
fb.com/cqwe1

 

[cleri666]

..salamat po..

 

[swit4n93l]

boss patulong. gumawa ako ng login form with ms access database.ang problem ko ay pag wla akong input sa usernme at password tpos press ko login button papasok pa rin cya.supposed to be dpt pg wlang input ung txtbox1 at txtbox2 dpt d CYA papasok.code is below hope you can help me.

Imports System.Data
Imports System.Data.OleDb

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim uname As String = ""
Dim pword As String = ""
Dim username As String = ""
Dim pass As String
If TextBox1.Text = "" Or TextBox1.Text = "" Then
MsgBox("please fill all the info")
Else

End If
uname = TextBox1.Text
pword = TextBox2.Text
Dim query As String = "select password from table1 where username='" & uname & "';"
Dim dbsource As String = "provider=microsoft.ace.oledb.12.0;data source=C:\Users\ASUS\Desktop\REPORTS\test.accdb"
Dim conn = New OleDbConnection(dbsource)
Dim cmd As New OleDbCommand(query, conn)
conn.Open()
Try
pass = cmd.ExecuteScalar().ToString
Catch ex As Exception
MsgBox("username does not exist")
End Try
If (pword = pass) Then
MsgBox("login successful")
Form3.Show()
If Form3.Visible Then
Me.Hide()
End If
Else

End If

TextBox1.Clear()
TextBox2.Clear()



End Sub




Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Form2.Show()
Me.Hide()
End Sub


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub
End Class

 

[aryaStark12345]

I made this thread for all programmers starting their adventure in VB.NET.

Please post relevant and sensible questions regarding VB.NET,
share your knowledge and expertise, share codes and techniques.

Post question on HOW TOs:
How to do this or that, ill supply bits of code to accomplish basic tasks.

Ill be posting series of samples leading to complete applications,
your suggestions are encouraged.
These samples will contain codes relevant to other tasks as well.

Platform = VS2003 to VS2012

i suggest learn and get the feel of VB.NET/VISUAL STUDIO IDE first before posting questions,
so that we can talk on the same page.


Topics:
VB.NET Winforms (not Web Applications)
ADO.NET as applied in VB.NET
Crystal Reports on VB.NET
SQLServer as used in VB.NET
MSAccess as used in VB.NET
Classes
UserControls

Technologies:
Serial - like using SMS, Barcode and other hardware
TCP/IP - chat applications, sockets, internet applications
MSMQ - message queuing
Remoting - executing assemblies in other computer
WebServices - using webservices in windows forms
Multithreading - executing more than 1 process at the same time


Suggested Third Party Tools:
DevXPress 2009 Free Edition
SQLServer 2005 Express Edition

Suggested references:
http://www.homeandlearn.co.uk/net/vbnet.html
http://www.java2s.com/Tutorial/VB/CatalogVB.htm

I currently use Visual Studio 2008 only, but basic codes will apply to all versions

Please do not ask for a complete system,
instead use the codes and assistance that you will find here
to build your own system.


***Thanks to moderators, STICKY na ang thread!

Lets share knowledge so that we can be a more flexible and well rounded programmer. Be it for school or work.

Links:

First Post: Populating DataGridView using MSAccess Database
Second Post : Basic VB.NET MSAccess Tutorial
SQLServer Sample

thanks for sharing

 

[ranzz]

from this <=========

        if textbox1.text = "" or textbox1.text = "" then
            msgbox("please fill all the info")
        else
            wala ka kc condition dito...
        End if    

        uname = textbox1.text
        pword = textbox2.text
        dim query as string = "select password from table1 where username='" & uname & "';"
        dim dbsource as string = "provider=microsoft.ace.oledb.12.0;data source=c:\users\asus\desktop\reports\test.accdb"
        dim conn = new oledbconnection(dbsource)
        dim cmd as new oledbcommand(query, conn)
        conn.open()
        try
            pass = cmd.executescalar().tostring
        catch ex as exception
            msgbox("username does not exist")
        end try
        if (pword = pass) then
            msgbox("login successful")
            form3.show()
            if form3.visible then
                me.hide()
            end if
        else

        end if

        textbox1.clear()
        textbox2.clear()

to this <==================

        if textbox1.text = "" or textbox1.text = "" then
            msgbox("please fill all the info")
        else
            uname = textbox1.text
        pword = textbox2.text
        dim query as string = "select password from table1 where username='" & uname & "';"
        dim dbsource as string = "provider=microsoft.ace.oledb.12.0;data source=c:\users\asus\desktop\reports\test.accdb"
        dim conn = new oledbconnection(dbsource)
        dim cmd as new oledbcommand(query, conn)
        conn.open()
        try
            pass = cmd.executescalar().tostring
        catch ex as exception
            msgbox("username does not exist")
        end try
        if (pword = pass) then
            msgbox("login successful")
            form3.show()
            if form3.visible then
                me.hide()
            end if
        else
             msgbox("password not match!!") <------ nilagay ko lang :)
        end if

        textbox1.clear()
        textbox2.clear()
      end if

Try mo lang,

 

[acjulron]

mga masters patulong naman po, pano po yung pag generate ng clearances or permits ( barangay system ) through report (crystal report po ba or etc..? ) thanks po

 

[maskio]

mga masters patulong naman po, pano po yung pag generate ng clearances or permits ( barangay system ) through report (crystal report po ba or etc..? ) thanks po

RDLC yung gamit ko, yung built in kay vb. meron kasi akong na encounter dati kay crystal na di nya magawa, tapos wala pang work-around pero nagawa ni rdlc, i forgot kung ano yun pero dating version pa yun ng crystal report. but rdlc is fine. post ka ng codes mo kung saan ka nahihirapan, madami makakatulong sayo dito.

- - - Updated - - -

boss patulong. gumawa ako ng login form with ms access database.ang problem ko ay pag wla akong input sa usernme at password tpos press ko login button papasok pa rin cya.supposed to be dpt pg wlang input ung txtbox1 at txtbox2 dpt d CYA papasok.code is below hope you can help me.

Imports System.Data
Imports System.Data.OleDb

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim uname As String = ""
Dim pword As String = ""
Dim username As String = ""
Dim pass As String
If TextBox1.Text = "" Or TextBox1.Text = "" Then
MsgBox("please fill all the info")
Else

End If
uname = TextBox1.Text
pword = TextBox2.Text
Dim query As String = "select password from table1 where username='" & uname & "';"
Dim dbsource As String = "provider=microsoft.ace.oledb.12.0;data source=C:\Users\ASUS\Desktop\REPORTS\test.accdb"
Dim conn = New OleDbConnection(dbsource)
Dim cmd As New OleDbCommand(query, conn)
conn.Open()
Try
pass = cmd.ExecuteScalar().ToString
Catch ex As Exception
MsgBox("username does not exist")
End Try
If (pword = pass) Then
MsgBox("login successful")
Form3.Show()
If Form3.Visible Then
Me.Hide()
End If
Else

End If

TextBox1.Clear()
TextBox2.Clear()



End Sub




Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Form2.Show()
Me.Hide()
End Sub


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub
End Class

change this:

uname = TextBox1.Text
pword = TextBox2.Text
Dim query As String = "select password from table1 where username='" & uname & "';"
Dim dbsource As String = "provider=microsoft.ace.oledb.12.0;data source=C:\Users\ASUS\Desktop\REPORTS\test.accdb"
Dim conn = New OleDbConnection(dbsource)
Dim cmd As New OleDbCommand(query, conn)
conn.Open()

to:

uname = TextBox1.Text
pword = TextBox2.Text
Dim query As String = "select count(*) `count` from table1 where username = @username  and password = @password;"
Dim dbsource As String = "provider=microsoft.ace.oledb.12.0;data source=C:\Users\ASUS\Desktop\REPORTS\test.accdb"
Dim conn = New OleDbConnection(dbsource)
Dim cmd As New OleDbCommand(query, conn)

cmd.parameters.addwithvalue("@username", uname)
cmd.parameters.addwithvalue("@password", pword)

conn.Open()

then yung evaluation mo, e check mo nalang if may count yung query o wala, if meron, user pass matched, if wala, then msg the user or something.

if pass > 0 then
' valid credentials
else
' do something here
end if

 

[missseco0903]

Hello po.. possible po kayang mg client to server ako sa dinedevelop kong windows app without using sql server 2012? if possible pano po kaya and my tools po bang need gwin?

 

[r1bnc]

Hello po.. possible po kayang mg client to server ako sa dinedevelop kong windows app without using sql server 2012? if possible pano po kaya and my tools po bang need gwin?

no server pano yun? gumamit ka na lang kaya ng SQLite3 (file database ito, ginagamit din sa android apps) or MariaDB (server based, usual sa PHP/LAMP)

 

[kenmasi14]

mga master .gumawa po ako ng mysql database. pano ko po sya icoconect sa pie chart. dun po sa loob ng table ng database e my 'YEAR' nandun po ung 1st yr to 5th yr. pano po kaya mailalagay sa pie chart kung cno ang mas mdme naka register sa database

 

[psiai201]

Pahingi naman po idea about sa nightshift time in and time out po. Nagawa ko na po si time in and time out dayshift naka set sya sa date ngayon and 1 button lang po siya. Tinry ko po is gumawa ng table para sa nightshift then 2 column dates po then time in and time out then gumawa po ako ng function which is kung yung data is existed na po sa db by date and employee id po. Yun lang po nag ttime in uli kasi po naka by date today po siya. Pano po ba i seset si nightshift time in and time out po? Yung mangyayari po sana is insert si time in and date today tapos po pagdating ng umaga eh timeout po then by date today. Thank you po sa sasagot.

 

[-CHZ-]

Good day po. May itatanong lang po sana ako. Okay at feasible pa po ba gumamit ng older version ng Visual Studio ngayong 2018? Balak ko po sanang mag-install na lang ng Visual Studio 2008 kasi may crystal report na po syang kasama by default. Tho nakapag-try na po ako mag-install ng Visual Studio 2017 Community Edition. Sana po may makatulong sa tanong ko kasi need ko na po makapag-decide para sa gagawin naming Capstone project ng mga kagrupo ko. Maraming salamat po!

 

[maskio]

Hello po.. possible po kayang mg client to server ako sa dinedevelop kong windows app without using sql server 2012? if possible pano po kaya and my tools po bang need gwin?

pwede naman, depende kung anong gusto mong ma achieve, ex. like chat app na naka direct link.

- - - Updated - - -

Pahingi naman po idea about sa nightshift time in and time out po. Nagawa ko na po si time in and time out dayshift naka set sya sa date ngayon and 1 button lang po siya. Tinry ko po is gumawa ng table para sa nightshift then 2 column dates po then time in and time out then gumawa po ako ng function which is kung yung data is existed na po sa db by date and employee id po. Yun lang po nag ttime in uli kasi po naka by date today po siya. Pano po ba i seset si nightshift time in and time out po? Yung mangyayari po sana is insert si time in and date today tapos po pagdating ng umaga eh timeout po then by date today. Thank you po sa sasagot.

hmmm medyo complicated kasi depende kung ano ang table structure mo. if you have table schedule, madali lang kasi e mamatch mo lang sila via scheduled time, if wala naman, probably you have like night shift expected time, same lang sila ng table structure nung dayshift mo, if may shift type ka, kapag nightshift, e timestampdiff() mo lang. or if nightshift, kunin mo ang shift ng employee na to between now and yesterday na nightshift tsaka mo e update ang out nya, if walang in. insert ka ng out.

- - - Updated - - -

Good day po. May itatanong lang po sana ako. Okay at feasible pa po ba gumamit ng older version ng Visual Studio ngayong 2018? Balak ko po sanang mag-install na lang ng Visual Studio 2008 kasi may crystal report na po syang kasama by default. Tho nakapag-try na po ako mag-install ng Visual Studio 2017 Community Edition. Sana po may makatulong sa tanong ko kasi need ko na po makapag-decide para sa gagawin naming Capstone project ng mga kagrupo ko. Maraming salamat po!

yah okay lang naman. see changelog nalang ng mga different version para makita mo ano kaibahan ng bawat version. pero usage wise on finish product. okay lang kahit lumang vb gamit mo.

 

[keulblue]

textblast source code please!!! salamat

 

[wagnausalitae]

I made this thread for all programmers starting their adventure in VB.NET.

Please post relevant and sensible questions regarding VB.NET,
share your knowledge and expertise, share codes and techniques.

Post question on HOW TOs:
How to do this or that, ill supply bits of code to accomplish basic tasks.

Ill be posting series of samples leading to complete applications,
your suggestions are encouraged.
These samples will contain codes relevant to other tasks as well.

Platform = VS2003 to VS2012

i suggest learn and get the feel of VB.NET/VISUAL STUDIO IDE first before posting questions,
so that we can talk on the same page.


Topics:
VB.NET Winforms (not Web Applications)
ADO.NET as applied in VB.NET
Crystal Reports on VB.NET
SQLServer as used in VB.NET
MSAccess as used in VB.NET
Classes
UserControls

Technologies:
Serial - like using SMS, Barcode and other hardware
TCP/IP - chat applications, sockets, internet applications
MSMQ - message queuing
Remoting - executing assemblies in other computer
WebServices - using webservices in windows forms
Multithreading - executing more than 1 process at the same time


Suggested Third Party Tools:
DevXPress 2009 Free Edition
SQLServer 2005 Express Edition

Suggested references:
http://www.homeandlearn.co.uk/net/vbnet.html
http://www.java2s.com/Tutorial/VB/CatalogVB.htm

I currently use Visual Studio 2008 only, but basic codes will apply to all versions

Please do not ask for a complete system,
instead use the codes and assistance that you will find here
to build your own system.


***Thanks to moderators, STICKY na ang thread!

Lets share knowledge so that we can be a more flexible and well rounded programmer. Be it for school or work.

Links:

First Post: Populating DataGridView using MSAccess Database
Second Post : Basic VB.NET MSAccess Tutorial
SQLServer Sample

Patambay po ako dito boss! SALAMAT!

 

[remoshed]

try mo to sir ilagay sa textchanged or selectedindexchangedevent ng combobox

dim adp2 as new sqldataadapter("select * from " & Combobox1.text,con)
con.open

dim ds2 as new dataset
adp2.fill(ds2)
con.close
datagridview1.datasource=ds2.tables(0)

Sir pwede po magtanong kung paano mag display ng "Table Name" na selected lang po. Sa akin kasi ay mag display lahat ng table name ko.

- - - Updated - - -

Sir patulong po. Paano po mag display ng Table name na Selected lang po?
Sa ginawa ko po kasi nag display lahat ng table ko pati yung sa User admin gusto ko sana hindi ma view ito sa combobox.

ito po yun.
View attachment 349959

Patulong nmn po nagsisimula pa lang sa Vb net.

- - - Updated - - -

Sir patulong po. Paano po mag display ng Table name na Selected lang po?
Sa ginawa ko po kasi nag display lahat ng table name ko pati yung sa User Table ko gusto ko sana yung selected lang ang ma view sa combobox.

ito yun.

View attachment 349960

Patulong po nagsisimula pa lang sa vb net.