Symbianize Forum

Most of our features and services are available only to members, so we encourage you to login or register a new account. Registration is free, fast and simple. You only need to provide a valid email. Being a member you'll gain access to all member forums and features, post a message to ask question or provide answer, and share or find resources related to mobile phones, tablets, computers, game consoles, and multimedia.

All that and more, so what are you waiting for, click the register button and join us now! Ito ang website na ginawa ng pinoy para sa pinoy!

VB.NET Programming Corner!

mga master pa-help naman po, pano gumawa ng automatic series sa vb.net 2008 ang backend ko is ms access, ganito sana gusto kong format P-000001. salamat po.
 
Help po :( ganito kasi yan if else statement po kami kapag 10 to 9 ang score na nakuha = excellent kapag 8-6 = very good kapag 5-4 satisfactory kapag 3-1 = poor hinde po siya lalabas sa msgBox dapat po mag show yung result sa label po. salamat
 
mga master pa-help naman po, pano gumawa ng automatic series sa vb.net 2008 ang backend ko is ms access, ganito sana gusto kong format P-000001. salamat po.

Gumamit ng query sa database mo, kailangan mong kunin ang Id field sa database para makapagadd ng value sa last id na nakasave sa database
Hal

Dim idstring as string = "SELECT ID FROM myDatabaseTable"

Yung myDatabase table yan yung table mo sa access

The magexecute kana ng adapter, command at datatable,
Mahaba kasi yan, pero may code akong ganyan sa barangay system ko, try ko post


Help po :( ganito kasi yan if else statement po kami kapag 10 to 9 ang score na nakuha = excellent kapag 8-6 = very good kapag 5-4 satisfactory kapag 3-1 = poor hinde po siya lalabas sa msgBox dapat po mag show yung result sa label po. salamat

If score = 10 or score = 9 then
RemarksLabel.Text = "Excellent
Elseif score > 5 and score < 9 then
RemarksLabel.Text = "Very Good=
Elseif score = 5 or score = 4 then
Remarks.Text = "Satisfactory"
Else
RemarksLabel.Text = "poor"
Endif
 
Sa malulupit nating ka sb dito

ask ko lang balak ko kasi gumawa ng system para sa company

So ganito ang format, magkakaroon ng server pc

Bale ganito gusto ko mangyari

Per department namin kunwari admin department may dadalhing papers sa cashiers namin mag sesend si admin na may ganitong papers na papunta sa cashier tapos pag andun na yung papel pwede iaccept ni cashier yung papers isa isa kung ano yung sinend tapos per department meron ID at sariling pin code yung personels na iiinput nila pag sila mag aaccept ng papers tapos meron attachment ng pictures ganun... Tapos lahat ng transactions na gumagalaw pwede namin makita sa server,

vb .net , sql server or ano ba mas madali?

Sa makakatulong sakin mga paps paano set up nito message me, willing din ako magbayad pag natapos natin yung project Salamats
 
Last edited:
Download mo maski yung Express Edition and start using it,
type the codes you see here,
do not just copy,
understand what you are typing
and why you are typing it.

Refer to Google or MSDN for any keywords that you dont know.

See it run, admire your work.

You have all the resources at your disposal to learn this.

Sir san po link ng express edition.
 
Sa malulupit nating ka sb dito

ask ko lang balak ko kasi gumawa ng system para sa company

So ganito ang format, magkakaroon ng server pc

Bale ganito gusto ko mangyari

Per department namin kunwari admin department may dadalhing papers sa cashiers namin mag sesend si admin na may ganitong papers na papunta sa cashier tapos pag andun na yung papel pwede iaccept ni cashier yung papers isa isa kung ano yung sinend tapos per department meron ID at sariling pin code yung personels na iiinput nila pag sila mag aaccept ng papers tapos meron attachment ng pictures ganun... Tapos lahat ng transactions na gumagalaw pwede namin makita sa server,

vb .net , sql server or ano ba mas madali?

Sa makakatulong sakin mga paps paano set up nito message me, willing din ako magbayad pag natapos natin yung project Salamats

Pwede to lahat i-program, parang purchase order ang dating, pwede din na wala ng pictures para paperless na totally, bale sa system na lahat mangyayari ang mga transactions.
 
Pwede to lahat i-program, parang purchase order ang dating, pwede din na wala ng pictures para paperless na totally, bale sa system na lahat mangyayari ang mga transactions.

Pwede mo ba ako tulungan paps? kahit connection strings lang at calls sa server, zero kasi ako sa sql this time, pero yung forms etc walang prob, yung flow lang ng for ex. yung call for input for pin number at id pati yung check sa server, tapos balak ko dn lagyan ng lan chat san ko ba sya ilalagay tapos kulay ng row sa monitoring per dept para matic sa kulay palang highlighted na yung transaction kung asan na yung papers etc. Pwede mo ba imsg sakin fb accnt or msger mo paps?
 
sir newbie po sa programing penge naman po ng program na standard calculator with decimal salamat po
 
Hi mga sir. ask ko lang baka may alam. Panu kau nag momonitor ng changes sa DB, yung REAL-TIME or during RUNTIME? Yung pag kainsert sa DB, display agad sa form. Ngaun kasi ang gamit ko is TIMER to check kung may galaw sa DB. hindi ba sya babagal kapag multiple timer na ung nagrarun? Salamt sa sasagot :) FIGHTING!~
 
Gumamit ng query sa database mo, kailangan mong kunin ang Id field sa database para makapagadd ng value sa last id na nakasave sa database
Hal

Dim idstring as string = "SELECT ID FROM myDatabaseTable"

Yung myDatabase table yan yung table mo sa access

The magexecute kana ng adapter, command at datatable,
Mahaba kasi yan, pero may code akong ganyan sa barangay system ko, try ko post


TS! nagawa ko naman na siya ang problem ko lang once na nakaganito na yung series ko P-000001 by the next transaction ko nag-eerror na siya, ito pala sample code na ginawa ko:

Private Sub autoappid()
cn.Open()
Dim number As Double

With cmd
.Connection = cn
.CommandText = "SELECT MAX(Applicant_No) FROM applicant"
End With

If IsDBNull(cmd.ExecuteScalar) Then
number = 1
TxtNo.Text = number.ToString("000000")
Else
number = cmd.ExecuteScalar + 1
TxtNo.Text = number.ToString("000000")
End If
cmd.Dispose()
cn.Close()
End Sub

by the way sql server 2005 pala gamit ko na database na dito. THANKS!
 
Hi mga sir. ask ko lang baka may alam. Panu kau nag momonitor ng changes sa DB, yung REAL-TIME or during RUNTIME? Yung pag kainsert sa DB, display agad sa form. Ngaun kasi ang gamit ko is TIMER to check kung may galaw sa DB. hindi ba sya babagal kapag multiple timer na ung nagrarun? Salamt sa sasagot :) FIGHTING!~


example nasa listview yung records, pag nag add ka ng record at successful clear mo yung laman ng listview tapos get mo yung lahat ng records para magapply yung changes. wag ka gumamit ng timer.
 
Gumamit ng query sa database mo, kailangan mong kunin ang Id field sa database para makapagadd ng value sa last id na nakasave sa database
Hal

Dim idstring as string = "SELECT ID FROM myDatabaseTable"

Yung myDatabase table yan yung table mo sa access

The magexecute kana ng adapter, command at datatable,
Mahaba kasi yan, pero may code akong ganyan sa barangay system ko, try ko post


TS! nagawa ko naman na siya ang problem ko lang once na nakaganito na yung series ko P-000001 by the next transaction ko nag-eerror na siya, ito pala sample code na ginawa ko:

Private Sub autoappid()
cn.Open()
Dim number As Double

With cmd
.Connection = cn
.CommandText = "SELECT MAX(Applicant_No) FROM applicant"
End With

If IsDBNull(cmd.ExecuteScalar) Then
number = 1
TxtNo.Text = number.ToString("000000")
Else
number = cmd.ExecuteScalar + 1
TxtNo.Text = number.ToString("000000")
End If
cmd.Dispose()
cn.Close()
End Sub

by the way sql server 2005 pala gamit ko na database na dito. THANKS!


ilagay mo yung cmd.execturescalar sa variable wag mo icall ng dalawang beses. dawang beses mag query yan, dalawang beses dadaan sa network yan.
ibig sabihin hindi lang yan mas mabagal mas gumagamit pa ng resources.

tapos yung pag generate mo ng applicant number dapat sa sql server mo nlng gawin. gumamit ka ng procedure dun ka mag increment. gumamit ka ng padleft para maglagay ng leading zero.

meron din padleft sa vb kung dyan mo talga gusto gawin.
 
Last edited:
example nasa listview yung records, pag nag add ka ng record at successful clear mo yung laman ng listview tapos get mo yung lahat ng records para magapply yung changes. wag ka gumamit ng timer.

ayy sir hindi mo po ata na-gets. For example meron po akong File Maintenance na form (Add, Edit, Delete) na connected sa database. And then nag-add ako. Ang gusto ko po sana, pagkainsert ko sa DATABASE (hindi po sa ibang control like listview), eh madedetect agad nya. parang may background checking po na magaganap sa Database. na i-a-alet nya ko kapag may nadagdag sa database. kaya po ako gumamit ng timer, kasi un po ung mag momonitor every second kung may nadagdag sa table ko. PARANG NOTIFICATION PO ang labas. pero salamat na din sa pagpansin sir. hahahahahhaa
 
ilagay mo yung cmd.execturescalar sa variable wag mo icall ng dalawang beses. dawang beses mag query yan, dalawang beses dadaan sa network yan.
ibig sabihin hindi lang yan mas mabagal mas gumagamit pa ng resources.

tapos yung pag generate mo ng applicant number dapat sa sql server mo nlng gawin. gumamit ka ng procedure dun ka mag increment. gumamit ka ng padleft para maglagay ng leading zero.

meron din padleft sa vb kung dyan mo talga gusto gawin.

sa sql ba kung gagamit ako ng padleft magagawa ko yung ganitong format P-000001? and yung sa cmd.executescalar panong ilalagay sa variable? thanks
 
View attachment 223525View attachment 223524guys help po sa activity namin, di ko po kc alam gagawin dito sana may tumulong po. ganto po everytime na pipili po ako sa comboBox ng name ng car dapat po mag aapear yung car image po ang mga ginamit ko po na properties ay, imageList,listView at comboBox po, Caser Statement po dapat kahit lang po kung paano lalabas yung image po,, dyan palang kasi hirap na po, salamat.....
 

Attachments

  • yn.png
    yn.png
    209.2 KB · Views: 11
  • 11791979_996115400438688_2326919383921437278_o.jpg
    11791979_996115400438688_2326919383921437278_o.jpg
    49.7 KB · Views: 7
Last edited:
Hi mga sir. ask ko lang baka may alam. Panu kau nag momonitor ng changes sa DB, yung REAL-TIME or during RUNTIME? Yung pag kainsert sa DB, display agad sa form. Ngaun kasi ang gamit ko is TIMER to check kung may galaw sa DB. hindi ba sya babagal kapag multiple timer na ung nagrarun? Salamt sa sasagot :) FIGHTING!~

you can use a trigger, pag aralan mo gumamit ng trigger sa sql, bali para syang stored procedure.
 
sa sql ba kung gagamit ako ng padleft magagawa ko yung ganitong format P-000001? and yung sa cmd.executescalar panong ilalagay sa variable? thanks

icorrect ko lang yung sinabi ko. Padleft is a function na ginawa ko sa ms sql. the correct mssql function is replicate.
ito yung function ko.

Code:
create function [dbo].[fPadLeft]
(
@Char as char(1),
@Len as integer,
@Value as nvarchar(max)
)
returns nvarchar(max)
as
begin
declare @ret as nvarchar(max)
	set @ret =  replicate(@char,@len - len(@value))
	set @ret = @ret + @value
return @ret
end

ganito sya gamitin.

Code:
select 'P-' + dbo.fPadLeft('0',6,ID)
from Table

ang output nyan eh P-000001 if yung ID from table is 1

instead of using the function pwede mo gamitin directly yung replicate

Code:
SELECT 'P-' + replicate('0',6 - len(ID)) + cast(ID as nvarchar(10))
FROM Table

just make sure yung iconcatenate mo is converted na sa string using cast.

Ganito yung sinasabi ko sa ilagay sa variable
Code:
dim lastID as integer = cmd.executescalar
 
icorrect ko lang yung sinabi ko. Padleft is a function na ginawa ko sa ms sql. the correct mssql function is replicate.
ito yung function ko.

Code:
create function [dbo].[fPadLeft]
(
@Char as char(1),
@Len as integer,
@Value as nvarchar(max)
)
returns nvarchar(max)
as
begin
declare @ret as nvarchar(max)
	set @ret =  replicate(@char,@len - len(@value))
	set @ret = @ret + @value
return @ret
end

ganito sya gamitin.

Code:
select 'P-' + dbo.fPadLeft('0',6,ID)
from Table

ang output nyan eh P-000001 if yung ID from table is 1

instead of using the function pwede mo gamitin directly yung replicate

Code:
SELECT 'P-' + replicate('0',6 - len(ID)) + cast(ID as nvarchar(10))
FROM Table

just make sure yung iconcatenate mo is converted na sa string using cast.

Ganito yung sinasabi ko sa ilagay sa variable
Code:
dim lastID as integer = cmd.executescalar

so magiging ganito na yung code ko TS! tama ba?

Private Sub autoempid()
cn.Open()
Dim number As Integer = cmd.ExecuteScalar

With cmd
.Connection = cn
.CommandText = "SELECT 'P-' + replicate('0',6 - len(Applicant_No)) + cast(Applicant_No as nvarchar(10)) FROM employee"
End With

If IsDBNull(cmd.ExecuteScalar) Then
number = 1
TxtEmpID.Text = number.ToString("00000")
Else
number = cmd.ExecuteScalar + 1
TxtEmpID.Text = number.ToString("00000")
End If
cmd.Dispose()
cn.Close()
End Sub
 
ayy sir hindi mo po ata na-gets. For example meron po akong File Maintenance na form (Add, Edit, Delete) na connected sa database. And then nag-add ako. Ang gusto ko po sana, pagkainsert ko sa DATABASE (hindi po sa ibang control like listview), eh madedetect agad nya. parang may background checking po na magaganap sa Database. na i-a-alet nya ko kapag may nadagdag sa database. kaya po ako gumamit ng timer, kasi un po ung mag momonitor every second kung may nadagdag sa table ko. PARANG NOTIFICATION PO ang labas. pero salamat na din sa pagpansin sir. hahahahahhaa

ahh okay. kung sure ka naman sa query mo at sa code mo, gamit ka nalang msgbox for notification.
kunwari 100% sure ka na working yung sa pag add mo, mag msgbox ka na mag notify na successful yung pag add. same with edit and delete.
 
Last edited:
Back
Top Bottom