Microsoft .Net Framework (SOS! SOS! SOS!)
SOS! SOS! SOS!
Мой код написанный на VS 2005 (VB)
суть кода:
зайти в текстовый файл
найти нужный параметр
и соответственно этому параметру заполнить форму.
В форме используется [COLOR="RoyalBlue"]TabControl1,[/COLOR] по необходимости добавляются новые закладки и элементы управления для них ([COLOR="royalblue"]TextBox, Label[/COLOR])
и больше ничего!!!!
И программа работает
НО
только на локальном компе, а на сервере выдаёт такую ошибку:
см Рис
Мой код написанный на VS 2005 (VB)
суть кода:
Код:
Label1.Text = "RD-WI-101" 'Command$()
зайти в текстовый файл
Код:
FileOpen(1, "\\fs1\E$\qa-team\Qsoft\MNT\pt.dat", _
OpenMode.Input, OpenAccess.Default, OpenShare.Shared)
Do Until EOF(1)
Input(1, K)
OpenMode.Input, OpenAccess.Default, OpenShare.Shared)
Do Until EOF(1)
Input(1, K)
найти нужный параметр
Код:
If Trim(Mid$(K, 9, 14)) = Trim(Label1.Text) Then
и соответственно этому параметру заполнить форму.
Код:
TabPage1.Text = Trim(Mid$(K, 1, 4) & "/" & _
Mid$(K, 5, 2) & "/" & Mid$(K, 7, 2))
TextBox2.Text = Trim(Mid$(K, 528, 150))
Mid$(K, 5, 2) & "/" & Mid$(K, 7, 2))
TextBox2.Text = Trim(Mid$(K, 528, 150))
В форме используется [COLOR="RoyalBlue"]TabControl1,[/COLOR] по необходимости добавляются новые закладки и элементы управления для них ([COLOR="royalblue"]TextBox, Label[/COLOR])
Код:
Dim TabPage3 As New TabPage
Dim textBox18 As New TextBox()
textBox18.Location = New Point(6, 111)
textBox18.Size = New Point(264, 73)
textBox18.Multiline = True
textBox18.Text = Trim(Mid$(DataText, 528, 150))
TabPage3.Controls.Add(textBox18)
Dim textBox18 As New TextBox()
textBox18.Location = New Point(6, 111)
textBox18.Size = New Point(264, 73)
textBox18.Multiline = True
textBox18.Text = Trim(Mid$(DataText, 528, 150))
TabPage3.Controls.Add(textBox18)
и больше ничего!!!!
И программа работает
НО
только на локальном компе, а на сервере выдаёт такую ошибку:
см Рис
Цитата:
Зашла на сервер, выполнила следующее:
Start ->Programs ->Administrative Tools ->Microsoft .Net Framework Configuration
Runtime Security Policy
Machine
Code Groups
New code =Qsoft (Membership=All code,Permission Set = FullTrust)
Application
new Application (...\My.exe)
Start ->Programs ->Administrative Tools ->Microsoft .Net Framework Configuration
Runtime Security Policy
Machine
Code Groups
New code =Qsoft (Membership=All code,Permission Set = FullTrust)
Application
new Application (...\My.exe)
и все равно не работает
Пожалуйста, пожалуйста, пожалуйста: ПОМОГИТЕ, ПОДСКАЖИТЕ, ОБьЯСНИТЕ
Тут сказано, что твоя программа пытается выполнить операцию которая запрещеня в настройках групповой политки твоего компьютера.
Попробуй сделать ту же прогу на C#.
Попробуйте поступить следующим образом.
Ошибка возникает скорее всего из-за того что программа пытается получить доступ к файлу на сетевом диске. Он в свою очередь принадлежит к зоне Local Intranet (в некоторых случаях хосты находящиеся в локальной сети, и даже в одном домене определяются как зона Internet).
В остнастке dotNET 2.0 Configuration предусмотрены соответствующие надстройки. Однозначно сказать не могу, но все же, можно попробовать добавить нужные разрешения в "Premission Set" LocalIntranet, либо сменить группу разрешений у всего "Code Group", под названием LocalIntranet_Zone на FullTrust
[color=purple][size=1]Wed, 18 Jul 2007 17:04:13 GMT+0500[/size][/color]
Кажется я ошибся... сейчас попробую потестировать на серверах. Платформа у Вас какая?
Ошибка возникает скорее всего из-за того что программа пытается получить доступ к файлу на сетевом диске. Он в свою очередь принадлежит к зоне Local Intranet (в некоторых случаях хосты находящиеся в локальной сети, и даже в одном домене определяются как зона Internet).
В остнастке dotNET 2.0 Configuration предусмотрены соответствующие надстройки. Однозначно сказать не могу, но все же, можно попробовать добавить нужные разрешения в "Premission Set" LocalIntranet, либо сменить группу разрешений у всего "Code Group", под названием LocalIntranet_Zone на FullTrust
[color=purple][size=1]Wed, 18 Jul 2007 17:04:13 GMT+0500[/size][/color]
Кажется я ошибся... сейчас попробую потестировать на серверах. Платформа у Вас какая?
Не молодец, сервера а особено одмины могут отследить все твои работы по этому и не получаеться. Пусть муар из айпишников и адресов и можно сервак рухнуть.;)
Во первых всех благодарю за поддержку.
отвечаю по вопросу Ap0k
может есть что-то в коде, где можно добавить группу людей имеющих возможность пользоваться этим текстовым файлом????
отвечаю по вопросу Ap0k
Цитата:
Платформа у Вас какая?
[HTML]
Visual Studio 2005
Windows - XP
.NET Framework 3.0
[/HTML]
тут вот обнаружилось следующее:
я и мой админ запускаем со своих (локальных) компов .ЕХЕ и у нас соответственно нет проблем,
любой другой юзер делает copy на свой ком, запускает и получает следующее:
см. Рисунок
есть группа людей которые имеют возможность доступа к данному файлу '\\fs1\E$\qa-team\Qsoft\pt.dat'
Но почему то не имеут такую возможность запукая .EXE
Цитата:
Access to the path '\\fs1\E$\qa-team\Qsoft\pt.dat' is denied.
может в самом вызове файла что-то не так
Код:
FileOpen(1, "\\fs1\E$\qa-team\Qsoft\MNT\pt.dat", _
OpenMode.Input, OpenAccess.Default, OpenShare.Shared)
OpenMode.Input, OpenAccess.Default, OpenShare.Shared)
может есть что-то в коде, где можно добавить группу людей имеющих возможность пользоваться этим текстовым файлом????
Цитата: RoBZombI666
Не молодец, сервера а особено одмины могут отследить все твои работы по этому и не получаеться. Пусть муар из айпишников и адресов и можно сервак рухнуть.;)
честно, ни слова не поняла из написанного вами предложения :(
я думаю проблема в настройках VS 2005 или в вызове файла.
я написала такую же программку на VB 6, и работает
(правда там другие проблемы с SSTab, не хочет рисовать в новом Tabe новый контроль, он это делает в первом Tabe)
я написала такую же программку на VB 6, и работает
(правда там другие проблемы с SSTab, не хочет рисовать в новом Tabe новый контроль, он это делает в первом Tabe)
К сожалению не могу сказать что там в dotNET 3.0, может сегодня будет время взгляну на чудо :)
Проверьте следующие настройки:
1) Не используются ли Security Settings для ClickOnce
Project -> Properties -> Security
2) Админу посмотреть политики безопасности домена, принадлежность Вас и Админа к группам, может вы есть "Опытные пользователи", а остальные "Пользователи домена".
3) Посмотрите на владельца файла, возможно им являетесь Вы и исходя из политики, его может читатьмидифицировать только owner.
Во второй версии, доступ к SecurityPremission имеется в FullTrust, а вот как в третьей следовало бы проверить..
[color=red]P.S.[/color] Проверил на трех серверах, доступ к сетевым дискам и ресурсам предоставляемым через ts-client получил во всех случаях, разве что в одном была проблема, когда запрещали политики домена, но вылечилось довольно просто :) Добавил себя во вкладке "Безопасность"
Вообще все как-то странно и напоминает танцы с бубном :confused:
Проверьте следующие настройки:
1) Не используются ли Security Settings для ClickOnce
Project -> Properties -> Security
2) Админу посмотреть политики безопасности домена, принадлежность Вас и Админа к группам, может вы есть "Опытные пользователи", а остальные "Пользователи домена".
3) Посмотрите на владельца файла, возможно им являетесь Вы и исходя из политики, его может читатьмидифицировать только owner.
Во второй версии, доступ к SecurityPremission имеется в FullTrust, а вот как в третьей следовало бы проверить..
[color=red]P.S.[/color] Проверил на трех серверах, доступ к сетевым дискам и ресурсам предоставляемым через ts-client получил во всех случаях, разве что в одном была проблема, когда запрещали политики домена, но вылечилось довольно просто :) Добавил себя во вкладке "Безопасность"
Вообще все как-то странно и напоминает танцы с бубном :confused:
to Ap0k
Зашла на сервер, выполнила следующее:
Start ->Programs ->Administrative Tools ->Microsoft .Net Framework Configuration[INDENT]Runtime Security Policy[/INDENT][INDENT][INDENT]Machine[/INDENT][/INDENT][INDENT][INDENT][INDENT]Code Groups[/INDENT][/INDENT][/INDENT][INDENT][INDENT][INDENT]New code =Qsoft (Membership=All code,Permission Set = FullTrust)[/INDENT][/INDENT][/INDENT][INDENT]Application[/INDENT][INDENT]new Application ('\\fs1\E$\qa-team\My.exe)
Цитата:
Во второй версии, доступ к SecurityPremission имеется в FullTrust, а вот как в третьей следовало бы проверить..
Вы имеете в веду Frameworke Configuration Tools, который на сервере.
Признаюсь не имею представления где здесь ноги растут, нашла в инете и по каждому пункту сделала сказанные действия
Цитата:
Зашла на сервер, выполнила следующее:
Start ->Programs ->Administrative Tools ->Microsoft .Net Framework Configuration[INDENT]Runtime Security Policy[/INDENT][INDENT][INDENT]Machine[/INDENT][/INDENT][INDENT][INDENT][INDENT]Code Groups[/INDENT][/INDENT][/INDENT][INDENT][INDENT][INDENT]New code =Qsoft (Membership=All code,Permission Set = FullTrust)[/INDENT][/INDENT][/INDENT][INDENT]Application[/INDENT][INDENT]new Application ('\\fs1\E$\qa-team\My.exe)
[/INDENT]
[SIZE="3"]может надо что-то добавить? [/SIZE]