Visual Basic

Re: Rich Text Box [modified]

5-Oct-07 8:13

There's a problem with that. There is no "column 2". The RTB doesn't have columns, just lines, which can span multiple visible rows in the RTB and characters in that line.

For instance, in the RTB, this is one line (if there is no carriage return entered anywhere in the text):

--This is one line. This is one line. This is one
line. This is one line. This is one line. This is
one line. This is one line. This is one line. Thi
s is one line. This is one line. This is one line
. This is one line. This is one line. This is one
 line. This is one line. This is one line. This i
s one line. This is one line. This is one line.[ENTER]

Now, your code could go through every line in the RTB and highlight the second character of each line, but in the above example, only one character would get highlighted, the second one on the first row of characters. Line two doesn't begin until after the [ENTER].

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Socheat.Net6-Oct-07 4:26

Socheat.Net

6-Oct-07 4:26

Below are my codes
Dim Position As Integer = Me.RichTextBoxMy.SelectionStart
Dim Line As Integer = Me.RichTextBoxMy.GetLineFromCharIndex(Position) + 1
Dim Col As Integer = Position - Me.RichTextBoxMy.GetFirstCharIndexOfCurrentLine + 1

Codes above I can get Column and Line from RTB

If i have many line and if I focus in one line that i can get from RTB, do you know how to highlight background for that line only, if cursor move to other it will highlight other too.

Would you mind give me a example code?

Thanks

-- modified at 10:45 Saturday 6th October, 2007

Socheat

Project Guideline

Sarfaraj Ahmed5-Oct-07 4:25

5-Oct-07 4:25

Hello Everybody
Im doing a Library Project for my college. Need some guideline follows.........

Is it possible all information contain a MDIParent page, Like when I click AddNewMember then the frmAddNewMember form will be appear on (MDIParrent Dock Fill) after fill up this form a confirmation page will be come with a NewMemberID which will be appear on (Dock Fill). If you have a look on Microsoft Office Outlook then you will understand what I want to do.

Any instruction will be really helpful.

Sarfarj Ahmed

Dave Kreskowiak5-Oct-07 8:15

5-Oct-07 8:15

From the description, you don't need an MDI app to do this.

Sarfaraj Ahmed wrote:
If you have a look on Microsoft Office Outlook then you will understand what I want to do.

I use Outlook and, no, I still have no idea what you want to do other than fill in the fields of a form. Why would you want to use an MDI form to do this?

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Sarfaraj Ahmed6-Oct-07 17:38

6-Oct-07 17:38

Thanks,
I have Designed my project
I have two panel on my project. Left panel contain manu like add newMember, newBook, borrowBook, returnBook etc. When I will click any option then Right Panel will fill that information like newMemberRegister form, borrowBook form.

like function newMember()
when I will call this function then Right Panel will fill frmNewMember

any idea?

Thanks
Sarfaraj

Sarfarj Ahmed

Dave Kreskowiak7-Oct-07 3:01

7-Oct-07 3:01

You don't need an MDI form to do this. Among newbies, MDI is probably the second most abused idea, next to using a PictureBox to draw everything.

Make up your forms as normal. When you need to create a form and show it in the panel, you do something like this:

Dim currentForm As New BorrowBookForm()
currentForm.TopLevel = False
RightSidePanel.Controls.Add(currentForm)

You'll have to manage keeping only one form in that panel and destroying the previous form before putting the new one in the Panel. This is because if you don't, you'll run the system out of resources due to exhaustion of the handle pool.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Sarfaraj Ahmed8-Oct-07 1:55

8-Oct-07 1:55

Dear Dave
what I done is , I have add two form on the project form1 and form2

form on:
I have taken two panel panel1 and panel2
On panel1 i have add a button and panel2 is empty. On button click event i wrote code you given

Dim currentForm As New form2()
currentForm.TopLevel = False
panel2.Controls.Add(currentForm)

But can't see the form2 on panel2. waiting for your reply

Sarfarj Ahmed

Dave Kreskowiak8-Oct-07 4:34

8-Oct-07 4:34

So much for the ability to do research...

currentForm.Show()

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Sarfaraj Ahmed8-Oct-07 23:08

8-Oct-07 23:08

Dave
Thanks a lot. it does work. Dave I got question, Im doing a Library Mangement Project and it has to be desktop and internet based. Basically Member can login on internet, they can view their report. But in the library it has to be really fast. Also I have to maintain same server for desktop and internet. library will get Intranet connection and member will get internet connection.
wot your suggestion
waiting for your reply

Sarfarj Ahmed

Dave Kreskowiak9-Oct-07 1:46

Creating custom property like TextAlign,BorderStyle for runtimeControls

9-Oct-07 1:46

Sarfaraj Ahmed wrote:
wot your suggestion

Suggestion for what??

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

VB 8.05-Oct-07 2:30

VB 8.0

5-Oct-07 2:30

Thanks For Replying ,

Hi , now i am using my own custom propertygrid for runtime controls when i am clicking on textbox it is showing properties . I am showing font,backcolor,location ,like some properties

1) How to create the wordwrap,TextAlign properties .

2) Now the problem arises with borderstyle ,Multiline and some other Properties while selecting textbox, I am not able to set these properties .These are not there by default for runtime ctr.I created the properties for borderstyle,. I dont know how to create the property for TextAlign . NOt Coming with (System.Win.Forms.TextboxBase)
.Dim ctr as control --- TRhen i am getting properties butnot borderstyle,textalign ,etc

3) In PropertyGrid1_PropertyValueChanged , i am writing like this

Case "Font"<br />
ctr.Font = e.ChangedItem.Value<br />
Select Case e.ChangedItem.Label<br />
<br />
Case "BackColor"<br />
ctr.BackColor = e.ChangedItem.Value<br />
<br />
Case "BorderStyle"<br />
if ctype(sender,TextBox) then '''Borderstyle not coming <br />
ctr.BorderStyle( Not Coming) = e.ChangedItem.Value <br />
<br />
Dim ctr As New TextBox ''If i use like this only borderstyle is coming "<br />
ctr.BorderStyle( Coming) = e.ChangedItem.Value ' but Not working

waiting For Reply ......

DVSriram

Re: Creating custom property like TextAlign,BorderStyle for runtimeControls

visualhint5-Oct-07 4:16

visualhint

5-Oct-07 4:16

Hi,

I am not sure about your problem. If I create a form with a textbox and a PropertyGrid, all the textbox properties that you mentioned are in the grid. I see no issue.
Also what do you mean by "custom PropertyGrid" ?

Best regards,

Nicolas Cadilhac @ VisualHint
Smart PropertyGrid.Net
Microsoft PropertyGrid Resource List
Free PropertyGrid for MFC
Smart FieldPackEditor.Net / DateTimePicker

Send mail using gmail

Soumyadipta5-Oct-07 2:03

Soumyadipta

5-Oct-07 2:03

I am using the following code to send mail but it fails with message below

System.Web.HttpException: Could not access 'CDO.Message' object. ---> System.Reflection.TargetInvocationException: Exception has been thrown by the target of an invocation. ---> System.Runtime.InteropServices.COMException (0x80040213): The transport failed to connect to the server.

/////////////////////////////// Code //////////////////////////////////////////////////////////

Imports System.Web.Mail
Public Class Form1
Inherits System.Windows.Forms.Form

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim oMsg As MailMessage = New MailMessage

oMsg.From = "from@gmail.com"
oMsg.To = "to@alumnux.com"
oMsg.Subject = "Test Mail from soumya"
oMsg.BodyFormat = MailFormat.Html

oMsg.Body = "Hellow World "

SmtpMail.SmtpServer = "smtp.gmail.com"
oMsg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpserver", "smtp.gmail.com")
oMsg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpserverport", "587")
oMsg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusing", 2)
oMsg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpusessl", "true") 'set your password here
oMsg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", "1") 'basic authentication
oMsg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername", "user@gmail.com") 'set your username here
oMsg.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", "password") 'set your password here

SmtpMail.Send(oMsg)

oMsg = Nothing

End Sub
End Class

Re: Send mail using gmail

ESTAN6-Oct-07 5:19

ESTAN

6-Oct-07 5:19

Maybe you can take a look at this article posted here at codeproject.

http://www.codeproject.com/useritems/Sending_Emails_From_GMAIL.asp

Re: Send mail using gmail

Soumyadipta10-Oct-07 19:23

Soumyadipta

10-Oct-07 19:23

Thanks a lot for your reply.I have read this tutorial and i am sure this will work work successfully but one problem is this tutorial is developed in .NET Framework 3.0 so how can do the list below:

1. Currently 1.1 is installed
2. I have downloaded 3.0 and installed it.
3. How can i switch to 3.0 without uninstalling 1.1
4. I am using visual studio 7.0

how can i get back comumn data from Data Set

Naveed7275-Oct-07 0:39

Naveed727

5-Oct-07 0:39

How can i get back column data from the dataset which i created.
The problem is that i have a table in the table second column i have some data but the table is in the dataset pl z tell me the technique how can i get it back.

Re: how can i get back comumn data from Data Set

pmarfleet5-Oct-07 1:15

pmarfleet

5-Oct-07 1:15

A DataSet has a Tables collection. A Table has a Columns collection.

Use these to get the information you need.

Paul Marfleet

I want to create an Attendance Register for My Company using VB.net

skullz_softwares5-Oct-07 0:10

skullz_softwares

5-Oct-07 0:10

Can any one help me to make a Attendance register that will record all Attandance of employees of my company. and on that basis i will generate the payroll. I have already tried a solution that will create Monthly Tables in Access example
Table name will be : EMPLOYEENAME/MONTH (ABC/FEB-07)

but this will be a lot space consuming. i want to try a diffrent solutions sample projects will be appreciated Please Help Guys.

Hefin Dsouza

Re: I want to create an Attendance Register for My Company using VB.net

Christian Graus5-Oct-07 1:11

Christian Graus

5-Oct-07 1:11

This is a pretty straight forward task. Which bit are you worried about ? you want to create one table for all employees, and another that tracks attendance.

Christian Graus - Microsoft MVP - C++

"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )

Re: I want to create an Attendance Register for My Company using VB.net

GuyThiebaut5-Oct-07 4:41

GuyThiebaut

5-Oct-07 4:41

skullz_softwares wrote:

but this will be a lot space consuming.

Okay - what it looks like you need to do is normalize your data.
This way you will keep space to a minimum and also keep duplication of data to a minimum.

So as an initial suggestion why not create two tables as follows(of course you will know the fields needed):

Employee table:
Employee ID
Employee name
address1
address2
address3
address4
address5
Tel no.
etc...

Attendance Table:
Employee ID
Date
Time start
Time End
Break time

You can then join the tables on the [Employee ID] field.
This is a start and you may need to add more tables/joins etc.

Hope this helps.

You always pass failure on the way to success.

Filling a typed dataset

steve_rm4-Oct-07 22:16

steve_rm

4-Oct-07 22:16

Hello,

VS 2005

I have a typed dataset.

I am trying to fill the typed dataset from a datset that is returned from a web service.

<br />
Me.DsOrders.customers = ws.getCustomers()<br />

However, the error message I get is: "customer table is read-only"

Is there any way you can fill a typed dataset table like this. This works fine with a untyped dataset. However, I have already done this project using typed and too late to change now.

Many thanks for an suggestions.

Steve

Re: Filling a typed dataset

Johan Hakkesteegt5-Oct-07 0:06

Johan Hakkesteegt

5-Oct-07 0:06

I won't claim to be really sure, but I'm fairly sure that the error would be different if you did it the wrong way.

The error message is straightforward enough: the table you are trying to populate is read only at the moment you try to copy in the data.

You could just try to set DsOrders.ReadOnly to false, before you fill it.

Hope it helps,

Johan

My advice is free, and you may get what you paid for.

VB DLL Question

yoya03034-Oct-07 22:08

yoya0303

4-Oct-07 22:08

How to inject a dll to exe process
The dll is compiled by vb (stand dll use Create in Visual Basic version 2)
Now i succeed inject it to a process ,but the code in the dll dont execute

my code in dll:

Public Declare Function MessageBox Lib "user32" Alias "MessageBoxA" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long
Public Declare Function GetCurrentProcessId Lib "kernel32" () As Long
Public Const DLL_PROCESS_DETACH = 0
Public Const DLL_PROCESS_ATTACH = 1
Public Const DLL_THREAD_ATTACH = 2
Public Const DLL_THREAD_DETACH = 3
Public Const MB_OK = &H0&
Public Function DllMain(hInst As Long, fdwReason As Long, lpvReserved As Long) As Boolean
Select Case fdwReason
Case DLL_PROCESS_DETACH
Case DLL_PROCESS_ATTACH
DllMain = True
MessageBox 0, CStr(GetCurrentProcessId()), "aaa", MB_OK
Case DLL_THREAD_ATTACH
Case DLL_THREAD_DETACH
End Select
End Function

Re: VB DLL Question

Dave Kreskowiak5-Oct-07 1:52