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!

:pray: Palink naman po sa meron ng dotnetbar yung crack version, mas maganda kung latest version.. salamat
 
Noobs Question: ano pagkaka iba sa paggamit ng MySqlAdapter sa MySqlDatareader

some program are using adapter while some are not and some program are using datareader some are not. Alam ko nman ung function nila pero gusto ko sana malinawan kung ano pag kakaiba nila...
 
guys patulong syntax error daw sa INSERT INTO ko.
eto yung code.
Try
For Each item As ListViewItem In ListView1.Items
Dim str As String

str = "INSERT INTO tblsurgery (Case, Gender, Old, New, Follow_up, Referral_to, Referral_from, Admission, Anual_pe, OWC,CP_eval, Pedia_eval, Time_reg, Minor_or)" & _
"VALUES (@Case, @Gender, @Old, @New, @Follow_up, @Referral_to, @Referral_from, @Admission, @Anual_pe, @OWC, @CP_eval, @Pedia_eval, @Time_reg, @Minor_or)"

cmd = New OleDb.OleDbCommand(str, con)
cmd.Parameters.AddWithValue("@Case", item.SubItems(0).Text)
cmd.Parameters.AddWithValue("@Gender", item.SubItems(1).Text)
cmd.Parameters.AddWithValue("@Old", item.SubItems(2).Text)
cmd.Parameters.AddWithValue("@New", item.SubItems(3).Text)
cmd.Parameters.AddWithValue("@Follow_up", item.SubItems(4).Text)
cmd.Parameters.AddWithValue("@Referral_to", item.SubItems(5).Text)
cmd.Parameters.AddWithValue("@Referral_from", item.SubItems(6).Text)
cmd.Parameters.AddWithValue("@Admission", item.SubItems(7).Text)
cmd.Parameters.AddWithValue("@Anual_pe", item.SubItems(8).Text)
cmd.Parameters.AddWithValue("@OWC", item.SubItems(9).Text)
cmd.Parameters.AddWithValue("@CP_eval", item.SubItems(10).Text)
cmd.Parameters.AddWithValue("@Pedia_eval", item.SubItems(11).Text)
cmd.Parameters.AddWithValue("@Time_reg", item.SubItems(12).Text)
cmd.Parameters.AddWithValue("@Minor_or", item.SubItems(13).Text)


cmd.ExecuteNonQuery()
Next
Catch ex As Exception
MessageBox.Show(ex.ToString)
End Try
 
may konting katanungan lang ako mga idol kasi meron akong textbox dito ang value is September 25 to November 29, 2012 need ko lang ung year pede ko kaya ma extract ung year?
 
may konting katanungan lang ako mga idol kasi meron akong textbox dito ang value is September 25 to November 29, 2012 need ko lang ung year pede ko kaya ma extract ung year?

String manipulation sir pwede mo gamitin. kung ganyan lang yung format ng nasa textbox mo kunin mo lang lagi yung last 4 characters
 
may konting katanungan lang ako mga idol kasi meron akong textbox dito ang value is September 25 to November 29, 2012 need ko lang ung year pede ko kaya ma extract ung year?

USE REGEX

\d\d\d\d
 
Hello po, magaask lang po ng suggestions for possible games na madaling gawin.. yung parang kalevel lang ng slot machines na games like lucky 7, lucky 9 etc.. ang nasubmit po namin the other day is tic tac toe pero mukhang mahirap daw so baka papalitan namin next meeting.. minimal knowledge lang po kasi kami sa vb.. OOP subject ng IT. TIA
 
PATULONG naman po guys. may system akong ginagawa. online shopping na gamit VB.Net... ngayon lahat ng mapipili nilang items na gusto nila napupunta sa isang form na may listbox. then hindi ko na alam pano ko makukuha yung laman ng list box para macmpute ko yung mga items na pinili nila. Thanks sana may magreply :lol::lol::lol:
 
Vb.net ? mag ASP.NET ka nalang or web mas ok na kasi
 
Last edited:
alam mo kung bakit error? Reserve word kasi yung case xD

- - - Updated - - -

guys patulong syntax error daw sa INSERT INTO ko.
eto yung code.
Try
For Each item As ListViewItem In ListView1.Items
Dim str As String

str = "INSERT INTO tblsurgery (Case, Gender, Old, New, Follow_up, Referral_to, Referral_from, Admission, Anual_pe, OWC,CP_eval, Pedia_eval, Time_reg, Minor_or)" & _
"VALUES (@Case, @Gender, @Old, @New, @Follow_up, @Referral_to, @Referral_from, @Admission, @Anual_pe, @OWC, @CP_eval, @Pedia_eval, @Time_reg, @Minor_or)"

cmd = New OleDb.OleDbCommand(str, con)
cmd.Parameters.AddWithValue("@Case", item.SubItems(0).Text)
cmd.Parameters.AddWithValue("@Gender", item.SubItems(1).Text)
cmd.Parameters.AddWithValue("@Old", item.SubItems(2).Text)
cmd.Parameters.AddWithValue("@New", item.SubItems(3).Text)
cmd.Parameters.AddWithValue("@Follow_up", item.SubItems(4).Text)
cmd.Parameters.AddWithValue("@Referral_to", item.SubItems(5).Text)
cmd.Parameters.AddWithValue("@Referral_from", item.SubItems(6).Text)
cmd.Parameters.AddWithValue("@Admission", item.SubItems(7).Text)
cmd.Parameters.AddWithValue("@Anual_pe", item.SubItems(8).Text)
cmd.Parameters.AddWithValue("@OWC", item.SubItems(9).Text)
cmd.Parameters.AddWithValue("@CP_eval", item.SubItems(10).Text)
cmd.Parameters.AddWithValue("@Pedia_eval", item.SubItems(11).Text)
cmd.Parameters.AddWithValue("@Time_reg", item.SubItems(12).Text)
cmd.Parameters.AddWithValue("@Minor_or", item.SubItems(13).Text)


cmd.ExecuteNonQuery()
Next
Catch ex As Exception
MessageBox.Show(ex.ToString)
End Try

Alam mo kung bakit error? Reserve Word kasi yung CASE

saka sundin mo yung ganitong format

Code:
Using cn as new MySQLConnection(cnString)
  cn.Open
  Dim Cmd as new MysqlCommand('SQL STRING',cn)
  cmd.parameters.addwithvalue(......

  dim n as integer = 0
  n = cmd.ExecuteNonQuery
  if n <> 0 then
  'Kung row changed or success
  end if
End Using
 
Last edited:
guys patulong sa pggwa ng database management system ung simple lng
tulad ng add,edit,delete,save at search using vb.net at ms access 2010 database.
pc base

THanks
 
helo po patulong ako panoo masolve ung error na "Unable to convert MySQL date/time value to System.DateTime"




Public Class frmlistbarrowedbooks

Sub loadbarrowed()
Me.lvlist3.Items.Clear()
connect()
cmd.Connection = conn
cmd.CommandText = "select * from brwbooks"
reader = cmd.ExecuteReader
While reader.Read
iITem = New ListViewItem(reader(0).ToString)
iITem.SubItems.Add(reader(1).ToString)
iITem.SubItems.Add(reader(2).ToString)
iITem.SubItems.Add(reader(3).ToString)
iITem.SubItems.Add(reader(4).ToString)
iITem.SubItems.Add(reader(5).ToString)
iITem.SubItems.Add(reader(6).ToString)
iITem.SubItems.Add(reader(7).ToString)
iITem.SubItems.Add(reader(8).ToString)
iITem.SubItems.Add(reader(9).ToString)
iITem.SubItems.Add(reader(10).ToString) -----> dto po un tinuturo nia
lvlist3.Items.Add(iITem)
End While
disconnect()
End Sub

Private Sub frmlistbarrowedbooks_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
loadbarrowed()
End Sub
End Class
 
helo po patulong ako panoo masolve ung error na "Unable to convert MySQL date/time value to System.DateTime"




Public Class frmlistbarrowedbooks

Sub loadbarrowed()
Me.lvlist3.Items.Clear()
connect()
cmd.Connection = conn
cmd.CommandText = "select * from brwbooks"
reader = cmd.ExecuteReader
While reader.Read
iITem = New ListViewItem(reader(0).ToString)
iITem.SubItems.Add(reader(1).ToString)
iITem.SubItems.Add(reader(2).ToString)
iITem.SubItems.Add(reader(3).ToString)
iITem.SubItems.Add(reader(4).ToString)
iITem.SubItems.Add(reader(5).ToString)
iITem.SubItems.Add(reader(6).ToString)
iITem.SubItems.Add(reader(7).ToString)
iITem.SubItems.Add(reader(8).ToString)
iITem.SubItems.Add(reader(9).ToString)
iITem.SubItems.Add(reader(10).ToString) -----> dto po un tinuturo nia
lvlist3.Items.Add(iITem)
End While
disconnect()
End Sub

Private Sub frmlistbarrowedbooks_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
loadbarrowed()
End Sub
End Class

dagdag mo to sa mysql connection mo

Convert Zero Datetime=True


"server=localhost;User Id=root;password=mautauaja;Persist Security Info=True;database=test;Convert Zero Datetime=True"
 
ASP.NET yun sir sorry kung yun man ang mali nag suggest lang ako

Kinorek nya mali padin hahaha

- - - Updated - - -

guys patulong sa pggwa ng database management system ung simple lng
tulad ng add,edit,delete,save at search using vb.net at ms access 2010 database.
pc base

THanks

We Can Help you by posting your codes and correct it.. so you can learn how to survive in the ReAL WORLD / Industry without asking the whole system..
 
Guys, mang hihinge sana ako ng mga pwedeng gawin na system for practicing my skills about vb.net/c#, nilulumot na kasi ako, and back to start na naman haha, yung mga tipong pwede pang real time applications na ginagawa ng mga programmer in real world. sorry naubusan na ako ng ideas about sa system, and needed na marefresh ako hehe thanks
 
Back
Top Bottom