C# to VB.net Help

[ad.hasareli]

Machanla me code aka vb.net walata convert karala dipankoo....plz loku udawak.............

      [B]   {
            DateTime old = DateTime.Now;
            TimeSpan dr = TimeSpan.FromMilliseconds(200);

            using (ObexGetStream str = session.Get(null, ObexConstant.Type.FolderListing))
            {
                ObexFolderListingParser parser = new ObexFolderListingParser(str);
                parser.IgnoreUnknownAttributeNames = true;

                ObexFolderListingItem item = null;
                List<ListViewItem> items = new List<ListViewItem>();

                while ((item = parser.GetNextItem()) != null)
                {
                    if (item is ObexParentFolderItem)
                        continue;

                    ObexFileOrFolderItem filefolderitem = item as ObexFileOrFolderItem;

                    bool isfolder = filefolderitem is ObexFolderItem;
                    ListViewItem temp = new ListViewItem(new string[] {filefolderitem.Name,
                                                                       FormatSize(filefolderitem.Size, isfolder),
                                                                       FormatDate(filefolderitem.Modified),
                                                                       FormatDate(filefolderitem.Accessed),
                                                                       FormatDate(filefolderitem.Created)},
                                                         GetIconIndex(Path.GetExtension(filefolderitem.Name), isfolder));

                    temp.Tag = isfolder;
                    temp.Name = filefolderitem.Name;
                    items.Add(temp);

                    if (old.Add(dr) < DateTime.Now)
                    {
                        old = DateTime.Now;
                        bgwWorker.ReportProgress(0, temp.Text);
                    }
                }
                e.Result = items.ToArray();
            }
        }[/B]

Online Convert kara bt hari giye nehe...

 

[ad.hasareli]

bmp

 

[rooshan2008]

bump ! dnt know this languge

 

[ad.hasareli]

bump ! dnt know this languge

thnx mcn

 

[ad.hasareli]

 

[Xxo0oxX]

Machanla me code aka vb.net walata convert karala dipankoo....plz loku udawak.............

private void ExceptionHandler(Exception ex)
        {
            ExceptionHandler(ex, true);
        }

        private void ExceptionHandler(Exception ex, bool setControlState)
        {
            MessageBox.Show(string.Format("Connection failed. Error message: {0}", ex.Message),
                            "Error",
                            MessageBoxButtons.OK, MessageBoxIcon.Error);

            if (InvokeRequired)
                this.Invoke(new EventHandler(delegate
                {
                    lsvExplorer_SelectedIndexChanged(lsvExplorer, EventArgs.Empty);
                    SetControlState(setControlState);
                }));
            else
            {
                SetControlState(setControlState);
                lsvExplorer_SelectedIndexChanged(lsvExplorer, EventArgs.Empty);
            }
        }

[/COLOR]
Private Sub ExceptionHandler(ex As Exception)
ExceptionHandler(ex, True)
End Sub

Private Sub ExceptionHandler(ex As Exception, setControlState__1 As Boolean)
MessageBox.Show(String.Format("Connection failed. Error message: {0}", ex.Message), "Error", MessageBoxButtons.OK, MessageBoxIcon.[Error])

If InvokeRequired Then
Me.Invoke(New EventHandler(Sub()
lsvExplorer_SelectedIndexChanged(lsvExplorer, EventArgs.Empty)
SetControlState(setControlState__1)

End Sub))
Else
SetControlState(setControlState__1)
lsvExplorer_SelectedIndexChanged(lsvExplorer, EventArgs.Empty)
End If
End Sub

 

[ad.hasareli]

private void ExceptionHandler(Exception ex)
{
ExceptionHandler(ex, true);
}

private void ExceptionHandler(Exception ex, bool setControlState)
{
MessageBox.Show(string.Format("Connection failed. Error message: {0}", ex.Message),
"Error",
MessageBoxButtons.OK, MessageBoxIcon.Error);

if (InvokeRequired)
this.Invoke(new EventHandler(delegate
{
lsvExplorer_SelectedIndexChanged(lsvExplorer, EventArgs.Empty);
SetControlState(setControlState);
}));
else
{
SetControlState(setControlState);
lsvExplorer_SelectedIndexChanged(lsvExplorer, EventArgs.Empty);
}
}

 

[Xxo0oxX]

waradi eka paste une dan haduwa

 

[ad.hasareli]

waradi eka paste une dan haduwa

he he.thnxxxxxx.... 4++

 

[Xxo0oxX]

he he.thnxxxxxx.... 4++

machan C walai .Net walayi function variables dana widiyayi wenasa thiyenne..

anikwa okkoma ekayi.. hodata code deka sansandanaya karala baluwoth C walin liyala tiyna dewal pata gala therum ganna puluwan..

Javascript walath samanayi

Private Sub ----- End Sub
IF ---- End IF
hama ekakma end kalata
meke
sub {

}
kin end karanne, Notepad++ install karala balanna { ke end eka lesiyen balaganna puluwan..

 

[ad.hasareli]

    {
            DateTime old = DateTime.Now;
            TimeSpan dr = TimeSpan.FromMilliseconds(200);

            using (ObexGetStream str = session.Get(null, ObexConstant.Type.FolderListing))
            {
                ObexFolderListingParser parser = new ObexFolderListingParser(str);
                parser.IgnoreUnknownAttributeNames = true;

                ObexFolderListingItem item = null;
                List<ListViewItem> items = new List<ListViewItem>();

                while ((item = parser.GetNextItem()) != null)
                {
                    if (item is ObexParentFolderItem)
                        continue;

                    ObexFileOrFolderItem filefolderitem = item as ObexFileOrFolderItem;

                    bool isfolder = filefolderitem is ObexFolderItem;
                    ListViewItem temp = new ListViewItem(new string[] {filefolderitem.Name,
                                                                       FormatSize(filefolderitem.Size, isfolder),
                                                                       FormatDate(filefolderitem.Modified),
                                                                       FormatDate(filefolderitem.Accessed),
                                                                       FormatDate(filefolderitem.Created)},
                                                         GetIconIndex(Path.GetExtension(filefolderitem.Name), isfolder));

                    temp.Tag = isfolder;
                    temp.Name = filefolderitem.Name;
                    items.Add(temp);

                    if (old.Add(dr) < DateTime.Now)
                    {
                        old = DateTime.Now;
                        bgwWorker.ReportProgress(0, temp.Text);
                    }
                }
                e.Result = items.ToArray();
            }
        }

Pin sidda wenawa machanla...mekath VB.net walata convert karala dennakooooo

 

[Xxo0oxX]

    {
            DateTime old = DateTime.Now;
            TimeSpan dr = TimeSpan.FromMilliseconds(200);

            using (ObexGetStream str = session.Get(null, ObexConstant.Type.FolderListing))
            {
                ObexFolderListingParser parser = new ObexFolderListingParser(str);
                parser.IgnoreUnknownAttributeNames = true;

                ObexFolderListingItem item = null;
                List<ListViewItem> items = new List<ListViewItem>();

                while ((item = parser.GetNextItem()) != null)
                {
                    if (item is ObexParentFolderItem)
                        continue;

                    ObexFileOrFolderItem filefolderitem = item as ObexFileOrFolderItem;

                    bool isfolder = filefolderitem is ObexFolderItem;
                    ListViewItem temp = new ListViewItem(new string[] {filefolderitem.Name,
                                                                       FormatSize(filefolderitem.Size, isfolder),
                                                                       FormatDate(filefolderitem.Modified),
                                                                       FormatDate(filefolderitem.Accessed),
                                                                       FormatDate(filefolderitem.Created)},
                                                         GetIconIndex(Path.GetExtension(filefolderitem.Name), isfolder));

                    temp.Tag = isfolder;
                    temp.Name = filefolderitem.Name;
                    items.Add(temp);

                    if (old.Add(dr) < DateTime.Now)
                    {
                        old = DateTime.Now;
                        bgwWorker.ReportProgress(0, temp.Text);
                    }
                }
                e.Result = items.ToArray();
            }
        }

Pin sidda wenawa machanla...mekath VB.net walata convert karala dennakooooo

If True Then
Dim old As DateTime = DateTime.Now
Dim dr As TimeSpan = TimeSpan.FromMilliseconds(200)

Using str As ObexGetStream = session.[Get](Nothing,

ObexConstant.Type.FolderListing)
Dim parser As New ObexFolderListingParser(str)
parser.IgnoreUnknownAttributeNames = True

Dim item As ObexFolderListingItem = Nothing
Dim items As New List(Of ListViewItem)()

While (InlineAssignHelper(item, parser.GetNextItem())) IsNot Nothing
If TypeOf item Is ObexParentFolderItem Then
Continue While
End If

Dim filefolderitem As ObexFileOrFolderItem = TryCast(item,

ObexFileOrFolderItem)

Dim isfolder As Boolean = TypeOf filefolderitem Is ObexFolderItem
Dim temp As New ListViewItem(New String() {filefolderitem.Name,

FormatSize(filefolderitem.Size, isfolder), FormatDate(filefolderitem.Modified),

FormatDate(filefolderitem.Accessed), FormatDate(filefolderitem.Created)}, GetIconIndex

(Path.GetExtension(filefolderitem.Name), isfolder))

temp.Tag = isfolder
temp.Name = filefolderitem.Name
items.Add(temp)

If old.Add(dr) < DateTime.Now Then
old = DateTime.Now
bgwWorker.ReportProgress(0, temp.Text)
End If
End While
e.Result = items.ToArray()
End Using
End If

harida danne na habayi balapan wadada kiyala mun run karenam na

 

[ad.hasareli]

harida danne na habayi balapan wadada kiyala mun run karenam na

wede ne ban aka nam..............

 

[ad.hasareli]

 

[ad.hasareli]

 

[ad.hasareli]

 

[ad.hasareli]

 

[kamprasad2007]

Use this link

http://www.developerfusion.com/tools/convert/csharp-to-vb/

This work correctly.

 

[ad.hasareli]

Use this link

http://www.developerfusion.com/tools/convert/csharp-to-vb/

This work correctly.

oken convert karahama machan error akak anawane

 

[ad.hasareli]

bump

thnxxxxxxxx