Visual Basic

Re: username and password

22-Jul-07 23:25

1. first check if the username is present in the database
if so go to 2.;P
if not insert a new record in db with username and password (make username unique value in db otherwise you might have problems)

2. this is depending on wether or not you want to encrypt the password
if not you just compare 2 strings (password is saved as a readable string in db)
if txtusername.text.tolower.equals(db.username.tolower) then
if txtpassword.text.tolower.equals(db.password.tolower) then
end if
end if

if you do want to use encrypted password its a bit more difficult but I have the code somewhere if you need it I'll look for it
just let me know

hope this helps

-- modified at 9:44 Monday 23rd July, 2007

saraswathy14323-Jul-07 18:34

saraswathy143

23-Jul-07 18:34

thank you so much that helped a lot

Problem with VS 2003

Vimalsoft(Pty) Ltd22-Jul-07 22:34

Vimalsoft(Pty) Ltd

22-Jul-07 22:34

hi All
i have installed Visual Studio 2003, and have installed all packages for all languages, but am only interested in VB.NET. when i drop a textbox on my form, or when i try to run my previous Programs, it gives me the Following error,

<br />
An unhandled exception of type 'System.ArithmeticException' occurred in system.drawing.dll<br />
Additional information: Overflow or underflow in the arithmetic operation.<br />
<br />

And this Error will point to the textbox and button i dropped on the form
please

Vuyiswa Maseko

Re: Problem with VS 2003

originSH23-Jul-07 1:17

originSH

23-Jul-07 1:17

You need to provide the code thats throwing the error.

Re: Problem with VS 2003

Vimalsoft(Pty) Ltd23-Jul-07 2:11

Vimalsoft(Pty) Ltd

23-Jul-07 2:11

i have not Written a code to my Project,so i cant posts any code becode there i none.

if you can Google the Error i have sent, you will see that many people had the Problem and if you read through the threads,you will not find the solution, those thread have no solution. some say "Reinstall framework 1.1, some say its a worm. but all this happens after you install your OS from scrach(XP) and SQL2000,and a AVG antispyware.

Please Google and see the threads you will see what am talking about, one user in one thread, "Mention it as a Bug,but talked it out with out of Microsoft People and they had no answer, they think is a Conflict software install before VS or After. in my case am suspecting AVG antispyware,

Vuyiswa Maseko

How to write into the text file line by line without the space in between the line?

sweehin1822-Jul-07 21:47

Re: How to write into the text file line by line without the space in between the line?

22-Jul-07 21:47

When i write the array into the text file, it will automatically create the space in between first line and second line. Any ideas how come it behaves like this? How to write into the text file line by line without the space in between the line?

Tom Deketelaere22-Jul-07 22:32

Re: How to write into the text file line by line without the space in between the line?

22-Jul-07 22:32

can you give me you're code you use to write to the text file.
sounds to me you've added 1 vbcrlf to many in wich case you would get that behavior

sweehin1822-Jul-07 22:57

Re: How to write into the text file line by line without the space in between the line?

22-Jul-07 22:57

Here are the coding inside the class

    Dim delimiter As String<br />
            delimiter = "  "<br />
<br />
            Dim columnsplit() = Split(SplitTextLineContent, delimiter)<br />
<br />
<br />
            Dim j As Integer<br />
            Dim content As String<br />
            content = " "<br />
<br />
            For j = 0 To UBound(columnsplit)<br />
<br />
                Dim objConvertText As ConvertText 'obj means object<br />
                objConvertText = New ConvertText 'create new object from class<br />
<br />
                content += (columnsplit(j)) & " "<br />
<br />
                objConvertText.WritetoFile(content)<br />
<br />
            Next j

Here are the function:

Public Function WritetoFile(ByVal content As String)<br />
<br />
        Dim File_TO_CREATE As String = "c:\a.txt"<br />
<br />
        'declare to create the file<br />
        Dim oWrite As System.IO.StreamWriter<br />
        oWrite = System.IO.File.CreateText(File_TO_CREATE)<br />
<br />
        oWrite.WriteLine(content)<br />
<br />
        oWrite.Close()<br />
<br />
        WritetoFile = content<br />
<br />
    End Function

Tom Deketelaere22-Jul-07 23:11

Re: How to write into the text file line by line without the space in between the line?

22-Jul-07 23:11

Ok I see a few possible problems with this code:

1) for each string that you split you recreate you're textfile (you call the function writetofile in you're for lus this is not needed and will only consume rescourses
just put

sweehin18 wrote:
Dim objConvertText As ConvertText 'obj means object
objConvertText = New ConvertText 'create new object from class

sweehin18 wrote:
objConvertText.WritetoFile(content)

behind the for lus

2) in you're writetofile function you use owrite.writeline(content) this will always automaticly create a new line if you don't want this use owrite.write(content)
(this is probably the cause of you're problem)

hope this helps

Luc Pattyn23-Jul-07 2:46

Re: How to write into the text file line by line without the space in between the line?

23-Jul-07 2:46

The content string you are assembling will always start and end with a space;
splitting it by space will result in an empty first and empty last item, each generating
an empty line.

Solution: trim content variable !

Smile | :)

Luc Pattyn

try { [Search CP Articles] [Search CP Forums] [Forum Guidelines] [My Articles] }
catch { [Google] }

sweehin1824-Jul-07 8:32

Re: How to write into the text file line by line without the space in between the line?

24-Jul-07 8:32

To make the text write from first line to second line, I use VbNewLine. However, it will write from first line to third line or even fourth line. In between the line, the blank lines are exists. Even i use trim, the problem still exists. Anyone can help?

Luc Pattyn24-Jul-07 11:45

Re: How to write into the text file line by line without the space in between the line?

24-Jul-07 11:45

you start with
content = " "
why ? that's already one empty line explained

For j = 0 To UBound(columnsplit)
...
content += (columnsplit(j)) & " "
so you end on a space too
that's another empty line explained

solution: trim content variable !

Luc Pattyn

try { [Search CP Articles] [Search CP Forums] [Forum Guidelines] [My Articles] }
catch { [Google] }

sweehin1824-Jul-07 23:06

Re: How to write into the text file line by line without the space in between the line?

24-Jul-07 23:06

My program need to extract the data from certain column. For example, there is column A ,B ,C ,D over there. Orginally, the space between A and B is 2 X " " (2 blank space), space between B and C is 3X " " (3 blank space), space between C and D is 4X " " (4 blank space). I got use the coding

Dim fnaildelimiter As String
fnaildelimiter = " "
Dim fnailcolumnsplit() = Split(content, fnaildelimiter)

If i want to extract data from column A, how i shoud do it? When i use for loop like

For fnailcounter = 0 To (UBound(fnailcolumnsplit))

ColumnCotent += Trim(fnailcolumnsplit(fnailcounter))& vbNewLine

fnailcounter=fnailcounter+4' 4 is the distance from first line of column A until second line of column A. 
Next fnailcounter

It gave me different things. It will count the blank space also. Therefore, column A may have data from different column and space (which produce a lot of blank for me). U got any suggestions or different ways to do it?

Yesterday, i tried whole night until afternoon, use a lot of stupid method, still cannot extract it correctly Dead | X|

. Pls help. Sigh | :sigh:

Luc Pattyn24-Jul-07 23:33

Re: How to write into the text file line by line without the space in between the line?

24-Jul-07 23:33

Hi,

you dont seem to understand how Split works; when you split the 5-character string " A B "
(that is SPACE A SPACE B SPACE)
by spaces you get four parts: "" (that is an empty one), an "A", a "B", and "" (another
empty one).
It you first TRIM (there is a method to do that) " A B " what is left is "A B"; if you
split that by spaces you get "A" and "B", so TWO part. (two less, you are not getting the
first and last, empty, parts any more).

If this is not clear, read up on it and do some experiments; if you dont see the spaces
that well, try using another separator character (not that it matters).

Smile | :)

Luc Pattyn

try { [Search CP Articles] [Search CP Forums] [Forum Guidelines] [My Articles] }
catch { [Google] }

sweehin1824-Jul-07 23:48

Re: How to write into the text file line by line without the space in between the line?

24-Jul-07 23:48

Dim fnaildelimiter As String
fnaildelimiter = " "
Dim fnailcolumnsplit() = Split(trim(content), fnaildelimiter)

Split like the coding above Confused | :confused:

Luc Pattyn24-Jul-07 23:59

Transparencykey for runtime drawing

24-Jul-07 23:59

I will not spoon feed you any longer. You have been given all the necessary information.

If something is not clear, read up on it, do some experiments and look at the
intermediate values, not just the end result.

If that is too hard for you, I suggest you do something completely different...

Luc Pattyn

try { [Search CP Articles] [Search CP Forums] [Forum Guidelines] [My Articles] }
catch { [Google] }

error at runtime

Sonia Gupta22-Jul-07 21:19

Sonia Gupta

22-Jul-07 21:19

i was creating a class in my code behind file of form .
at the form load , i got the following error,
An error occurred creating the form. See Exception.InnerException for details. The error is: Could not find any resources appropriate for the specified culture or the neutral culture. Make sure

Sonia Gupta
Soniagupta1@yahoo.co.in
Yahoo messengerId-soniagupta1
Love is Friendship and Friendship is Love....

Ahmad Zaidi22-Jul-07 20:56

Ahmad Zaidi

22-Jul-07 20:56

Hi,

I am trying to make a user control which gives the look of a postage stamp (with jagged edges). I am doing this by overloading the OnPaint event and drawing in it. But despite specifying the pen color as transparent, the control still doesnt appear see thru where I draw the shape. I have even tried specifying the color as black and setting the container forms transparencyKey property to black. Here is the code i am putting into the OnPaint Event:

Dim graphics As Graphics = e.Graphics
Dim penWidth As Integer = 30
Dim pen As Pen = New Pen(Color.Transparent, 30)

Dim fontHeight As Integer = 10
Dim font As Font = New Font("Arial", fontHeight)

'Dim brush As SolidBrush = New SolidBrush(BackgroundColor)

'Fetch the heights and widths

Dim controlHeight As Integer = Me.Size.Height
Dim controlWidth As Integer = Me.Size.Width

Dim initialHeight As Integer = 0
Dim initialWidth As Integer = 0

Dim goLeft As Boolean = False

'Start drawing a jagged edge from the top left corner to the bottom left
While controlHeight >= 0
If goLeft = True Then
graphics.DrawLine(pen, initialHeight, initialWidth, initialHeight + 10, initialWidth + 10)
'Set them to the new starting point
initialHeight = initialHeight + 10
initialWidth = initialWidth + 10
'Now set goleft to false
goLeft = False

Else
graphics.DrawLine(pen, initialHeight, initialWidth, initialHeight + 10, initialWidth - 10)
'Set them to the new starting point
initialHeight = initialHeight + 10
initialWidth = initialWidth - 10
'Now set goleft to false
goLeft = True

End If

'Dencrement the counter
controlHeight = controlHeight - 10

End While

Thanks in advance for any help!

Re: Transparencykey for runtime drawing

Tom Deketelaere22-Jul-07 22:36