MehdiAnis

To Get File Size: ============= Imports System.IO Private Function GetFileSize(ByVal MyFilePath As String) As Long Dim MyFile As New FileInfo(MyFilePath) Dim FileSize As Long = MyFile.Length Return FileSize End Function DELETE COMMAND: ============ MyFile.Delete() Make sure the file is not ReadOnly, AlreadyInUse B4 deleting, or u get exception.

I have a WinXP Developer machine with Eclipse and workplace for all my PHP projects. I also have my UbuntuLAMP server in LAN. I want to create/edit php/hetml files on my Development machine, then publish the files to UbuntuLAN server. How? More over is there an automated way to:- 1. …

[QUOTE=death_oclock;797722]This is a very minimal login script, but it should work. This: [CODE=PHP]if(($rec['username']==$userid)&&($rec['password']==$password)){[/CODE] is a strange way of checking a result; if there is a result, of course username is going to be equal to $userid. Better done by (in my opinion): [CODE=PHP]if($rec && mysql_num_rows($rec) == 1){[/CODE][/QUOTE] For small and …

Try THis: ====== Me.ComboBox1.DataSource = dt 'Can be any other table Me.ComboBox1.DisplayMember = "Type" Me.ComboBox1.ValueMember = "Type" Me.ComboBox1.Refresh()

VB .NET and C# both will last long enough. But, as a programmer we all should be adaptable to new tchnologies - as nothing lasts forever : Ya nafsi, Ya Nafsi, Ya Nafsi

You can have two different function to get ABC and XYZ. In OnButtonClick function you decide which function to call. Exsmple: Private Sub ButtonClicked_Method(..) Handles MyButton_Click If (today=sunday) then GetABC() Else GetXYZ() End If End Sub Private Sub GetABC() txtMyTextBox.Text = "ABC" End Sub Private Sub GetXYZ() txtMyTextBox.Text = "XYZ" …

A list box item has Text Member and Value Member. When you are adding item into the listbox, you have to set the TEXT property to the name of the product and VALUE propertry to the inventory number. when you do case, you case against the VALUE member like SELECT …

Dim fsInput As New FileStream(sInputFilename, _ FileMode.Open, FileAccess.Read) ... .. . 'Read the file text to the byte array. Dim bytearrayinput(fsInput.Length - 1) As Byte fsInput.Read(bytearrayinput, 0, bytearrayinput.Length) ============= The code is opening and reading a TEXT file. You have to open the file in BINARY mode and read the …

You have to have a loop to read all the rows. I am not sure about the code, but I am giving you the idea:- While Record.Read = true If TextBox1.Text = record.Fields(0).Value And TextBox2.Text = record.Fields(1).Value Then MsgBox("OKKKK") GoTo ENDING END IF Record.ReadNext LOOP MsgBox("WROOOOOOOOOOOONG!", MsgBoxStyle.Exclamation) ENDING: Record.close() END …

Have you tried the MEMO type field to save the rtf text? On the otherhand, make sure you are getting the TEXT+FORMATTING from your textbox.