Visual Basic

Re: google maps in vb6 application

22-Dec-11 3:39

You can't use Google Maps without an internet connection.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

Eddy Vluggen23-Dec-11 7:31

Eddy Vluggen

23-Dec-11 7:31

Preeti1979 wrote:
Please help.

This is going to hurt, but it's for your own good.

First off all, VB6 is deprecated. It's no longer supperted by Microsoft. It's kicked the bucket, it's shuffled off it's mortal coil, run down the curtain and joined the bleedin' choir invisibile!!

You can use the Microsoft Interop Forms Toolkit[^] to migrate at your own pace. You can extend VB6 applications using .NET code (means you can write new code in .NET and call it from VB6), giving you access to all kinds of .NET goodies like the WebBrowser component, the PropertyGrid control and the EntLib.

Second, you'll need to use something else than a SaaS provider, as they always require internet-access.

Third, you specified what technologies you're interested in, not what you are trying to achieve. You get more usefull replies if you state what you're trying to achieve. Like, if you're looking for longitude and latitude for a specific country, we could advise an alternative like GeoNames[^].

I bet you need maps in a local database.

Bastard Programmer from Hell Suspicious | :suss:

How to read relational databases

Chris_B8421-Dec-11 7:28

Chris_B84

21-Dec-11 7:28

Hi. I am fairly new to VB. I am familiar with reading and writing to a flatfile database in VB and binding it with a datagrid but I have the following problem. I have googled it but couldnt find anything useful. It is a web application.

This was a technical test I had to complete at home in a 2 hour timeframe, for a job application. The 2 hours were from this morning and I already emailed back my attempt. However, I'm still trying to complete the task so that I can learn for future reference as I'm sure I'll encounter relational databases again.

The following are the two tables and their fields:

EMPLOYEE: Payroll (pri key), firstname, surname, department
DEPARTMENT: number (pri key), departmentname, manager

In the EMPLOYEE table, the department is the foreign key to the number in the DEPARTMENT table.

In the DEPARTMENT table, the manager is the foreign key to the payroll in the EMPLOYEE TABLE.

---------------------------------------------

On my form, I have a drop down list which displays the departmentnames from the DEPARTMENT table (these are retail, warehouse and management).

I also have a button and a gridview. When the button is clicked, the gridview should display records from the EMPLOYEE. It should only show the employees who work in the department that was selected in the datagrid. I have the following code at the start of the class:

Dim con As SqlConnection
Dim dsDept As New DataSet
Dim dsEmployee As New DataSet
Dim daDept As SqlClient.SqlDataAdapter
Dim daEmployee As SqlClient.SqlDataAdapter
Dim sqlDept As String
Dim sqlEmployee As String

And I have this code on my button:

con = New System.Data.SqlClient.SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\CivicaDB.mdf;Integrated Security=True;User Instance=True")

con.Open()
sqlDept = "SELECT * FROM Department"
daDept = New SqlClient.SqlDataAdapter(sqlDept, con)
daDept.Fill(dsDept, "Department")
con.Close()

Dim currentRow As Integer
currentRow = 0

Dim cmd As New SqlCommand

For Each DataRow In dsDept.Tables("Department").Rows
       If dsDept.Tables("Department").Rows(currentRow).Item("Name") = DropDownList1.SelectedValue Then

                Dim correctDept As Integer
                correctDept = dsDept.Tables("Department").Rows(currentRow).Item("Number")

                con.Open()
                sqlEmployee = "SELECT * FROM Employee WHERE Department =" & Convert.ToString(correctDept) & ";"
                daEmployee = New SqlClient.SqlDataAdapter(sqlEmployee, con)
                daEmployee.Fill(dsEmployee, "Employee")
                GridView1.DataSource = dsEmployee
                GridView1.DataBind()
                con.Close()

            End If

            currentRow = currentRow + 1
Next

Thanks for any help given Smile | :)

Re: How to read relational databases

Framework .l.21-Dec-11 15:27

Framework .l.

21-Dec-11 15:27

well, if you use VB.NET 2010, then this is the example code to fill binded datagrid.

Private StaffAdapter As New Objects.DataAdapters.StaffAdapter()

        Private Sub Staff_Load(sender As Object, e As System.EventArgs) Handles Me.Load
            Me.LoadData()
        End Sub

Public Sub LoadData()
            Me.LoadData(0)
        End Sub
        Public Sub LoadData(ByVal Id As Long)
            Me.DataSet.Staff.Rows.Clear()
            Me.StaffAdapter.FillStaff(Me.DataSet.Staff)

            If ID <> 0 Then
                Me.StaffBindingSource.Position = Me.StaffBindingSource.Find("IdStaff", Id)
            End If
        End Sub

and this one is my class

Public Sub FillStaff(ByVal Table As DataTable)
            Dim cnn As New SqlConnection([Global].Variables.Config.Connection.String)
            Dim cmd As SqlCommand = cnn.CreateCommand()
            cnn.Open()

            cmd.CommandText = "select * from Staff"
            Table.Load(cmd.ExecuteReader())

            If cnn IsNot Nothing Then
                cnn.Dispose()
            End If
            If cmd IsNot Nothing Then
                cmd.Dispose()
            End If
        End Sub

modified 21-Dec-11 21:37pm.

Sourcecode for control Scanner

Muhammad Riadi20-Dec-11 3:01

Muhammad Riadi

20-Dec-11 3:01

Dear brothers please send me the source code to control a scanner
to my email
matrixcombination@gmail.com
please, i really need it for the final assignment

Re: Sourcecode for control Scanner

Dave Kreskowiak20-Dec-11 3:32

Re: Sourcecode for control Scanner

20-Dec-11 3:32

Muhammad Riadi wrote:
final assignment

You want someone to give you code to turn in as your own work?? That's not going to happen.

I suggest you start Googling to solve your problem since you didn't bother to tell use what part of this you're having a problem with.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

Smithers-Jones20-Dec-11 22:52

Smithers-Jones

20-Dec-11 22:52

Muhammad Riadi wrote:
Dear brothers please send me the source code to control a scanner

to my email

matrixcombination@gmail.com

please, i really need it for the final assignment

Wow, trying to cheat under your real name? How stupid is that? You know, that your teachers/tutors might be reading this? And they will put two and two together.

By the way, enjoy the waves of spam that will fill your inbox now.

"I love deadlines. I like the whooshing sound they make as they fly by." (DNA)

modified 21-Dec-11 8:30am.

How to delete record from DataGrid control VB

rizaky201119-Dec-11 14:35

rizaky2011

19-Dec-11 14:35

I have a problem in make a VB program using DataGrid control..
What i wanna do is delete record from DataGrid and effect database i made,i use Access as database..
thank you for attention..

Dave Kreskowiak20-Dec-11 3:33

20-Dec-11 3:33

There are examples of this all over the web. Just Google for "VB.NET OledbCommandBuilder delete".

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

rizaky201120-Dec-11 19:12

rizaky2011

20-Dec-11 19:12

but i use VB6 not VB.Net

Dave Kreskowiak21-Dec-11 1:38

21-Dec-11 1:38

Then it should be very easy to modify the search term in Google. The problem is VB6 support is waning and I'm in the business of supporting it anymore.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

qyasn20-Dec-11 23:24

qyasn

20-Dec-11 23:24

Set DataGrid1.DataSource = rs
...

rs.Delete
rs.Update

does it work?
I've been a long time do not use DataGrid control,
I prefer to use MstGrid instead of DataGrid.

Oracle forms 10g

Member 380338516-Dec-11 21:06

Member 3803385

16-Dec-11 21:06

Hi;
Whether it is Possible to convert Oracle forms 10g to Vb.net 2005 or 2008,pls help us
Thanks

Re: Oracle forms 10g

Dave Kreskowiak17-Dec-11 3:33

17-Dec-11 3:33

Start by reading these[^].

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

Saving rtf-file

jtpaa15-Dec-11 20:00

jtpaa

15-Dec-11 20:00

Hello

Is it possible to save richtextbox-text so, that the page is in landscape format ?

Rtf-file contains parameters of page settings and I have tried to modify those parameters, but with no success.

I have not been able to set those parameters at all. Is it so that richtextbox does not allow to set Richtextbox.rtf - value ?

I have tried to modify rtf-code by setting the "\landscape" or "\lndscpsxn" parameters into rtf-code by:

MyRtb.rtf = "{\rtf1\...
or
MyRtb.selectedrtf = "{\rtf1\...

Those lines don't change MyRTb.rtf value. What's wrong ?

Framework .l.15-Dec-11 20:31

Framework .l.

15-Dec-11 20:31

you're using windows form richtextbox?

jtpaa15-Dec-11 20:35

jtpaa

15-Dec-11 20:35

Yes, Windows form RichTextBox.

Framework .l.15-Dec-11 22:02

Framework .l.

15-Dec-11 22:02

check here..
http://lmgtfy.com/?q=Save+RFT+file+in+landscape+%2B+A4+mode%3F[^]

Richard MacCutchan15-Dec-11 22:34

Richard MacCutchan

15-Dec-11 22:34

You managed to spell "RTF" wrong.

Unrequited desire is character building. OriginalGriff
I'm sitting here giving you a standing ovation - Len Goodman