VB.NET Programming Corner!

[acjulron]

Hi mga master, ask ko lang po kung pano mag display ng lahat ng data galing datagridview sa textbox, yung hindi po per single row, gusto ko po sana idisplay yung mga data sa textbox without selecting row

 

[yukito7]

mga boss baka meron kayong download link ebook / pdf ng advanced programming ng vb.net.... salamat sa magbibigay ,,

 

[kuroydada123]

Ang galing ng tread na to... di na halos kelangan mag search pa. ndito na lahat.

 

[endlezz]

help po sa code ko hnd ko po maskip ung system folder View attachment 314109

 

[JunMax]

Good day po mga ka SB!
pwede po magpahelp about sa Visual Studio VB kung paano ma save sa database yung import file na galing sa excel, yung database ko po is access lang nakagawa na po ako ng pang import at nagdidisplay napo sa datagridview, pero hinde po nagsasave sa database ko. Patulong naman po. Thanks in advance Gd Bless

Crazy idea lang hehe
gawa ka ng for loop mo Sir,
ung galing sa datagridview isave mo sa database mo.
parang transfer ba ang gagawin mo Sir,
ung galing Excel ilagay mo muna sa Datagridview then yung galing Datagridview lagay mo na sa Access Database mo.
Excel >> Gridview >> Access

- - - Updated - - -

help po sa code ko hnd ko po maskip ung system folder View attachment 1201186

baka naka read only yung folder na yn Sir,

 

[maritesmacute]

Sino pede makatulong on how to create a custom user rights and privileges?

here.. how i create customer user rights and priveleges

 

[endlezz]

sir gusto ko kc maread nya lhat ng files sa drive E:/ except sa system folders panu po maskip un? tpos ituloy nya sa next iteration ng readable folder?

 

[yukito7]

mga sir baka may makatulong, nag aaral kasi ako ng vb.net, at yung system na pinapractice ko ngaun ay Daily Time Record System . Problem ko lang is yung code sa time-out , gumamit ako ng update code for the specific row, problema ko lang nag update lahat ng row even the previous days. bka my makatulong.


Dim sqlconn As New OleDb.OleDbConnection
Dim sqlquery As New OleDb.OleDbCommand
Dim connString As String
connString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\guestuser.CFOOP\Documents\Visual Studio 2013\Projects\Time In-Out\WindowsApplication6\Time In-Out.accdb"
sqlconn.ConnectionString = connString
sqlquery.Connection = sqlconn
sqlconn.Open()
sqlquery.CommandText = "UPDATE [000550001] SET [EmpTimeOut] = '" & Label5.Text & "' "
Me.DataGridView1.Columns(3).DefaultCellStyle.Format = "hh:mm:ss tt"
sqlquery.ExecuteNonQuery()
sqlconn.Close()
View attachment 314373

- - - Updated - - -

Nag try ulit ako gumawa ng system ng parking, yung automatic nyang pipiliin ung pinakamalapit na parking slot, eto nmn error ko., limited lang ba ang use ng Button.PerformClick() , dalawang beses lang kasi sya gumagana, sa mga next ayw na gumana. hanggang dalawa lang. sa pangatlo ayw na, sana may makatulong.


Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
PictureBox4.Visible = False
PictureBox5.Visible = False
PictureBox6.Visible = False
PictureBox7.Visible = False
PictureBox8.Visible = False
PictureBox9.Visible = False
End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
PictureBox4.Visible = True
Label1.Text = "Occupied"
End Sub

Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
If PictureBox4.Visible = False Then
Me.Button1.PerformClick()
ElseIf PictureBox4.Visible = True Then
Me.Button2.PerformClick()
ElseIf PictureBox5.Visible = True Then
Me.Button3.PerformClick()
ElseIf PictureBox6.Visible = True Then
Me.Button4.PerformClick()
ElseIf PictureBox7.Visible = True Then
Me.Button5.PerformClick()
ElseIf PictureBox8.Visible = True Then
Me.Button6.PerformClick()
Else : MessageBox.Show("No Slot Available")
End If
End Sub

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
PictureBox5.Visible = True
Label2.Text = "Occupied"
End Sub

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
PictureBox6.Visible = True
Label3.Text = "Occupied"
End Sub

Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
PictureBox7.Visible = True
Label4.Text = "Occupied"
End Sub

Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
PictureBox8.Visible = True
Label5.Text = "Occupied"
End Sub

Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
PictureBox9.Visible = True
Label6.Text = "Occupied"
End Sub

End Class


View attachment 314383

 

[imperfects]

sino po nagagamit na sainyo ng itextsharp na lib sa project nila... pahingi naman ng saklolo... hihihi di ko kasi ma gets yung ibang part sobrang laki ng library..

 

[antoinks]

Thanks Man!!!

 

[nikhea21]

- - - Updated - - -

here.. how i create customer user rights and priveleges

http://img1.uploadhouse.com/fileuploads/25104/251044913c702bad3735b46de16db73ac3add91c.png

any tips or link saan pwede mapag-aralan yan sir?

 

[Eye Switcher]

- - - Updated - - -



any tips or link saan pwede mapag-aralan yan sir?

Bigyan kita ng idea kung paano yan sir.

(e.g.)

Sa Application mu may dalawang klase ng User Account (i.e Administrator & User)
Meron ka ding sabihin nating apat (4) na role (i.e (1)Maintenance, (2)Transaction, (3)POS & (4)Reports)

==================================

Si Administrator ay dapat accesible sa lahat.
Si User naman sa POS lang Or Else pwede rin pati Reports.

==================================

Ngayon, sa Database mu dapat meron kang table kung saan nakasave ang kanilang privileges.
(e.g)

tblPrivileges
--------------------------------
UId | RoleType | Status
--------------------------------
user123 | Maintenance | 0
user123 | Transaction | 0
user123 | POS | 1
user123 | Reports | 1
admin1 | Maintenace | 1

====================================

Since may LoginForm or LoginPage ka, pagkatapos mung ma-verify yung user account,
dun mu na i-filter kung ano lang ang accesible ng bawat user account base sa tblPrivileges.

Hope it helps.

 

[rhonl16]

Ask lang mga ka symb im creating a simple record system that store all data's like picture and documents, but i want to know kung anu mas maganda storing images in SQL database vs storing images in seperate folder and using URL image path. Balak ko kasi i store yung imgae sa sql server and convert into binary. What are the dis advantages and advantages. Im using c# 2012 as my programing language and sql server 2012. Request na din ng mga sample code nyu about storing and retrieving image from sql kung meron heheh salamat. May error kasi lage code ko para may reference lang

 

[keem1992]

Good day, masters!

May problema po ako. May system po ako. Inventory System tapos gxto ko po i EXPORT ang data from datagridview to MS Excel. ginawa ko na po lahat ng research sa Google pati sa Youtube, ayaw parin gumana. Baka may codes po kayo jan or method para mag work natong Export to Excel feature ng system ko. Maraming salamat po sa tutulong!

 

[URAZKY]

Good day, masters!

May problema po ako. May system po ako. Inventory System tapos gxto ko po i EXPORT ang data from datagridview to MS Excel. ginawa ko na po lahat ng research sa Google pati sa Youtube, ayaw parin gumana. Baka may codes po kayo jan or method para mag work natong Export to Excel feature ng system ko. Maraming salamat po sa tutulong!

Madali lang yan TS! my code ako na export to excel gamit ko until now sa program ko so far wala pa naman problem.

- - - Updated - - -

- - - Updated - - -



any tips or link saan pwede mapag-aralan yan sir?

pm or email ko TS! turo ko sayo kung paano yan [email protected]

 

[goldensuek]

thnx ts pa bm

 

[nikhea21]

- - - Updated - - -

Bigyan kita ng idea kung paano yan sir.

(e.g.)

Sa Application mu may dalawang klase ng User Account (i.e Administrator & User)
Meron ka ding sabihin nating apat (4) na role (i.e (1)Maintenance, (2)Transaction, (3)POS & (4)Reports)

==================================

Si Administrator ay dapat accesible sa lahat.
Si User naman sa POS lang Or Else pwede rin pati Reports.

==================================

Ngayon, sa Database mu dapat meron kang table kung saan nakasave ang kanilang privileges.
(e.g)

tblPrivileges
--------------------------------
UId | RoleType | Status
--------------------------------
user123 | Maintenance | 0
user123 | Transaction | 0
user123 | POS | 1
user123 | Reports | 1
admin1 | Maintenace | 1

====================================

Since may LoginForm or LoginPage ka, pagkatapos mung ma-verify yung user account,
dun mu na i-filter kung ano lang ang accesible ng bawat user account base sa tblPrivileges.

Hope it helps.

Medyo naintindihan kita sir, update kita pag nagawa kona thanks.

 

[Eye Switcher]

- - - Updated - - -



Medyo naintindihan kita sir, update kita pag nagawa kona thanks.

Sure, aabangan kita.

- - - Updated - - -

Ask lang mga ka symb im creating a simple record system that store all data's like picture and documents, but i want to know kung anu mas maganda storing images in SQL database vs storing images in seperate folder and using URL image path. Balak ko kasi i store yung imgae sa sql server and convert into binary. What are the dis advantages and advantages. Im using c# 2012 as my programing language and sql server 2012. Request na din ng mga sample code nyu about storing and retrieving image from sql kung meron heheh salamat. May error kasi lage code ko para may reference lang

Based on their experienced, mas maganda and more practical if you store it in a file system.

The advantage of using folders is that you don't need to have a custom handler that fetches those BLOBs out of a database and turns them into regular streams. It's also simpler to host them from different locations and you'll avoid the burden on the database server.

You have to be careful about storing the pathnames. Relative pathnames work better as URLs and will allow you some flexibility and scaling in where you store them, how you serve them, and so forth.

Two thoughts on this:

Use the filesystem. But make sure you design your scheme well enough that any one folder is not overloaded with images and it becomes something of a nightmare to manage. For instance, you can tree it out with first or last letters of the identifier, or subsequent positional notation. Your mileage will vary, so make sure the scheme fits your data set (images) size. No need to go to detailed lengths if you're only managing, say, 20 images.

Use SQL Server 2008. It has a new datatype called filestream while will save the images to the filesystem but allow you to retrieve it via standard database queries. See http://msdn.microsoft.com/en-us/library/cc949109.aspx for more information.

These aren't exclusive choices, but at the very least, I'd recommend option #1 for the sheer fact that you'll get better performance out of using a filesystem-based-scheme rather than storing and reading blobs out of a database.

For your reference

Difference-in-storing-image-in-database-table-vs-storing-image-in-folder-and-save-its-path-in-database-Which-is-better-and-why

inserting-retrieving-images-from-sql-server-database-without-using-stored-procedures/

How-to-save-image-into-sql-Database-using-csharp-w

Hope it Helps

 

[bluepearl]

D ko na kaya suko na ako.. kung may makatulong sa akin maawa kayo Mga Boss at expert sa VB.net Share niyo naman nalalaman niyo d2..

Hirap na ako sir.. 2 weeks ko na fix to ..newbie ako..

LINQ
SQL SERVER 2008
Visual Studio Professional 2010


'--------------------------------------------
ito code ko sa module ko..
ito sa baba ohh..


Sub save_item(ByVal stridn As String, ByVal strtype As String, ByVal strgendes As String, ByVal strquantity As String, ByVal strfund As String, ByVal strebudget As String, _
ByVal strtotaltenpercent As String, ByVal strjan As String, ByVal strfeb As String, ByVal strmarch As String, _
ByVal strapril As String, ByVal strmay As String, ByVal strjune As String, ByVal strjuly As String, _
ByVal straug As String, ByVal strsept As String, ByVal stroct As String, ByVal strnov As String, ByVal strdec As String, _
ByVal strq1 As String, ByVal strq2 As String, ByVal strq3 As String, ByVal strq4 As String, ByVal strtotal_item As String, _
ByVal strtotalprice As String, ByVal strdate As String)

Dim saveall1 As New tblPPMP With {.IDN = stridn, _
.Type = strtype, _
.GenDes = strgendes, _
.Quantity = strquantity, _
.Fund = strmay, _
.Ebudget = strebudget, _
.Total_tenpercent = strtotaltenpercent, _
.Jan = strjan, _
.Feb = strfeb, _
.March = strmarch, _
.April = strapril, _
.May = strmay, _
.June = strjune, _
.Jul = strjuly, _
.Aug = straug, _
.Sept = strsept, _
.Oct = stroct, _
.Nov = strnov, _
.Dec = strdec, _
.Q1 = strq1, _
.Q2 = strq2, _
.Q3 = strq3, _
.Q4 = strq4, _
.Total_Item = strtotal_item, _
.Total_Price = strtotalprice, _
.dr_date = strdate}

dbcon.tblPPMPs.InsertOnSubmit(saveall1)
Try
MsgBox("save successfully")
Catch ex As Exception

End Try
'-------------------------------------------------------------------------------------

ito yong code ko sa save

'-------------------------------------------------------------------------------------


save_item(Val(txtID.Text), txttype.Text, txtdescription.Text, txtquantity.Text, txtFund.Text, Val(txtEBudget.Text), Val(txtTenpercent.Text), _
Val(txtjan.Text), Val(txtfeb.Text), Val(txtmarch.Text), Val(txtapril.Text), Val(txtmay.Text), Val(txtjune.Text), Val(txtjuly.Text), Val(txtaug.Text), _
Val(txtsept.Text), Val(txtoct.Text), Val(txtnov.Text), Val(txtdec.Text), Val(txtq1.Text), Val(txtq2.Text), Val(txtq3.Text), Val(txtq4.Text), _
Val(txttotalitem.Text), Val(txttotalprice.Text), dtp.Value)




hirap na ako sir ..tulong namn po.. interesado aq sa programming .. tulong naman kayo..sakit na ulo ko kakafix

 

[maritesmacute]

- - - Updated - - -



Medyo naintindihan kita sir, update kita pag nagawa kona thanks.

first i created my table details..
i just group them per column dun sa first pic ko

then here's my priveledges

pag dating sa vb naman, every open ng form, they always requery or get their priveledges to make it real time,
para pag binago ng admin yung account mo, on the spot, kahit nakalogin ka, di mo na agad maaaccess yung ilang parts sa system

- - - Updated - - -

D ko na kaya suko na ako.. kung may makatulong sa akin maawa kayo Mga Boss at expert sa VB.net Share niyo naman nalalaman niyo d2..

Hirap na ako sir.. 2 weeks ko na fix to ..newbie ako..

LINQ
SQL SERVER 2008
Visual Studio Professional 2010


'--------------------------------------------
ito code ko sa module ko..
ito sa baba ohh..


Sub save_item(ByVal stridn As String, ByVal strtype As String, ByVal strgendes As String, ByVal strquantity As String, ByVal strfund As String, ByVal strebudget As String, _
ByVal strtotaltenpercent As String, ByVal strjan As String, ByVal strfeb As String, ByVal strmarch As String, _
ByVal strapril As String, ByVal strmay As String, ByVal strjune As String, ByVal strjuly As String, _
ByVal straug As String, ByVal strsept As String, ByVal stroct As String, ByVal strnov As String, ByVal strdec As String, _
ByVal strq1 As String, ByVal strq2 As String, ByVal strq3 As String, ByVal strq4 As String, ByVal strtotal_item As String, _
ByVal strtotalprice As String, ByVal strdate As String)

Dim saveall1 As New tblPPMP With {.IDN = stridn, _
.Type = strtype, _
.GenDes = strgendes, _
.Quantity = strquantity, _
.Fund = strmay, _
.Ebudget = strebudget, _
.Total_tenpercent = strtotaltenpercent, _
.Jan = strjan, _
.Feb = strfeb, _
.March = strmarch, _
.April = strapril, _
.May = strmay, _
.June = strjune, _
.Jul = strjuly, _
.Aug = straug, _
.Sept = strsept, _
.Oct = stroct, _
.Nov = strnov, _
.Dec = strdec, _
.Q1 = strq1, _
.Q2 = strq2, _
.Q3 = strq3, _
.Q4 = strq4, _
.Total_Item = strtotal_item, _
.Total_Price = strtotalprice, _
.dr_date = strdate}

dbcon.tblPPMPs.InsertOnSubmit(saveall1)
Try
MsgBox("save successfully")
Catch ex As Exception

End Try
'-------------------------------------------------------------------------------------

ito yong code ko sa save

'-------------------------------------------------------------------------------------


save_item(Val(txtID.Text), txttype.Text, txtdescription.Text, txtquantity.Text, txtFund.Text, Val(txtEBudget.Text), Val(txtTenpercent.Text), _
Val(txtjan.Text), Val(txtfeb.Text), Val(txtmarch.Text), Val(txtapril.Text), Val(txtmay.Text), Val(txtjune.Text), Val(txtjuly.Text), Val(txtaug.Text), _
Val(txtsept.Text), Val(txtoct.Text), Val(txtnov.Text), Val(txtdec.Text), Val(txtq1.Text), Val(txtq2.Text), Val(txtq3.Text), Val(txtq4.Text), _
Val(txttotalitem.Text), Val(txttotalprice.Text), dtp.Value)




hirap na ako sir ..tulong namn po.. interesado aq sa programming .. tulong naman kayo..sakit na ulo ko kakafix

yan ang hirap pag hindi ka object oriented.. sandamakmak na textbox ang ipapasa mo imbis na yung object nalang