Вопросы с тегами [vb.net]

0

голосов
0

ответ
7

Просмотры

VB.NET, как сохранить Z-порядок окон моего окна форм в приложении?

У меня есть приложение, которое открывается во время выполнения 8 окон, каждый график. Как сохраняется Z-порядок 8 окон по отношению друг к другу? Мои коллеги сотрудники используют это приложение и растягивать и двигаться вокруг окон, и когда они положили одно окно над другим, я хочу восстановить этот Z-порядок при загрузке. Упорно расположение, размеры (W & H) и WindowState работает. Я попробовал GetChildIndex (), но при построении времени я получаю «GetChildIndex () не объявлен».
Doug Null
0

голосов
0

ответ
23

Просмотры

Is there any way I can sort a this table using 'ORDER BY'?

У меня есть таблица «Учетные записи», которая содержит учетную запись группы (isgroup) с субсчета (groupcode): | код | название | groupcode | isgroup | GroupIndex | | ------ | ---------------- | ----------- | --------- | --- --------- | | 100 | Текущие активы | | 1 | 0 | | 101 | Денежные средства | 100 | 1 | 1 | | 102 | AR | 100 | 1 | 1 | | 103 | Недвижимость | | 1 | 0 | | 104 | Баланс | | 1 | 0 | | 105 | Денежные средства в кассе | 101 | 1 | 2 | | 106 | Денежные средства в банке | 101 | 1 | 2 | | 107 | Мой Банк 1 | 106 | 0 | 3 | | 108 | Cahier 1 | 105 | 0 | 3 | | 109 | Здание 1 | 103 | 0 | 1 | Заметки: Там нет никакого стандартного способа генерации кода «». Это может быть любой (текст) Любая учетная запись может иметь столько счетов суб определяются «isgroup» и «groupcode». «Isgroup» определяет, является ли учетная запись может иметь субсчета. «GroupIndex» определяет вспомогательный уровень учетной записи. Индекс п (0) является верхним уровнем, его субсчет будет индекс п + 1 мне нужно сортировать его, как это: | код | название | groupcode | isgroup | GroupIndex | | ------ | ---------------- | ----------- | --------- | --- --------- | | 100 | Текущие активы | | 1 | 0 | | 101 | Денежные средства | 100 | 1 | 1 | | 105 | Денежные средства в кассе | 101 | 1 | 2 | | 108 | Кассир 1 | 105 | 0 | 3 | | 106 | Денежные средства в банке | 101 | 1 | 2 | | 107 | Мой Банк 1 | 106 | 0 | 3 | | 102 | AR | 100 | 1 | 1 | | 103 | Недвижимость | | 1 | 0 | | 109 | Здание 1 | 103 | 0 | 1 | | 104 | Баланс | | 1 | 0 | Счет верхнего уровня и его подпункты счета до н уровне должно отображаться первым, затем следующий верхний уровень учетной записи. Я выполнил задачу на уровне приложений с помощью рекурсивной функции и добавить Ряды один за другим к DataTable. Есть ли способ, я могу сортировать эту таблицу на уровне базы данных?
Melvin
1

голосов
0

ответ
33

Просмотры

Puzzling Output When Reading Memory Address In VB

Id) дим BytesRead As Integer = 0 Тусклое буфер As Byte () = Новый байт (23) {} «Адрес в этой строке жестко закодирован. Используйте то, что подходит для вашей ситуации. ReadProcessMemory (CInt (processHandle), 117317672, буфер, buffer.Length, BytesRead) МздВох (Encoding.Unicode.GetString (буфер)) End Sub End Class Это выводит 2 или 3 странные японские символы, то адрес "117317672" является "06FE2028" в десятичной системе счисления. Я думаю, что это не нравится, как я даю ему адрес, как я должен поставить в адрес? GetString (буфер)) End Sub End Class Это выводит 2 или 3 странные японские символы, то адрес "117317672" является "06FE2028" в десятичной системе. Я думаю, что это не нравится, как я даю ему адрес, как я должен поставить в адрес? GetString (буфер)) End Sub End Class Это выводит 2 или 3 странные японские символы, то адрес "117317672" является "06FE2028" в десятичной системе. Я думаю, что это не нравится, как я даю ему адрес, как я должен поставить в адрес?
NexusEyes
1

голосов
1

ответ
121

Просмотры

Остановка Основная тема с MessageBox

Я запрос к базе данных на отдельный поток и создать MessageBox для пользователя. Я хочу, чтобы пользователь, чтобы остановить то, что он делает, и отвечать на MessageBox. С моим кодом ниже, окно сообщения оленья кожа даже всплывают поверх текущего окна. Пользователю необходимо нажать на панели задач, чтобы увидеть его. Как я могу получить его, чтобы прервать основной поток? Dim Кнопка = значок MessageBoxButton.YesNo Dim = MessageBoxImage.Information дим результат = MessageBox.Show ( "Привет", "Title", кнопка, иконка) Select Case результат Case MessageBoxResult.Yes queryInProgress = 0 cashTransfer.TransactionApproved = 1 Case MessageBoxResult.No queryInProgress = 0 cashTransfer.TransactionApproved = 0 End Select
user9199295
1

голосов
1

ответ
70

Просмотры

I can't get a Bluetrade API Private Function Call to Work

Вот их PHP Examaple. Вы можете найти всю ИПН на https://bleutrade.com/help/API $ apikey = «YOUR_API_KEY»; $ Apisecret = 'YOUR_API_SECRET'; $ Nonce = время (); $ = URI «https://bleutrade.com/api/v2/account/getbalances? apikey =». $ apikey. & нонс = '$ одноразовое значение. Знак $ = hash_hmac ( 'sha512', $ Ури $ apisecret); $ Ч = curl_init ($ URI); curl_setopt (. $ ч, CURLOPT_HTTPHEADER, массив ( 'apisign:' знак $)); // Вы можете добавить подпись в конце Ури, если вы предпочитаете: & apisign = ... $ execResult = curl_exec ($ ч); $ OBJ = json_decode ($ execResult); Ниже мой VB код Dim sApiKey As String = "Введите ключ API" Dim sApiSecret As String = "Enter API Секретный ключ" Dim Сури As String = «https://bleutrade.com/api/v2/account/getbalances?apikey= "
Shawn
1

голосов
1

ответ
36

Просмотры

MySql - необработанное исключение типа «System.InvalidOperationException» произошло в System.Data.dll

Я использую базу данных MYSQL для этого ... Я получаю следующую ошибку ... Пожалуйста, кто-нибудь может мне помочь? Импорт System.Data Импорт MySql.Data Импорт MySql.Data.MySqlClient Public Class formLogin Dim connStr As String = "Сервер = локальный; пользователь = корень, база = ssknet; порт = 3306; пароль =;" Dim соединение As New MySqlConnection (connStr) Private Sub btnLogin_Click (отправителем как объект, е Как EventArgs) Ручки btnLogin.Click connection.Open () Dim ЦМД As New MySqlCommand ( "SELECT * FROM пользователя, где имя пользователя = @ имя пользователя и пароль = @ пароль », подключение) cmd.Parameters.Add ( "@ имя пользователя", MySqlDbType.VarChar) .Value = txtUsername.Text cmd.Parameters.Add ( "@ пароль", MySqlDbType.VarChar) .Value = txtPassword.Text Dim адаптер в качестве новых MySqlDataAdapter Dim таблица As New DataTable адаптера.
ssk developer
1

голосов
0

ответ
19

Просмотры

Как работать с данными excelfile, что crerated другой программой

Как я могу сохранить экземпляр Excel (с vb.net), который открыт другой программой. пример; Я делаю экспорт в качестве exelfile из pragram А. Programm А экспортировать данные в Book1.xlsx. В этот момент я хочу, чтобы начать работать с этими данными с программой В случае, если я открываю excelfile с кодом в vb.net (xlWorkBook1 = xlApp.Workbooks.Open ( «C: \ DataBaseexcel \ oprp_Choc.xlsm», Пароль: =» пароль ") Я знаю, как это сделать, но если файл уже открыт другой программе и не сохраняются на диске. Надеюсь, что это будет достаточно ясно
edwin
1

голосов
0

ответ
56

Просмотры

Как использовать DataTable для SSRS отчета в SSRS библиотеки классов?

Привет Я создал простой класс в растворе SSRS. Открытый класс Class1 Dim таблица Как DataTable = GetTable () Функция GetTable () As DataTable 'Создать новый экземпляр DataTable. Dim таблица As New DataTable "Создание четырех типизированных столбцов в DataTable. table.Columns.Add ( "Дозирование", GetType (Integer)) table.Columns.Add ( "Drug", GetType (String)) table.Columns.Add ( "Пациент", GetType (String)) table.Columns.Add ( «Дата», GetType (DateTime)) Добавьте пять строк с этими колонками, заполненных в DataTable. table.Rows.Add (25, "Indocin", "Давид", DateTime.Now) table.Rows.Add (50, "Enebrel", "Сэм", DateTime.Now) table.Rows.Add (10, «Гидралазин », "Кристофф", DateTime. Теперь) table.Rows.Add (21, "Combivent", "Janet", DateTime.Now) table.Rows.Add (100, "Дилантин", "Мелани", DateTime.Now) Возвращение таблицы End Function End Class I может используйте эту таблицу в моем докладе? Спасибо PS: Я не хочу использовать для просмотра отчетов в проекте VB.NET, потому что я действительно хочу использовать нативные SSRS, так что я могу разработать параметры отчета регулярным образом.
BobNoobGuy
1

голосов
0

ответ
36

Просмотры

Как вставить символы в MaskedEditExtender с SendKeys?

Я создал TextBox и сопоставляется MaskedEditExtender с маской = «999» в TextBox. Когда я вручную пытаться ввести альфа-символы, такие как «плохо» в TextBox MaskedEditExtender предотвращает альфа от вводимой. Это ожидаемое поведение. Когда я вставляю альфа-символы, как «Bad», используя Selenium SendKeys, «плохие» символы вставляются в TextBox. Я использую IE 11, Selenium InternetExplorerDriver 3.4 и Windows 7. Я знаю InternetExplorerDriver версии 3.51, 3.7 и 3.8 доступны. Однако эти версии вставить двойные символы в текстовые поля. Например, если я хочу, чтобы вставить «Test», затем «TTeesstt» получает вставляется в текстовое поле. Так что я понижен до 3.4. Спасибо, Ed
CoolBreeze
1

голосов
1

ответ
49

Просмотры

Adding a counter in vb.net for an sql-query output

Сейчас я работаю над простой программой в vb.net. Выберите 2 даты в daytimepicker, нажмите кнопку для SQL-запроса и сохранить результат где-то. Это прекрасно работает, но теперь я хочу, чтобы добавить счетчик на запрос. Одна колонка просто имеет 1,2,3 номера в нем, и я хочу, чтобы рассчитывать каждый из них. Маленький пример с "выходом" `ххх 1 -> 1 Количество ххх 1 -> 2 Количество ххх 2 -> 1 Количество ххх 1 -> кол-3 ххх 2 -> кол-2 ххх 3 -> 1 Количество` Этот счетчик, то должно быть добавляют к DataTable, который является результатом запроса, в качестве нового столбца. Основном номер счета. Я пытался сделать это в считывании функции SQL, но я просто получаю сообщение об ошибке, и я не знаю why..still беты я думаю. Do While myReader.Read () Результаты = Результаты и myReader.GetString ( "0") & ";" & myReader.GetString ( "1") и ";" & MyReader.GetString ( "2") & ";" & MyReader.GetDecimal ( "3") & ";" & MyReader.GetInt32 ( "4") & ";" & MyReader.GetInt32 ( "5") & ";" & ** Вот Основном мой читатель, который ставит; между всем, потому что сохранение им как .csv Если myReader.GetInt32 ( "5") = 1 Тогда nmb1 = nmb1 + 1 ** положил nmb1 на выходе»ELSEIF myReader.GetInt32 ( "5") = 2 Тогда nmb2 = nmb2 + 1 ** поместить nmb1 на выходе "ELSEIF myReader.GetInt32 ( "5") = 3 Тогда nmb3 = nmb3 + 1 ** поместить nmb1 на выходе" Else MsgBox (»
AVK
1

голосов
0

ответ
59

Просмотры

Функция пропускает шаги и сами повторы

Я в принципе есть проблема с функцией повторного запуска себя. Вот что происходит: У меня есть кнопка на моей форме Это обработчик события Click: Private Sub butSave_Click (ByVal отправитель Как System.Object, ByVal е Как System.EventArgs) Ручки butSave.Click Dim checkResult As Boolean = CheckIfSameDOExists (Me.txbNewDO .Text) Если (checkResult AndAlso duplicateDOResult = Windows.Forms.DialogResult.Yes) Тогда MessageBox.Show ( "обнаружен Дублированный номер.", "Внимание!", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1) Exit Sub ElseIf ( не checkResult AndAlso duplicateDOResult = Windows.Forms.DialogResult.No) Тогда MessageBox.Show ( "Новый рекорд не был добавлен!", "Внимание!", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton. Button1) End Try End If Return Result End Function Что происходит, когда я делаю шаг за шагом отладки в VS, я вижу код подобрались к duplicateDOResult = MessageBox.Show ( «Запись уже существует, попробуйте еще раз?», «Внимание!», MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) линии, а затем функция CheckIfSameDOExists начинает работать снова, никогда не достигая дальнейшего кода. Я не совсем понимаю, почему это будет. Button1) End Try End If Return Result End Function Что происходит, когда я делаю шаг за шагом отладки в VS, я вижу код подобрались к duplicateDOResult = MessageBox.Show ( «Запись уже существует, попробуйте еще раз?», «Внимание!», MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) линии, а затем функция CheckIfSameDOExists начинает работать снова, никогда не достигая дальнейшего кода. Я не совсем понимаю, почему это будет. никогда не достигая дальнейший код. Я не совсем понимаю, почему это будет. никогда не достигая дальнейший код. Я не совсем понимаю, почему это будет.
Yuropoor
1

голосов
0

ответ
37

Просмотры

log4net not logging to db when published - Multi Project Solution (console app)

Это вопрос, который я вижу здесь, но решения не работают. У меня есть решение несколько проектов создан как и Подошва цель «Console», чтобы запустить / остановить «контроллер», то «Controller» в Обрабатываете «Плагины». «Консоль» является консольным приложением других проектов библиотеки классов. Я просто добавил log4net в проекте «Controller» для записи журналов в базу данных. В DEBUG он работает отлично и журналы для SQL. Однако, как только встроенный в релизе, опубликованном и развернуто он не в состоянии войти. Я сохранил все log4net конфигурации в контроллеры «app.config» и знаю, что это используется, потому что «app.config» имеет некоторые другие параметры, присутствующие.
Glenn Sampson
1

голосов
1

ответ
34

Просмотры

Error Deleting a child object from its parent

I'm using vb.net 2013, Entity Framework 6 and SQL Server 2008 R2. I'm trying to delete from child entities, and this does not work. But if I try to delete directly from context, this works. In my database I have 2 tables Students and Result. This is my code that does not work : Dim context as Myentities = New myentities. Dim s as student. Dim lresult as new list (of result) s = context.students.where(Function(t1) t1.value>5).Tolist.first lresult = (from t in s.results where t.vl2=7 select t).Tolist for each rs as result in lresult if rs.vl3=11 then s.results.remove(rs) Next Context.SaveChanges This code produces an error on the last line (context.SaveChanges) : An unhandled exception of type 'System.InvalidOperationException' occurred in EntityFramework.dll Additional information: The operation failed: The relationship could not be changed because one or more of the foreign-key properties is non-nullable. When a change is made to a relationship, the related foreign-key property is set to a null value. If the foreign-key does not support null values, a new relationship must be defined, the foreign-key property must be assigned another non-null value, or the unrelated object must be deleted. But if I change the line that delete the item, like below, it works : Dim context as Myentities = New myentities. Dim s as student. Dim lresult as new list (of result) s = context.students.where(Function(t1) t1.value>5).Tolist.first lresult = (from t in s.results where t.vl2=7 select t).Tolist for each rs as result in lresult if rs.vl3=11 then context.results.remove(rs) Next Context.SaveChanges Why does my first snippet of code not work?
Adriano
1

голосов
1

ответ
35

Просмотры

how to create multi line chart with single datatable in vb.net

Я работаю над приложением vb.net, где я должен создать мульти график линии. Таблица приходит из базы данных с использованием процедуре сохранения является: - TagName Вкл Выкл Отключение Р1 0 0 1 Р2 0 1 1 Р3 0 1 0 Q1 0 1 0 Q2 1 0 1 Q3 2 2 2 W1 4 2 1 W2 2 0 1 W3 1 1 0 W4 0 1 1 W5 2 1 1 И код в vb.net я использовал, чтобы связать таблицу с именем "chTrend" является: - DS = ObjTags.GetTrendData () Если (ds.Tables (0) .Rows.Count> 0) Тогда дт = ds.Tables (0) chTrend.DataSource = дт chTrend.Series (0) .XValueMember = "тэгу" chTrend.Series (0) .YValueMembers = "О" chTrend.Series (1) .XValueMember = " тэгу»chTrend.Series (1) .YValueMembers = "Выкл" Индекс был вне диапазона. Должно быть неотрицательным и меньше, чем размер имени collection.Parameter: индекс»На chTrend.Series позиции (0) .XValueMember =„TagName“, как решить эту проблему? Индекс был вне диапазона. Должно быть неотрицательным и меньше, чем размер имени collection.Parameter: индекс»На chTrend.Series позиции (0) .XValueMember =„TagName“, как решить эту проблему?
Sunny Sandeep
1

голосов
1

ответ
171

Просмотры

getUpdates возвращает пустую коллекцию

Материал из Википедии: С длинным опросом, клиент запрашивает информацию с сервера точно так, как в обычном опросе, но с ожиданием сервер не может ответить немедленно. Если сервер не имеет никакой новой информации для клиента, когда опрос будет получен, вместо того чтобы отправить пустой ответ, сервер держит запрос открытым и ждет ответ информации, чтобы стать доступной. После того, как у него есть новая информация, сервер немедленно отправляет ответ HTTP / S для клиента, завершая открытый HTTP / S запрос. Так как же я получаю пустой массив обновлений (в основном сразу), когда я жду GetUpdatesAsync (Offset)? Не Телеграмма должна ждать, пока есть обновление, прежде чем она отвечает, или я неправильно что-то? Я пишу с предположением о том, что я выиграл» т непрерывно опрашивают сервера на петле и просто получить пустой ответ после пустого ответа. Я снова опрашивать раз результат был возвращен. Редактировать Я предполагаю, что мне нужно указать длинное значение тайм-аута.
Audiopolis
1

голосов
0

ответ
260

Просмотры

System.TypeLoadException (при доступе к стандартным 4.6.1 Визуальных библиотекам базового класса .NET из ядра ASP.Net 2.0 Web API)

У меня есть стандартный 4.6.1 Visual Basic библиотеки классов .Net и ядра ASP.Net 2.0 Web API проект, созданный с помощью C #. Я пытаюсь передать массив объектов из веб-API для функции в Visual Basic библиотеки классов и получить объект ответа. Я получаю и ошибка, System.TypeLoadException: Не удалось загрузить тип 'Microsoft.VisualBasic.Information' из сборки 'Microsoft.VisualBasic, Version = 10.0.3.0, Culture = нейтрально, PublicKeyToken = b03f5f7f11d50a3a. Является ASP.Net Ядро 2.0 не совместимы в потребляющих Visual Basic библиотека классов .NET Standard? Может кто-нибудь, пожалуйста, помогите мне в этом?
user833011
1

голосов
2

ответ
81

Просмотры

StoredProcedure выполняет в SSMS, а не в приложении VB.NET (не SqlException не выброшены)

У меня есть SQL StoredProcedure, который выполняет две INSERT INTO операции в SSMS, как и ожидалось. При выполнении этого СП в моем приложении VB.NET, она не выполняет (не SqlException брошенного в пробном блоке), но не выполняет INSERT INTO команды. Это приложение использует многочисленные SP том, что все работы без проблем. Код выглядит следующим образом: Используя (ParentMDI.dbCon) Dim SQLCMD As New SqlCommand ( "hyd_top_level_isr") С SQLCMD .CommandType = CommandType.StoredProcedure .Parameters.AddWithValue ( "@ part_num", part_num) .Parameters.AddWithValue ( "@ вопрос" , выпуск) End With Try sql.ExecuteNonQuery () Выгода экс Как SqlException If DialogResult. Да = MessageBox.Show ( "Ошибка вставки верхнего уровня ISR" и vbCrLf & vbCrLf & "Отправить отчет об ошибке?", "Workflow Error", MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation) Тогда ParentMDI.emailerrorstring = «хранимая процедура: hyd_top_level_isr "ParentMDI.emailerrormessage = ex.Message ParentMDI.ErrorEmail () End If End Try End Using Для осветления; Я вставил точки останова перед тем ExecuteNonQuery (). Суб делает выполнить ExecuteNonQuery () и параметры, передаваемые заполняются соответствующими значениями. Я также вставил RETURN в SP, чтобы вернуть SCOPE_IDENTITY (). Это возвращает пустую строку (не NULL, как я ожидал). Если какой-либо из вас нужно больше информации, пожалуйста, дай мне знать. Я буду массово признателен всем, кто может просветить меня о том, где я буду неправильно! (Это мой первый раз когда-либо с просьбой о помощи, пожалуйста, будьте добры!) :) EDIT: Извините, ребята. Я, кажется, приведет вас на неправильно. Код вставил выше меня пытается все виды различных попыток на то, чтобы решить эту проблему. То, что я выложу сейчас, что я должен выложил в первую очередь. С тем же результатом. Извините за сумбур, и спасибо за ваши попытки до сих пор ... Dim SQLCMD As New SqlCommand ( "hyd_top_level_isr", ParentMDI.dbCon) С SQLCMD .CommandType = CommandType.StoredProcedure .Parameters.AddWithValue ( "@ part_num", part_num). Parameters.AddWithValue ( "@ вопрос",
jaygale23
1

голосов
0

ответ
108

Просмотры

When Compiling VB Code with Roslyn where do I get reference?

Я хочу, чтобы иметь возможность компилировать один файл VB.Net с Рослин, каждый пример я нашел имеет различные способы, чтобы получить ссылки, используя разные API, и ни один из них будет компилировать каждую программу, которую я кормить в моем приложении. Ниже приводятся лишь некоторые из способов, которые я нашел, чтобы получить ссылки. Я не понимаю, что на самом деле требуется для компиляции ошибки программы бесплатно. Некоторые программы имеют импорт, мне нужно передать DLL файлов которые ссылаются на компилятор? Как я их найти то, что о NuGet ссылке? Некоторые из приведенных ниже примеров (например, в том числе CodeAnalysisReference) дают мне больше ошибок, чем не использует. Я не хочу, чтобы запустить файл компилируется, я просто хочу, чтобы получить ошибки диагностики. Есть ли какая-либо документация, которая объясняет, как ссылка передается Рослины работы и то, что должно быть передано? Dim CodeAnalysisReference Как MetadataReference = MetadataReference.CreateFromFile (GetType (Compilation) .Assembly.Location) Dim VisualBasicSymbolsReference Как MetadataReference = MetadataReference.CreateFromFile (GetType (VisualBasicCompilation) .Assembly.Location) Dim runtimePath As String = «C: \ Program Files (x86) \ Reference сборки \ Microsoft \ Framework \ .NETFramework \ v4.7.1 \ {0} .dll»Dim DefaultReferences As IEnumerable (Of MetadataReference) = {CodeAnalysisReference, VisualBasicSymbolsReference, MetadataReference.CreateFromFile (String.Format (runtimePath "System")) , MetadataReference.CreateFromFile (String.Format (runtimePath, "System.Core"
Paul Cohen
1

голосов
0

ответ
33

Просмотры

Есть ли способ расширения точки (или любой другой) тип с перегруженными операторами?

В цикле, в событии OnPaint, я рисую строку, используя DrawString. Перед нанесением строки, клиент прямоугольник oRect должен быть компенсирован некоторыми пикселями. Находясь в цикле, то ясно, что это смещение должно быть отменено, или они будут суммироваться. Это работает как задумано: Защищенный Overrides Sub OnPaint (е Как PaintEventArgs) ... oRect.Offset (oOffset) e.Graphics.DrawString (sText, oFont, oBrush, oRect, oStringFormat) oRect.Offset (New Point (- oOffset.X , - oOffset.Y)) ... End Sub Однако, было бы гораздо лучше, чтобы отменить смещение, просто указав оператор отрицания. Конечно, я мог идти с удлинительным именем нивелирует и применить его следующим образом: oRect.Offset (Негатив (oOffset)) Тем не менее, я хотел бы сделать это: oRect.Offset (- oOffset) Попытка указать расширение в модуль для перегруженного оператора говорит мне, что я не могу применить расширения для операторов. Есть ли другой способ расширения точки (или любой другой) тип с перегруженными операторами?
Herb
1

голосов
0

ответ
39

Просмотры

How to get data list from Query String in vb.net

На самом деле на изменениях я хочу, чтобы заполнить другие выпадающим я сделал это еще, как я могу получить данные из строки запроса передать обратно Ajax. Мой Ajax вызов ниже. $ (Документ) .ready (функция () {$ ( "# ctl00_ContentPlaceHolder1_ddlMake") изменения (функция () {Alert ( "Привет"); $ .ajax ({типа:. "POST", URL: «newvehicle.aspx / GetVehicleModels "данные: '{vehicleval:"' + $ ( "# ctl00_ContentPlaceHolder1_ddlMake") знач (+). '»}', CONTENTTYPE: "приложения / JSON; кодировка = UTF-8", Datatype: "JSON", успех : функция (ответ) {$ .each (response.d, функция (ключ, значение) {$ (» # Ctl00_ContentPlaceHolder1_ddlModel ') добавляет ($ ( "") атр. ( "Значение", значение [ "_ Id"]) текст (значение. [ "_ VehicleName"])). }); }, Недостаточность: функция (ответ) {Alert (response.d); }}); }); });
Sohail Asghar
1

голосов
0

ответ
44

Просмотры

Список (из) емкости по умолчанию превышение

Я должен десериализация файла JSON, который дает мне десериализован 130000 вложенных (GeneralInfo) объекты десериализации: Dim ALLDATA Как List (Of GeneralInfo) = JsonConvert.DeserializeObject (Of List (Of GeneralInfo)) (JStr) Объекты: Public Class FullData Public userRunID собственности по данным ULong общественной собственности Как List (Of String) ид End Class Public Class GeneralInfo публичной собственности как имя ULong публичной собственности в качестве данных Строка Public Property Как List (Of FullData) End Класс FullData.data свойство содержит 500 записей данных, разделенных;. 50 из этих записей имеют макс. 50 символов другой 450 содержат только одну цифру. Так что я бы в конечном итоге с 130000 длинного списка (GeneralInfo). Мой тест с меньшим записей была преуспевающим, но при попытке прочитать все остановки данных и дает мне пустой объект. Так что я думаю, что я достиг предела списка (), и я хотел бы, чтобы это проверить. Есть ли ограничение на List (Of), и если да, то можно расширить, так что я могу использовать мой код? Я не получаю исключение, объект просто пустой:
ruedi
1

голосов
1

ответ
53

Просмотры

Привязка Textbox, который содержится в Groupbox

У меня есть приложение Winforms с Groupbox, который, в свою очередь, содержит текстовое поле. Я считаю, что текстовое поле не будет связываться, когда заключенный в Groupbox, даже если он связывается (правильно), когда не содержится в Groupbox. Это тот случай, экспрессируется ли связывание в окне свойств или в коде. Кто-нибудь еще испытал это поведение или есть объяснение для этого? Обратите внимание, что ли текстовое поле включено или нет не имеет никакого значения. Из файла для Windows Designer.vb: Me.HearingInfoGroupBox.Controls.Add (Me.HearingTypeTextBox) {...} Me.HearingInfoGroupBox.Font = Новый System.Drawing.Font ( "Microsoft Sans Serif", 8,25 !, System.Drawing .FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType (0, Byte)) Me.HearingInfoGroupBox.Location = Новый System.Drawing.Point (17, 109) Me.HearingInfoGroupBox.Name = "
markysdad
1

голосов
0

ответ
42

Просмотры

В Visual Studio 2017, веб-сайт asp.net, я не могу добавить 64-битные библиотеки DLL и, следовательно, не может скомпилировать

У нас есть веб-сайт (не веб-приложение), работающие на IIS 7.5. Сайт использует наши собственные в доме домена специальные библиотеки (DLL). Сайт собирает, как ожидается, внутри IDE, когда мы используем 32 битную версию этих библиотек, и работает, как ожидается, на веб-сервере сайта. Но, когда мы используем 64-битные версии наших собственных библиотек, которые используют 64-битный клиент Oracle драйвера (одна DLL), в IDE (VS-2017), даже не список / ссылаться нашими библиотек внутри Ссылки разделе сайта, и, следовательно, не может составить в результате «слишком много ошибок». С другой стороны, сайт работает хорошо, и, как ожидается, на сервере сайта (потому что мы установили пул приложений позволяют 32-разрядные приложения = ложь). Таким образом, хотя сайт компилируется и работает, как ожидается, на сервере, мы не можем отладить его изнутри Visual Studio, потому что мы не можем ссылаться на наш в дом 64-битные библиотеки (которые используют 64 бит Oracle Drivers). Я рыскал в Интернет, чтобы найти способ, чтобы выбрать целевую платформу в Visual Studio, но не мог найти в любом-процессоре является единственным доступным вариантом. VS кажется автоматически целевой 32-бит и, следовательно, не признает 64-разрядные только библиотеки DLL.
gouderadrian
1

голосов
1

ответ
303

Просмотры

Недостаточно системных ресурсов для завершения запрошенной службы Visual Studio

Я написал заявление формы на основе в vb.net, используя Visual Studio 2017 - в Visual Studio он работает успешно. Однако после публикации, и при запуске приложения, я получаю сообщение об ошибке: Были обнаружены следующие сообщения об ошибках: есть + Недостаточно системных ресурсов для завершения операции. (Исключение из HRESULT: 0x800705AA) Я сделал некоторые исследования в этом и обнаружил, что отключение McAfee предотвращает эту ошибку (это имеет смысл, как предупреждение McAfee иногда выскакивает при попытке открыть программу). Однако, как я пишу это для корпорации, отключение McAfee не является вариантом. В идеале я хотел бы, как я могу получить эту ошибку. В противном случае, есть что-то я могу отключить в McAfee?
JHerk
1

голосов
1

ответ
162

Просмотры

Изменение размера многомерного массива раз

Я делаю настольную игру, где у меня есть х и у позиции на доске. Я добавляю функциональность, где пользователь может выбрать размеры платы, но есть одна проблема. Мне нужно, чтобы получить доступ к доске с помощью функции, поэтому я объявил плату за пределами моего Sub Main (). Я слышал, что вы можете использовать ReDim, но также видел это не лучшие практики? Как изменить размер 2-мерный массив внутри Sub Main () после того, как пользователь ввел размеры платы? Или я ошибаюсь, что ReDim плохая практика, когда на самом деле это хорошая практика? Благодарю.
D-A UK
1

голосов
1

ответ
129

Просмотры

Показать CheckBox на ToolStripButton

Я знаю, что ToolStripButton имеет функциональность флажка и следует использовать, когда требуется флажок на ToolStrip. Тем не менее, синий контур, который, как представляется, является единственным признаком проверяемого точно не кричать «Эй, это флажок!» для пользователей. Я мог бы поклясться, что я уже нашел способ, чтобы получить ToolStripButton показать флажок вместо изображения раньше, но, видимо, я удалил этот экземпляр после того, как я решил на другую схему пользовательского интерфейса для того, что мне нужно было его тогда; и я не могу за жизнь мне кажется, чтобы понять, как я получил это работает прежде. Может быть, все, что я сделал, это добавить изображение чека; Однако, я бы ожидать, что мои ресурсы будут по-прежнему есть изображение, которое я использовал для неконтролируемого состояния, если бы это было так.
Trevortni
1

голосов
2

ответ
37

Просмотры

Вставьте дату новой записи в базу данных с помощью ASP.NET с VB

Я работаю над проектом WebAPP. Я добавил функцию для учителя, чтобы добавить экзамены. Что мне нужно: Когда учитель добавляет новую запись экзамена с помощью DetailsView, дата должна быть автоматически вставляется в дате columnn в таблице экзаменов в базе данных. Вот код: Protected Sub DetailsView1_ItemInserted (ByVal отправитель As Object, ByVal е Как System.Web.UI.WebControls.DetailsViewInsertedEventArgs) Ручки DetailsView1.ItemInserted Dim соед As New SqlConnection () conn.ConnectionString = ConfigurationManager.ConnectionStrings ( "MCQQUIZZES") .ConnectionString Dim SQL As String = "INSERT INTO [Exams] VALUES (@Dateadded)" Dim ЦМД Как SqlCommand = New SqlCommand (SQL, Conn) cmd.Parameters.AddWithValue ( "@ Dateadded", Date.Now.ToString) соед. Открыть () cmd.ExecuteNonQuery () Conn. Close () End Sub в massege об ошибке: Имя столбца или количество предоставленных значений не соответствует определению таблицы. любая помощь??
HOD
1

голосов
1

ответ
68

Просмотры

Как представить бесконечность в колонке поплавка с помощью DataGridView? [закрыто]

Моя проблема в настоящее время является то, что у меня есть пользователи с использованием колонки типа «MaxLimit» или нечто подобное, которое должно представлять собой денежную стоимость. К сожалению, они также хотят иметь Бесконечный вариант. В настоящее время на основе старого кода, это было представлено пользователями, входящих 999999999, который является немного варварским, на мой вкус, и мне было интересно, как вы могли бы предположить, что представляет собой бесконечное значение для поплавка, который будет легко для пользователей, чтобы войти? Моя первая мысль была иметь дополнительный столбец флажок добавляется в таблицу, которая будет что-то вроде «Max Limit?» что будет работать как логическое не представлять никакого предела, а затем просто хранить значение в следующем столбце как 0 и пропуская его в случае сравнения. Еще одна мысль, чтобы использовать отрицательное значение и пропустить нормальную проверку лишь сравнением, когда значение больше 0.
Austin
1

голосов
1

ответ
46

Просмотры

NUnit can't cope with Lazy Instantiation

I have a lazily-instantiated singleton: Public Class SingletonBase(Of TDerivedClass As {SingletonBase(Of TDerivedClass)}) Private Shared ReadOnly _instance As New Lazy(Of TDerivedClass)(Function() CType(Activator.CreateInstance(GetType(TDerivedClass), True), TDerivedClass), Threading.LazyThreadSafetyMode.ExecutionAndPublication) ''' ''' Using the Singleton pattern allows the config handler to be observable ''' ''' Public Shared ReadOnly Property Instance() As TDerivedClass Get Return _instance.Value End Get End Property End Class Then a class that implements it: Public MustInherit Class ConfigurationHandlerBase(Of TDerivedConfigHandler As {SingletonBase(Of TDerivedConfigHandler)}) Inherits SingletonBase(Of TDerivedConfigHandler) and a class that implements that one: Public Class ConfigHandler Inherits ConfigurationHandlerBase(Of ConfigHandler) Private _test As String Public Shared ReadOnly Property Test as String Get Return Instance._test End Get End Property I then have an NUnit project/classes: Imports NUnit.Framework Public Class ConfigHandlerTests Public Sub Test() Dim success As ConfigHandler = ConfigHandler.Instance ' this works Dim fail as String = ConfigHandler.Test ' this fails!!! The error I get when Running the test is a NullReferenceException, and debugging the test, when it gets into the Getter of the property (Dim test As Boolean = ConfigHandler.Instance._test), hovering over Instance sometimes gives me the following error: 'Instance' threw an exception of type 'System.Threading.ThreadAbortException' Always if I try to step into that line of code, the test ends with the following stack trace: Result StackTrace: at NUnit.Framework.Internal.Reflect.InvokeMethod(MethodInfo method, Object fixture, Object[] args) at NUnit.Framework.Internal.MethodWrapper.Invoke(Object fixture, Object[] args) at NUnit.Framework.Internal.Commands.TestMethodCommand.RunNonAsyncTestMethod(TestExecutionContext context) at NUnit.Framework.Internal.Commands.TestMethodCommand.RunTestMethod(TestExecutionContext context) at NUnit.Framework.Internal.Commands.TestMethodCommand.Execute(TestExecutionContext context) at NUnit.Framework.Internal.Commands.BeforeAndAfterTestCommand.Execute(TestExecutionContext context) Result Message: Test cancelled by user I'm assuming that Nunit isn't playing nice with Lazy -- but does anyone have any idea how to resolve this?
1

голосов
0

ответ
57

Просмотры

Запрос HTTP является несанкционированным со схемой аутентификации клиента Anonymous. Заголовок проверки подлинности, полученные от сервера был «в vb.net»

Привет Я новичок в веб-сервис я получаю ниже ошибки при прохождении credtials на 3-й партии WSDLlink запрос HTTP является несанкционированным со схемой аутентификации клиента Anonymous. Заголовок проверки подлинности, полученные от сервера был «». Dim Cust Как GetCustomer.SFDCOracleICS_GetCustomerDetail_REQUESTClient = Новый GetCustomer.SFDCOracleICS_GetCustomerDetail_REQUESTClient Cust.ClientCredentials.UserName.UserName = "UserName" Cust.ClientCredentials.UserName.Password = "пароль" Cust.Open () Dim cust1 Как GetCustomer.Customer = Новый GetCustomer.Customer Dim PartyId As String = "100000009993101" cust1 = Cust.GetCustomerDetails (PartyId) дим аа = Web.Config cust1.CustomerName Cust.Close ()
Name
1

голосов
0

ответ
73

Просмотры

JetEntityFrameworkProvider запросы на один резьбовой блок запросы на других потоках

Я подключение к базе данных MS-ACCESS использования Entity Framework и JetEntityFrameworkProvider. У меня есть некоторые долго выполняющиеся запросы, мне нужно работать, так что я запускать их на нить с помощью Task.Run. Проблема я столкнулся в том, что, несмотря на то, я использую отдельный поток для запроса, и он использует собственную связь и контекст, который не используется совместно с чем-либо еще, все остальные запросы на базе должны ждать, пока сложный запрос не завершится , Ниже приведен минимальный воспроизводимый пример, который я придумал. Это конструктор для модели представления. Public Sub New (mainViewModel Как MainViewModel, MAINITEM в качестве продукта) _mainViewModel = mainViewModel Me.MainItem = MAINITEM «Этой строки фактически изменяет поведение программы», так как представление данных-привязки к поставщику. ' Читая его здесь заставляет EF, чтобы загрузить его, прежде чем начать "сложный запрос ниже. Dim п = mainItem.Supplier.Name Task.Run (Sub () Dim сопп = Новый JetConnection ($ "Provider = Microsoft.Jet.OLEDB.4.0; Источник данных = C: \ Users..mdb;") Dim контекст = Новый MyContext (Conn) Dim запрос = MessageBox.Show ($ "Количество запросов:. {query.Count}") End Sub) End Sub Таким образом, этот вид будет отображаться нормально. Но если бы я вернуться обратно к странице списка продукта, то никаких продуктов не будут отображаться до тех пор, выше запрос не завершен. Если я закомментируйте чтения имени поставщика, то этот вид будет работать точно в первый раз, но все последующие времена сам вид не будет отображаться на всех, пока запрос не завершится. Кроме того, ToListAsync не похоже на работу. Похоже, он просто выполняет синхронно. Мои вопросы: Что происходит? Почему запросы на одном потоке с использованием соединения, блокирующие запросы на другой поток, используя другое соединение? Как исправить или обойти эту проблему так долго выполняющиеся запросы могут выполняться без блокировки пользовательского интерфейса или других запросов.
ShyGuy
1

голосов
0

ответ
49

Просмотры

VB.Net doesn't recognise an active MySQL transaction

Я пишу приложение в VB.Net, который работает через MySQL ODBC 3.51 Driver с данными, хранящимися в базе данных MySQL. Попытка имитировать одновременный доступ, у меня есть MySQL Workbench открытым и мое приложение. В Workbench я заблокировать некоторые записи: начать; выберите * от tbltest, где тест, как «тест%» для обновления; В моем приложении я запрос к базе данных MySQL: SELECT COUNT (*) FROM information_schema.innodb_trx; И поскольку существует активная транзакция, я правильно вернуть «1». Я откатить транзакцию в Workbench и попробовать то же самое наоборот. На этот раз я начать транзакцию в моем приложении, с точно таким же кодом SQL: начать; выберите * от tbltest, где тест, как «тест%» для обновления; Но когда я затем запрос information_schema.innodb_trx в Workbench, я вернусь «0»: Workbench не находит активную транзакцию. Когда я изменить код к следующему, хотя, Workbench, а также мое приложение правильно найти активную транзакцию: начать; * выберите из tbltest для обновления; Как это может быть, что в первом случае моего VB.Net приложение не находит сделку, в то время как во втором случае оно делает? Может ли быть более общая проблема с драйвером MySQL ODBC? Спасибо!
Anumi
1

голосов
1

ответ
85

Просмотры

Невозможно прочитать последнюю запись из CSV-файла в VB.net

У меня есть CSV-файл в следующем формате: "Field1"; "FIELD2"; "FIELD3"; "Field4"; "Field5"; "FIELD6"; "Baby", "333333", "0100-0100", "1"; "3/2/2018"; "88888"; "Baby", "333333", "0100-0200", "2"; "3/3/2018"; "88888"; "Baby", "444444", "0100-0300", "3"; "3/4/2018"; "88888"; Мне нужно обновить таблицу транзакций и мастер-таблицу, в которой сделки и мастер-столы Field2, как общее между ними, так что для нескольких строк таблицы транзакций, должна быть только одна строка мастера, и таблица транзакция должна быть обновлена ​​первым с последующим на мастер-таблицы. Приведенный ниже код читает только 2 записи и успешно обновляет обе таблицы, но когда третья (последняя) строка читается, она просто пропускает обновление обеих таблиц. Мне нужна помощь в получении кода, чтобы обновить все записи в файле правильно. Private Sub UpdateFromFile () Dim strSql As New StringBuilder () Dim strSql1 As New StringBuilder () «Читать CSV файл Dim парсер As New FileIO.TextFieldParser (путь: = "C: \ IMPORTDATA \ TEST.CSV") С {.Delimiters = New String () { ";"}, .HasFieldsEnclosedInQuotes = True, .TrimWhiteSpace = True} Dim RowValues ​​As String () Dim PrevRowValues ​​As String () Dim PrevRefNumber As String = "" «--First строка заголовка, пропустите его parser.ReadLine () PrevRefNumber = "" Dim IsFirstTime As Boolean = True Do Until парсер.
Maklas
1

голосов
2

ответ
156

Просмотры

Селен В.Б.: OpenQA.Selenium.StaleElementReferenceException: затхлый опорный элемент: элемент не прикреплен к странице документа

Я пытаюсь нажать на элемент с помощью LinkText. Например: MyElement = driver.FindElement (By.LinkText (StoreFile)) Нажмите на доклад по имени logger.Debug ( "Report Найдено как" & myelement.Text) Если MyElement ничего после этого GoTo endTry Else myelement.Click () регистратор. Debug ( «Отчет щелкнул является» & StoreFile) End If Но, я получаю следующее сообщение об ошибке: Ошибка Is OpenQA.Selenium.StaleElementReferenceException: несвежий опорный элемент: элемент не привязан к странице документа (информация о сессии: хром = 66.0.3359.139 ) (информация Driver: chromedriver = 2.35.528161 (5b82f2d2aae0ca24b877009200ced9065a772e73), платформа = Windows NT 6.1.7601 SP1 x86_64) на OpenQA.Selenium.Remote.RemoteWebDriver.UnpackAndThrowOnError (Response errorResponse) в OpenQA.Selenium.Remote.RemoteWebDriver.Execute (String driverCommandToExecute, Dictionary`2 параметры) в OpenQA.Selenium.Remote.RemoteWebElement.Click () в ExcelAddIn1.Ribbon1.BrandReview (String ReadFile). Есть ли причина, почему она не может найти элемент, используя LinkText, даже если элемент отображается на веб-странице? Есть ли решение, чтобы решить эту проблему, пожалуйста, помогите?
shettyrish
1

голосов
2

ответ
305

Просмотры

Максимальный размер одного файла растрового?

Мне интересно знать, что максимальная ширина и высота растрового изображения независимо друг от друга. Я считаю, что максимальный размер 32768x32768, но в том, что только ссылки идеальный квадрат? Является ли 32768x32768 = 1073741824 общего количества пикселей я могу играть с и я могу изменить эти пиксели между шириной и высотой, пока общее количество не превышает? Я не получаю сообщение об ошибке, если я это сделать: Dim theBitmap, как Bitmap = New Bitmap (450, 100000) Даже если я не могу открыть изображение после того, как я сохранить его (что мне не нужно делать), я до сих пор в состоянии работать с растровым но я считаю, что что-то не совсем верно ... Конечный результат не дает ожидаемого результата ... цель того, что я делаю не имеет никакого отношения. Все, что я забочусь о том, ответы на вопросы, которые я говорил в первом пункте. Если ответ, что я ограничен 32768 на высоту, то я изменю свой код соответственно. Спасибо!
Tojanarm
1

голосов
3

ответ
59

Просмотры

Получение данных из хранимой процедуры

У меня есть хранимая процедура, как это: Выберите имя, фамилия от студента, и я не могу получить данные с VB.Net. Мой код: Dim читатель Как SqlDataReader С dbCmd .CommandType = CommandType.StoredProcedure .CommandText = "sp_myPersonalSP" End With читателя = dbCmd.ExecuteReader (), но Visual Studio отправить мне исключение, когда пытаются "читатель = dbCmd.ExecuteReader ()" : Процедура sp_myPersonalSP не имеет параметров и аргументы были поставлены. Спасибо! Я новичок в VB.Net :-(
Pippo J Carl
1

голосов
0

ответ
48

Просмотры

PromptChar для MaskedTextBox VB.NET для отображения подскажет как мм: сс

Я в состоянии использовать PromptChar свойство маски-текстового поля, добавив его программно, но я не могу иметь возможность получить дисплей PromptChar как «MM: SS» Я написал следующий код. Mtxt = Новый MaskedTextBox Mtxt.Name = "txtRTime" & ИНД Mtxt.Font = Новый шрифт ( "Arial", 8, FontStyle.Regular) Mtxt.Visible = True Mtxt.Height = 30 Mtxt.Width = 110 Mtxt.MaxLength = 4 Mtxt.Mask = «00:00» Mtxt.PromptChar = «ММ, СС» «вот мой код, но он дает о / р, как ММ: ММ вместо„ММ: СС“Mtxt.Top = 90 Mtxt.Left = 130 Mtxt.ShortcutsEnabled = False, как столкнуться с этой проблемой .... заранее спасибо
vivek padelkar
1

голосов
0

ответ
35

Просмотры

VB.NET и SQL Server | Обновление DataGridView выбранной записи с помощью события DoubleClick

У меня есть проблема в выборе данных в DataGridView, используя событие DoubleClick после того как я обновил одну запись. Я использовал хранимые процедуры в обновлении данных и представление SQL, чтобы показать другие детали выбранного идентификатора (PK). Ниже приведен код для передачи информации о выбранном ид для формирования заявки. Private Sub dgvBorrowerMasterlist_DoubleClick (ByVal отправитель Как System.Object, ByVal е Как System.EventArgs) Ручки dgvBorrowerMasterlist.DoubleClick Dim frmEdit Как Новый frmApplication Dim ДТ-New DataTable strQuery = "SELECT * FROM VLmsAppMasterlist WHERE BorrowerId = '" & dgvBorrowerMasterlist.CurrentRow.Cells (0) .Value.ToString & "'" SelectData (strQuery) Попробуйте da.SelectCommand = CMD da.Fill (дт) Если dt.Rows.Count> 0 Тогда Dim _birthDate As String Dim _assessmentTypeId As Char txtSearch. Текст = String.Empty Me.Close () CloseAllChild () frmEdit.Show () frmEdit.EditMode () frmEdit.StartPosition = FormStartPosition.CenterScreen frmEdit.lblBorrowerId2.Text = dt.Rows (0) .Item (0) frmEdit.txtLastName .Text = dt.Rows (0) .Item (1) frmEdit.txtFirstName.Text = dt.Rows (0) .Item (2) frmEdit.txtMiddleName.Text = dt.Rows (0) .Item (3) frmEdit. txtNickname.Text = dt.Rows (0) .Item (4) frmEdit.txtAddress.Text = dt.Rows (0) .Item (5) frmEdit.cbOwnership.SelectedValue = dt.Rows (0) .Item (6) frmEdit .txtContactNumber.Text = dt.Rows (0) .Item (8) И это мой код для обновления данных с помощью хранимой процедуры. ElseIf btnSubmit.Text = "Сохранить" Тогда CMD = con.CreateCommand cmd.CommandText = "SpUpdateLoanApplication" CMD. Значение = Main.lblUserId2.Text.Trim con.Open () cmd.ExecuteNonQuery () cmd.Dispose () con.Close () MessageBox.Show (Me, "Заявка на получение кредита сохранены.", "DLIC кредитование системы", MessageBoxButtons. OK, MessageBoxIcon.Information) Вызов LoadMode () Я также присоединенные скриншоты, чтобы показать точную ошибку. Pic1 показывает masterlist, где пользователь может удвоить, какую запись он / она хочет изменить. Рис 2 показывает, переданное значение, основываясь на выбранном ПК. Рис 3 показывает успех в изменении выбранной записи. Рис 4 показывает ошибку после того, как я вновь открыть masterlist и пытается выбрать другую запись, которую я хочу изменить. Pic 5 мой код для события DataGridView DoubleClick. Pic 6 представляет собой код для обновления выбранной записи с помощью SP. [Pic1] [1] [pic2] [2] [pic3] [3] [pic4] [4] [pic5] [5] [pic6] [6] Обрезка con.Open () cmd.ExecuteNonQuery () cmd.Dispose () con.Close () MessageBox.Show (Me, "Заявка на получение кредита сохранены.", "Система DLIC кредитования", MessageBoxButtons.OK, MessageBoxIcon.Information) Вызов LoadMode () Я также прилагается скриншоты, чтобы показать точную ошибку. Pic1 показывает masterlist, где пользователь может удвоить, какую запись он / она хочет изменить. Рис 2 показывает, переданное значение, основываясь на выбранном ПК. Рис 3 показывает успех в изменении выбранной записи. Рис 4 показывает ошибку после того, как я вновь открыть masterlist и пытается выбрать другую запись, которую я хочу изменить. Pic 5 мой код для события DataGridView DoubleClick. Pic 6 представляет собой код для обновления выбранной записи с помощью SP. [Pic1] [1] [pic2] [2] [pic3] [3] [pic4] [4] [pic5] [5] [pic6] [6] Обрезка con.Open () cmd.ExecuteNonQuery () cmd.Dispose () con.Close () MessageBox.Show (Me, "Заявка на получение кредита сохранены.", "Система DLIC кредитования", MessageBoxButtons.OK, MessageBoxIcon.Information) Вызов LoadMode () Я также прилагается скриншоты, чтобы показать точную ошибку. Pic1 показывает masterlist, где пользователь может удвоить, какую запись он / она хочет изменить. Рис 2 показывает, переданное значение, основываясь на выбранном ПК. Рис 3 показывает успех в изменении выбранной записи. Рис 4 показывает ошибку после того, как я вновь открыть masterlist и пытается выбрать другую запись, которую я хочу изменить. Pic 5 мой код для события DataGridView DoubleClick. Pic 6 представляет собой код для обновления выбранной записи с помощью SP. [Pic1] [1] [pic2] [2] [pic3] [3] [pic4] [4] [pic5] [5] [pic6] [6] Dispose () con.Close () MessageBox.Show (Me, "Заявка на получение кредита сохранены.", "DLIC кредитование Система", MessageBoxButtons.OK, MessageBoxIcon.Information) Вызов LoadMode () Я также присоединенные скриншоты, чтобы показать точную ошибку. Pic1 показывает masterlist, где пользователь может удвоить, какую запись он / она хочет изменить. Рис 2 показывает, переданное значение, основываясь на выбранном ПК. Рис 3 показывает успех в изменении выбранной записи. Рис 4 показывает ошибку после того, как я вновь открыть masterlist и пытается выбрать другую запись, которую я хочу изменить. Pic 5 мой код для события DataGridView DoubleClick. Pic 6 представляет собой код для обновления выбранной записи с помощью SP. [Pic1] [1] [pic2] [2] [pic3] [3] [pic4] [4] [pic5] [5] [pic6] [6] Dispose () con.Close () MessageBox.Show (Me, "Заявка на получение кредита сохранены.", "DLIC кредитование Система", MessageBoxButtons.OK, MessageBoxIcon.Information) Вызов LoadMode () Я также присоединенные скриншоты, чтобы показать точную ошибку. Pic1 показывает masterlist, где пользователь может удвоить, какую запись он / она хочет изменить. Рис 2 показывает, переданное значение, основываясь на выбранном ПК. Рис 3 показывает успех в изменении выбранной записи. Рис 4 показывает ошибку после того, как я вновь открыть masterlist и пытается выбрать другую запись, которую я хочу изменить. Pic 5 мой код для события DataGridView DoubleClick. Pic 6 представляет собой код для обновления выбранной записи с помощью SP. [Pic1] [1] [pic2] [2] [pic3] [3] [pic4] [4] [pic5] [5] [pic6] [6] MessageBoxIcon.Information) Вызов LoadMode () Я также прилагается скриншоты, чтобы показать точную ошибку. Pic1 показывает masterlist, где пользователь может удвоить, какую запись он / она хочет изменить. Рис 2 показывает, переданное значение, основываясь на выбранном ПК. Рис 3 показывает успех в изменении выбранной записи. Рис 4 показывает ошибку после того, как я вновь открыть masterlist и пытается выбрать другую запись, которую я хочу изменить. Pic 5 мой код для события DataGridView DoubleClick. Pic 6 представляет собой код для обновления выбранной записи с помощью SP. [Pic1] [1] [pic2] [2] [pic3] [3] [pic4] [4] [pic5] [5] [pic6] [6] MessageBoxIcon.Information) Вызов LoadMode () Я также прилагается скриншоты, чтобы показать точную ошибку. Pic1 показывает masterlist, где пользователь может удвоить, какую запись он / она хочет изменить. Рис 2 показывает, переданное значение, основываясь на выбранном ПК. Рис 3 показывает успех в изменении выбранной записи. Рис 4 показывает ошибку после того, как я вновь открыть masterlist и пытается выбрать другую запись, которую я хочу изменить. Pic 5 мой код для события DataGridView DoubleClick. Pic 6 представляет собой код для обновления выбранной записи с помощью SP. [Pic1] [1] [pic2] [2] [pic3] [3] [pic4] [4] [pic5] [5] [pic6] [6] Рис 3 показывает успех в изменении выбранной записи. Рис 4 показывает ошибку после того, как я вновь открыть masterlist и пытается выбрать другую запись, которую я хочу изменить. Pic 5 мой код для события DataGridView DoubleClick. Pic 6 представляет собой код для обновления выбранной записи с помощью SP. [Pic1] [1] [pic2] [2] [pic3] [3] [pic4] [4] [pic5] [5] [pic6] [6] Рис 3 показывает успех в изменении выбранной записи. Рис 4 показывает ошибку после того, как я вновь открыть masterlist и пытается выбрать другую запись, которую я хочу изменить. Pic 5 мой код для события DataGridView DoubleClick. Pic 6 представляет собой код для обновления выбранной записи с помощью SP. [Pic1] [1] [pic2] [2] [pic3] [3] [pic4] [4] [pic5] [5] [pic6] [6]
1

голосов
1

ответ
220

Просмотры

Подсчитать количество дочерних записей в формате JSON-файл, используя Json.NET

У меня есть следующий JSON-файл, содержащий несколько дочерних записей. Это пример файла: [{ "постоянный ток: тип": { "DC: Название": "CR", "постоянный ток: типа": "RecordType"}, "DC: Название": "CCP56778974", «Submitted_on «: "2011-08-16T16: 30: 01Z", "Рисунок": "N", "проект": { "RDF: о": "ALCX", "DC: тип": { "DC: название": "CR_Project", "постоянный ток: типа": "RecordType", "RDF: ресурс": "https://ananh.net/2383783"}, "DC: название": "EMBTCE", "название": «EMBTCE- SysDes "}, "История": {" oslc_cm: считать, но это не считается дочерних записей под [oslc_cm: результаты]. Как правильно считать вложенное «ACTION_NAME» свойство? считать, но это не считается дочерних записей под [oslc_cm: результаты]. Как правильно считать вложенное «ACTION_NAME» свойство?
1

голосов
0

ответ
40

Просмотры

VS2017 с VSTS и GIT - Как отключить автоматическую фиксацию на работе REVERT?

Вот это проблема объяснения. Expectation я хочу вернуть один файл в определенный фиксации в отрасли с помощью графического интерфейса. Environnement У меня есть VB.NET решение на Visual Studio 2017. Решение находится под управлением версиями с связным Visual Studio Team Service с помощью Git, как Repository. Тестовый образец Представьте иметь 1 ветвь (например, Dev). Представьте себе, что Dev имеет 3 фиксации (например, C1, C2, C3, C3 является последним, и C1 является первым один) Представьте, что вы хотите, чтобы отменить изменения C3 в файл A.vb, так что фактический код выглядит так же в С2 Представьте, что только этот файл должен быть отменена, и никакие другие уязвимые файлы C3 не должны вернуться к C2 То, что я пытаюсь сделать в обозревателе решений, выберите A.vb файл, кликните правой кнопкой мыши и выберите Показать историю ... в истории окно, выберите C2, щелкните правой кнопкой мыши и Откат проблему Doing шаги подвергаются выше, если нет конфликта, он вернется ВЕСЬ совершить желаемую (то есть не только выбранный файл, но все изменения в файл коммит) обходной пути, я знаю, что там должно быть много способов сделать это с командной строкой или через «Вид Commit Подробности» -> opne файл A.vb -> сохранить как .. в фактической площади ветви файла. Идея я надеюсь, что там должен быть вариант, где-то в VS2017 или Team Explorer, чтобы отключить поведение «автоматической фиксации на Revert», так что я буду иметь возможность выбрать только один файл, чтобы поставить его в новый коммит. Я не имею ни малейшего представления о том, как это сделать ... и если это правильный путь, тоже, очевидно. но все изменения в файл коммит) обходной пути, я знаю, что там должно быть много способов сделать это с командной строкой или с помощью «Вида Commit Подробности» -> opne файла A.vb -> сохранить как .. в фактическом площадь файла филиала. Идея я надеюсь, что там должен быть вариант, где-то в VS2017 или Team Explorer, чтобы отключить поведение «автоматической фиксации на Revert», так что я буду иметь возможность выбрать только один файл, чтобы поставить его в новый коммит. Я не имею ни малейшего представления о том, как это сделать ... и если это правильный путь, тоже, очевидно. но все изменения в файл коммит) обходной пути, я знаю, что там должно быть много способов сделать это с командной строкой или с помощью «Вида Commit Подробности» -> opne файла A.vb -> сохранить как .. в фактическом площадь файла филиала. Идея я надеюсь, что там должен быть вариант, где-то в VS2017 или Team Explorer, чтобы отключить поведение «автоматической фиксации на Revert», так что я буду иметь возможность выбрать только один файл, чтобы поставить его в новый коммит. Я не имею ни малейшего представления о том, как это сделать ... и если это правильный путь, тоже, очевидно. будет иметь возможность выбрать только один файл, чтобы поставить его в новом коммят. Я не имею ни малейшего представления о том, как это сделать ... и если это правильный путь, тоже, очевидно. будет иметь возможность выбрать только один файл, чтобы поставить его в новом коммят. Я не имею ни малейшего представления о том, как это сделать ... и если это правильный путь, тоже, очевидно.
M4mu5

Просмотр дополнительных вопросов