Advertisement
Advertisement
| 05.11.2008 at 12:53PM PDT, ID: 23393018 | Points: 500 |
|
[x]
Attachment Details
|
||
| Microsoft |
| Apple |
| Internet |
| Gamers |
| Digital Living |
| Virus & Spyware |
| Hardware |
| Software |
| ITPro |
| Developer |
| Storage |
| OS |
| Database |
| Security |
| Programming |
| Web Development |
| Networking |
| Other |
| Community Support |
| 05.11.2008 at 01:00PM PDT, ID: 21543314 |
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: 31: 32: |
procedure change:
create procedure sp_select_basket_total(IN inUID INT, OUT q DECIMAL(20,4) )
select sum(price*qty) into q from basket where uid = inUID group by uid
.net code:
Public Shared Function writeBasketTotal(ByVal UID As Integer) As Double
Dim connStr As String = ConfigurationManager.AppSettings("connStr")
Dim conn As New MySqlConnection(connStr)
Dim cmd As New MySqlCommand
Dim q as MySqlParameter
Dim dsReturn as Double
Try
conn.Open()
cmd.Connection = conn
cmd.CommandText = "sp_select_basket_total"
cmd.CommandType = CommandType.StoredProcedure
cmd.Parameters.Add("?inUID", UID).Direction = ParameterDirection.Input
q = cmd.Parameters.Add("?q")
q.Direction = ParameterDirection.Output
cmd.ExecuteNonQuery()
dsReturn = q.Value
Return dsReturn
Catch ex As Exception
Return 0
Finally
conn.Close()
End Try
End Function
|
| 05.12.2008 at 11:59AM PDT, ID: 21549590 |
| 05.12.2008 at 12:08PM PDT, ID: 21549654 |
| 05.14.2008 at 12:25PM PDT, ID: 21567786 |
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: |
VB
Public Shared Function writeBasketTotal(ByVal UID As Integer) As Decimal
Dim connStr As String = ConfigurationManager.AppSettings("connStr")
Dim conn As New MySqlConnection(connStr)
Dim cmd As New MySqlCommand
Dim q As MySqlParameter
Dim dsReturn As Decimal
Try
conn.Open()
cmd.Connection = conn
cmd.CommandText = "sp_select_basket_total"
cmd.CommandType = CommandType.StoredProcedure
cmd.Parameters.Add("?inUID", UID).Direction = ParameterDirection.Input
q = cmd.Parameters.Add("?q", MySqlDbType.Int32)
q.Direction = ParameterDirection.Output
cmd.ExecuteScalar()
dsReturn = q.Value
Return dsReturn
Catch ex As Exception
Return 0
Finally
conn.Close()
End Try
End Function
MYSQL SP
select sum(price*qty) into q from basket where uid = inUID group by uid
IN inUID INT, OUT q DECIMAL(20,4)
|