Visual Basic

10-Oct-06 5:20

Simple class instantiation and method calls. There's no magic going on between layers.

Dim myBusObj As New BusinessObject
myBusObj.ValidateSomeData(data)

Dave Kreskowiak
Microsoft MVP - Visual Basic

Stored Procedure

ravimorampudi9-Oct-06 23:58

ravimorampudi

9-Oct-06 23:58

Hi,

I have a stored procedure and it is returning a table as a result.
How can i call d proc & Capture table from Vb.Net using Connected arch

Thanks...

hrodberaht10-Oct-06 0:23

10-Oct-06 0:23

Hi
You can retieve data using a stored procedure in the same way as any other query. There is other (more optimal) ways to retrieve data using a SP, but this is the simplest.

Example:

'---Create Connection
Dim ConnectionString As New SqlClient.SqlConnectionStringBuilder
ConnectionString.DataSource = "localhost" 'ServerName
ConnectionString.InitialCatalog = "MyDataBase" 'DatabaseName
ConnectionString.IntegratedSecurity = True

'Open Connction
Dim Connection As New SqlClient.SqlConnection(ConnectionString.ConnectionString)
Connection.Open()

'---Create/Open Reader
Dim Reader As SqlClient.SqlDataReader
Dim Command As System.Data.SqlClient.SqlCommand = New System.Data.SqlClient.SqlCommand("MyStoredProcedureName", Connection)
Command.CommandType = CommandType.StoredProcedure 'Optional
Reader = Command.ExecuteReader

While Reader.Read
MsgBox("Field 0 :" & Reader.Item(0).ToString)
MsgBox("Field 1 :" & Reader.Item(1).ToString)
End While

'Close Reader
Reader.Close()
'Close Connection
Connection.Close()

ravimorampudi10-Oct-06 0:28

ravimorampudi

10-Oct-06 0:28

Thanks
but genarally we r use Exectenonquery() for stred proc
is tere any othre way by using nonquery

Thanks

hrodberaht10-Oct-06 0:40

10-Oct-06 0:40

ExecuteNonQuery only returns Rows Affected, and populates any Output paramters that was mapped. So this would not work well if you need a resultset.

You could use ExecuteReader/Command, or Use a DataAdapter to retrieve the data.

ravimorampudi10-Oct-06 0:24

ravimorampudi

10-Oct-06 0:24

better

Determining Object Types

hrodberaht9-Oct-06 23:52

9-Oct-06 23:52

I need to determine an objects datatype. Using TypeOf works fine when the object has been instantiated (declared as New), but otherwise (when the object is still "nothing"), it does not detect the type.

Any idea how I can detect datatypes of un-instantiated objects?.

Dave Kreskowiak10-Oct-06 5:18

10-Oct-06 5:18

Perhaps you're looking for

var.GetType()

Dave Kreskowiak
Microsoft MVP - Visual Basic

hrodberaht10-Oct-06 5:39

10-Oct-06 5:39

Hi, I've already tried that, but it seems that the object must be instantiated before you can use the GetType property.

I need to check for a limited amount of types, so I'm thinking of writing a function and use overloading with the object as parameter, which returns a text/enumrated value, indicating what type it is. Would like to figure out how VB does it behind the scenes though.

Dave Kreskowiak10-Oct-06 8:00

10-Oct-06 8:00

My bad. I was trying it on something that WAS instantiated. I just didn't know it at the time. It looks like you can't, unless you actually have an instance of the object. I've never come acrossed a case where I needed to do anything like this.

Why would you want to do this anyway?

Dave Kreskowiak
Microsoft MVP - Visual Basic

hrodberaht10-Oct-06 21:27

10-Oct-06 21:27

I have a centralized function which populates data/executes commands from SQLServer and does some exception handling etc. A parameter which will populated with information such as RowsAffected or DataReaders, is of type "Object".

When calling the function, and a SQLDataReader is used as parameter, is when I have a prob. SQLDataReaders don't have any constructors, so when the function tries to detect what type the object is (Using TypeOF()), it can't (Because its "Nothing").

In the end, I think you're right. I should problably take a different approach.

Thanks for your help in any case.

Dave Kreskowiak11-Oct-06 1:54

11-Oct-06 1:54

Oh man, this gets ugly! A much better approach is to "un-generalize" it. Overloaded functions would work much better. You can still combine the common stuff between different versions of this, like a method to just call a stored proc and return the result set, though.

Dave Kreskowiak
Microsoft MVP - Visual Basic

hrodberaht11-Oct-06 2:09

how can imake this functions

11-Oct-06 2:09

Overloading solves the problem. Definitely less complicated.
Thanks.

nbulut9-Oct-06 22:41

nbulut

9-Oct-06 22:41

i want to calculate trigonometric functions and factoriel and x^y
how can i do them? Confused | :confused:

please help

Re: how can imake this functions

hrodberaht10-Oct-06 0:00

10-Oct-06 0:00

Hi
These functions are available inside the .net env, by using the System.Math library.

for example:

dim Angle as double=45
msgbox Math.Tan(Angle)

AND

dim X as double=4
dim Y as double=9

msgbox Math.Pow(X,Y)

check box in VB6

kami959-Oct-06 22:30

kami95

9-Oct-06 22:30

Hi: I am beginner to VB. I defined 5 fields as Boolean in a DB file. I tried to use these fields in VB form as check boxes. My question is, how I can program these 5 fields to take a decision that if 2 or more of theme checked then makes an label to be in deferent colour.
Thank you

kami95

Kschuler10-Oct-06 8:36

Kschuler

10-Oct-06 8:36

Maybe something like this:

Dim intCount as Integer = 0<br />
If chkBox1.Checked Then intCount += 1<br />
If chkBox2.Checked Then intCount += 1<br />
If chkBox3.Checked Then intCount += 1<br />
If chkBox4.Checked Then intCount += 1<br />
If chkBox5.Checked Then intCount += 1<br />
<br />
If intCount >= 2 Then lbl.BackColor = Color.Red

kami9510-Oct-06 10:42

kami95

10-Oct-06 10:42

Thank you for your response, I tried the code …I think it will work, but I found a problem to where I put it. I mentioned here that I used this check box as a db fields so I need to refresh the function for each record
Than you in advanced

chkBox1 ID
chkBox2 Driver Licence
chkBox3 Passport No
chkBox4 Birth Certificate
chkBox5 Bank Account

Lb1 Legal -if two or more from above checked
Lb2 Illegal -if less than 2

kami95

Kschuler10-Oct-06 10:52

Kschuler

10-Oct-06 10:52

You need to put the code in an event handler that is set to fire whenever any of the five checkboxes has been checked/unchecked. It would look something like this:

Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged, CheckBox2.CheckedChanged, CheckBox3.CheckedChanged, CheckBox4.CheckedChanged, CheckBox5.CheckedChanged
    'Insert the code here  
End Sub

Hope this works for you.