Visual Basic

Allowing Certain Keys Only

5-Dec-04 3:02

You questions would be better handled in the Embedded/Mobile Forum[^].

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Re: pocket pc problem

Mekong River5-Dec-04 3:23

Mekong River

5-Dec-04 3:23

Ali Usman wrote:
Secondly i cannt call webservice within my application please suggest me the solution i m getting
error "Unable to connect to remote server"

Try to check the information from here.[^]

Ali Usman wrote:
and
also tell me that which book is best for study in this context

Try to search at Amazon.com[^] there are a lot of book available from there.

Ali Usman wrote:
want to ask that developers currently are making which type of projects for Pocket Pc s if possible then plz send me few websites that are helpful to me.

I found one that is reliable too, it is Application Forge Mobile VB[^].

Good luck

A thousand mile of journey, begin with the first step.

APO-CEDC
Save Children Norway-Cambodia Office

Mitch F.4-Dec-04 14:03

Mitch F.

4-Dec-04 14:03

Hello,
I am having troubles allowing only certain keys to work in Visual Basic .Net 2003, using the .Net Compact Framework.

My current code is (on the KeyPress event of a TextBox):

If e.KeyChar = ChrW(110) Then 'Decimal Key
    e.Handled = True
ElseIf e.KeyChar = ChrW(46) Then 'Delete Key
    e.Handled = True
ElseIf e.KeyChar = ChrW(8) Then  'Backspace Key
    e.Handled = True
ElseIf IsNumeric(e.KeyChar) = False Then 'Number Keys
    e.Handled = True
End If

However, only the Delete and Number keys work. The keys that I do want to work are the number keys, delete, backspace, and the decimal key.

If anyone could help, it would be greatly appreciated.

Thanks

Three great things about computers:
1. Visual Basic
2. Visual Basic .Net 2002
3. Visual Basic .Net 2003

Print Preview "print button" select printer

crsimmons4-Dec-04 6:23

crsimmons

4-Dec-04 6:23

I have two questions about the print preview dialog.
(1) The MSDN talks about a "zoom" property for the print preview control. I am unable to select find or select that property?
(2) I am wanting to call printer dialog box to select a printer from the print preview dialog when the print button is hit.
Any help with either of the questions above is much appreciated.
Thank you,
Chris
_______________________________

Private Sub mnuFilePrintPreview_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuFilePrintPreview.Click
'Show Print Preview
Try

' Create TextPrint object from class that is inherited from PrintDocument, passing in text
Dim MPO As New TextPrint(GetTheText())

' Set font
MPO.Font = New Font("Tahoma", 8)

With preReport 'Print Preview Dialog
.Document = MPO 'prdReport
.WindowState = FormWindowState.Maximized
.Icon = Me.Icon
.AutoScale = True
'.zoom 'I cannot select this property?
.ShowDialog()
End With

'If preReport.ShowDialog() = DialogResult.OK Then
' 'MPO.Print()
' MsgBox("print clicked")
' 'set PrintDialog.Document
' pntDialog.Document() = MPO 'pntDialog is a printer dialog
' If pntDialog.ShowDialog = DialogResult.OK Then
' MPO.Print()
' End If
'End If

Catch ex As Exception
MessageBox.Show("Printing Problem: " & ControlChars.NewLine & ControlChars.Tab & _
ex.Message, "ERROR", MessageBoxButtons.OK, MessageBoxIcon.Information)
End Try
End Sub

Re: Print Preview "print button" select printer

crsimmons5-Dec-04 2:53

crsimmons

5-Dec-04 2:53

I found a very useful article written by Tim Patrick that answered my questions and then some... Here is the link to anyone that may be looking for "Print Preview" help also:

http://www.ftponline.com/vsm/2004_07/magazine/columns/desktopdeveloper/default.aspx

How can I cocnect TCP/IP to the Server?

ATC4-Dec-04 4:14

ATC

4-Dec-04 4:14

Hi,

I have a Server TCPIP socket open at 192.168.1.100, port 80. When I use an C++ Client application to connect it ---> It works fine!

However, when I use VB.net with:

        <br />
Dim tcpClient1 As New TcpClient<br />
Dim ipAddress As IPAddress<br />
ipAddress = Dns.Resolve("192.168.1.100").AddressList(0)<br />
<br />
Try<br />
   tcpClient1.Connect(ipAddress, 80)<br />
Catch ex As Exception<br />
   Console.WriteLine(e.ToString())<br />
End Try<br />

Compile wihout any errors, but when I execute it, it show errors!

Can any one show me how to do it right?

Many thanks,

troubles with MS.Access & ASP.NET.

gamerPotatoe4-Dec-04 0:09

gamerPotatoe

4-Dec-04 0:09

Hi guys I'm accessing MS Access database from an ASP.NET page but I can't seem to be able to delete, insert or update any row in the database. I'm tryin the ExecuteNonQuery Method of the Command bject but in all cases I get an error saying that "System.Data.OleDb.OleDbException: Operation must use an updateable query"

However retrieving records from teh same access database using executereader works just fine.

I really need to find out whats wrong here.

Re: troubles with MS.Access & ASP.NET.

Mekong River5-Dec-04 3:29

Mekong River

5-Dec-04 3:29

gamerPotatoe wrote:
System.Data.OleDb.OleDbException: Operation must use an updateable query

Try to check the information from here.[^]

A thousand mile of journey, begin with the first step.

APO-CEDC
Save Children Norway-Cambodia Office

CRystal Report

nitin_ion3-Dec-04 18:04

nitin_ion

3-Dec-04 18:04

I am trying to fill crystal report from typed dataset which has three tables and all are interlinked. When i set datasource of crystal report to that dataset and links the table in visual linking expert after doing every thing this is the code i am writing.

Dim con As SqlConnection = New SqlConnection("ConnectionString")
Dim da As SqlDataAdapter = New SqlDataAdapter("Select Statement", con)
Dim ds As DataSet = New Dataset1
Dim cr As New CrystalReport1

da.Fill(ds)
DataGrid1.DataSource = ds.Tables(3)

cr.SetDataSource(ds.Tables(3))
CrystalReportViewer1.ReportSource = cr

The datagrid is filled but crystal report is showing no results. how can i fill cr.

Datagrid !!! Urgent

syed saba3-Dec-04 16:22

syed saba

3-Dec-04 16:22

Hi,
In my current project i am using datagrid to display record from the employee table
It consist of four feild.

EmpName joiningdate Department Designation
John 14/12/90 10 Clerk
Smith 10/01/85 20 Programmer
Smith 11/05/95 20 Programmer

I need to know what column a user has selected and and the complete data of that row.
e.g. if a user select Smith then how i can take his joining date from the data grid.
ename=datagrid.text //giving me the name of the employee
rownum=datagrid.row // giving the selected row number
colnum=datagrid.col // giving the selected col number
Thanks in advance

Windowshade?

TAlvord3-Dec-04 13:32

TAlvord

3-Dec-04 13:32

Is there a way in VB6 to achieve the 'Windowshade' effect that exists on the Mac? By this I mean a way to intercept double-clicking on the TitleBar and instead of the Window expanding to MaxSize, have the client portion shrink to nothing so that only the TitleBar is showing. Double-Clicking again would restore the client area to its previous state...

Thanks,

Tim

Re: Windowshade?

Dave Kreskowiak4-Dec-04 5:52

Re: Return the highest value

4-Dec-04 5:52

It would be FAR easier to do in C++ than it would in VB6. VB6 doesn't support the hooking that would be required to pull something like this off.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Return the highest value

helpmeplease...3-Dec-04 11:11

helpmeplease...

3-Dec-04 11:11

Hello...
I need help in VB to determine the highest value between 3 data.

For example, I have 3 textboxes with numeric value.
Txt1 = 8
Txt2 = 7
Txt3 = 4

And then, I have another textbox to display the result. TxtResult
If txt1 has the highest value, then TxtResult = Txt1

Can anybody help me with the code?
Thanks.

Dave Kreskowiak3-Dec-04 12:35

Re: Return the highest value

3-Dec-04 12:35

This has all the signs of homework. Sorry, but we'll help you with YOUR code, we're not writing it for you.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

MohammadAmiry4-Dec-04 2:45

MohammadAmiry

4-Dec-04 2:45

Dave is completely right.
but in order to help you:
You should use some CONDITIONAL STATEMENTS to check which textbox has the highest value.

If...End If and Select...End Select

Can Anyone Help me with this one?

Suresh Prasad3-Dec-04 8:41

3-Dec-04 8:41

I am importing records from a ODBC Database into Access. The import works fine, except I get duplicate entries in my Access Database. I need to run this process once a week. Can anyone tell me how I can eliminate importing the duplicate entries to my Access. Thanks.

Private Sub ImportToAccess()

Dim Con1 As New ADODB.Connection
Dim Con2 As New ADODB.Connection
Dim mySQL1 As String
Dim mySQL2 As String
Dim myDSN As String
Dim mySET As String
Dim tmpTable As String

'Connection parameters for Source Database
myDSN = "DSN=Springbrook1;UID=suresh;PWD=******;"
mySET = "set schema 'pub'"
mySQL2 = "select * from customer"

'Open Source Database
Con2.Open myDSN
Con2.Execute (mySET)

'Open Destination Database
Con1.Open _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\Temp\VB Sample Codes\mcwd\Connect Program\test1.mdb;" & _
"Jet OLEDB:Engine Type=5;"

'WORKS BUT CREATES DUPLICATE RECORDS
mySQL1 = "INSERT INTO [C:\Temp\VB Sample Codes\mcwd\Connect Program\test1.mdb].[tblCustomer] SELECT (Cust_No, First_Name) FROM [odbc;DSN=Springbrook1;UID=suresh;PWD=******;].[Customer]"

Con1.Execute mySQL1

Con1.Close
Con2.Close
Set Con1 = Nothing
Set Con2 = Nothing

End Sub

Jim Matthews3-Dec-04 9:00

Jim Matthews

3-Dec-04 9:00

if you're having problems importing duplicate records then the problem is with your A.) Data or B.) database design.

you might be better off finding help in the ADO/SQL forum, or if you'd like you can post what your tables look like and i can hve a quick look for you.

-jim

Suresh Prasad3-Dec-04 10:28

3-Dec-04 10:28

Jim:

It is a simple Table with 4 fields in it. An auto ID Field, Cust No Field, First Name Field and a Entry Time Field.

tblCustomer
ID
Cust_No
First_Name
Entry_Time

Each time the code is run, a new set of data is added to my Table. What I am trying to do is just to be able to update my table. Does this clarify the question?

Thanks

Jim Matthews3-Dec-04 10:51

Jim Matthews

3-Dec-04 10:51

what is the primary key of the table? does the table you're pulling from have a primary key as well, and is the structure the same?

-jim

Suresh Prasad3-Dec-04 10:56

3-Dec-04 10:56

The primary key in both tables is Cust_No. The structure is the same. However, the infomation inthe primary table may have the same information in Primary Field, but the rest of the data may cahnge. So while importing, I need to make sure it imports the modified or new data in the secondary table. Does this helps with question?

Dave Kreskowiak3-Dec-04 12:34

3-Dec-04 12:34

In that case, you're going to need alot more code than this. You have to first check if the Cust_No exists in the table your copying this data to. If so, then you have to update that record with the new data. If not, you have to INSERT the new data.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Suresh Prasad3-Dec-04 12:38