Форум   Статьи   Новости   Файлы   Bugtraq   Сниффер   Друзья   О Клубе
Вернуться   HPC / Кодинг / .NET / VB.NET
   
  Страница 1
  , 19:34   #1
Новичок
 
Регистрация: 13.01.2013
Сообщений: 1

Репутация: 0 / 0
По умолчанию Подскажите альтернативный код

Здравствуйте использую в своей программе данный код

source:
Sub Вычисления(ByVal Строка As String, ByRef Результат As String, ByRef Ошибки As String)
        Результат = ""
        Dim myCode As CodeDomProvider = CodeDomProvider.CreateProvider("VB")
        Dim myPar As New CompilerParameters
        'формируем виртуальный класс, в котором будет производиться расчет
        Dim myCodeBody As New System.Text.StringBuilder()
        myCodeBody.AppendLine("Public Class MyCalculator")
        myCodeBody.AppendLine("Public Function Calc() As String")
        'TextBox1.Text.ToLower().Replace("x", TextBox2.Text) - меняем икс в формуле (TextBox1) на число указанное в TextBox2
        '.Replace(",", ".") - меняем запятые на точки, т.к. в VB в качестве десятичного разделителя используются точки
        myCodeBody.AppendLine(String.Format("Return {0}", Строка))
        myCodeBody.AppendLine("End Function")
        myCodeBody.AppendLine("End Class")
        'компилируем()
        Dim myResult As CompilerResults = myCode.CompileAssemblyFromSource(myPar, myCodeBody.ToString())
        If myResult.Errors.HasErrors Then
            'какие-то ошибки
            For i As Integer = 0 To myResult.Errors.Count - 1
                Ошибки = myResult.Errors(i).ErrorText
            Next
            Return
        End If
        'ошибок нет, выдергиваем наш класс
        Dim myAsm As Assembly = myResult.CompiledAssembly()
        Dim myCls As Object = myAsm.CreateInstance("MyCalculator", True)
        'выводим результат
        Результат = myCls.Calc()
    End Sub
Есть проблема грузит сильно комп, при обработке большого объема информации. Может есть альтернатива данному коду.
Есть вариант загружать массив, и результат получать в массиве код работает гораздо быстрей, но проблема присвоения результата своему адресату
Код устраивает тем что способен вычислять математические значения, текстовые значения, определять ложное или истинное значение.
 
Пользователь вне форума    
Наши Спонсоры
  , 04:16   #2
1nt
Постоянный
 
Аватар для 1nt
 
Регистрация: 19.11.2010
Сообщений: 733

Репутация: 141 / 2
По умолчанию

Насколько большой объем информации, после которого начинает проявляться нагрузка? В количестве символов. И какая строчка кода способствует нагрузке?
А о каком массиве идет речь в случае "работает гораздо быстрей"? Параметр Строка передаешь как String[]?
__________________
[B][COLOR="Red"][URL="https://hpc.name/showthread.php?t=26401#post284052"]Кейлогер актуален[/URL][/COLOR][/B]
Пользователь вне форума    
 

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Статья] XSS [Mega Big Bug] M@ZAX@KEP Сайты, Форумы, CMS 217 16.11.2016 10:41
[Статья] Пишем Backdoor на Visual Basic 6 qazwsx234 Basic 5 17.06.2012 12:02
SQL injection полный FAQ deihack Сайты, Форумы, CMS 0 21.01.2012 12:16
Коды ошибок Windows REGION66 Новичкам 1 08.12.2010 23:53
[Обзор] Ошибки Windows Sma1L Новичкам 1 14.10.2010 21:59



Часовой пояс GMT +2
Powered by vBulletin® 3.x.x Copyright ©2000 - 2012, Jelsoft Enterprises Ltd.

Copyright © 2008 - 2013 «HPC» Реклама на сайте Правила Форума Пользовательское соглашение Работа на сайте
При копировании материалов ставьте ссылку на источник
Все материалы представлены только в ознакомительных целях, администрация за их использование ответственности не несет.