ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / ASP.NET [игнор отключен] [закрыт для гостей] / Конвертирование классической asp в aspx
25 сообщений из 30, страница 1 из 2
  1  все
Конвертирование классической asp в aspx
    #38336236
Ay-y
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ay-y
Участник
Есть кусок очень старой программы, написанный на asp.
Сейчас переводим сервер на Windows 7 и этот кусок, ясное дело не работает.
Подскажите, как это с минимальными затратами перевести в aspx.
Насколько я понимаю, код не очень сложный, но опыта в этой области у меня совсем нет.

Код: html
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.
76.
77.
78.
79.
80.
81.
82.
83.
84.
85.
86.
87.
88.
89.
90.
91.
92.
93.
94.
95.
96.
97.
98.
99.
<%@ Language=VBScript %>
<html>

<head>
<meta http-equiv="Content-Language" content="en-us">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Change Password</title>
<%
	
	set oXML = CreateObject("TASXML2.CDataSet")
	
	if len(trim(Request("txtNewPassword"))) > 0 then
		oxml.Fields.add "SessionID", Request("ID")
		oxml.Fields.add "OldPassword", Request("txtOldPassword")
		oxml.Fields.add "NewPassword", Request("txtNewPassword")
		oxml.Fields.add "VerifyPassword", Request("txtVerifyPwd")
		oxml.Fields.add "Approval_Code", Request("txtAppCode")
		
		set oLogon = CreateObject("Login.CLogin")
		oxml.LoadXML oLogon.ChangePassword(oxml.xml)
		set oLogon = Nothing
	end if
%>
</head>

<body>

<table border="0" width="750" cellspacing="0" cellpadding="0">
  <tr>
    <td width="6%" background="../images/Bkg.jpg" valign="bottom">
      <p align="center"><img border="0" src="../images/SU02-Security%20Manager.gif" WIDTH="32" HEIGHT="32"></p>
    </td>
    <td width="44%" background="../images/Bkg.jpg"><b><font color="#FFFFFF" face="Arial" size="2">Change
      Password</font></b></td>
    <td width="50%" background="../images/Bkg.jpg">
      <p align="right"><font color="#FFFFFF" face="Arial Black" size="3">Takata Advanced Systems&nbsp;&nbsp;
      </font></td>
  </tr>
  <tr>
    <td width="100%" colspan="3">&nbsp;</td>
  </tr>
  <tr>
    <td width="100%" colspan="3">
		<%if len(trim(Request("txtNewPassword"))) = 0 or oxml.DataSets.exists("Error") = true then%>
			<%if oxml.DataSets.exists("Error") = true then%>
				<p><font color="#FF0000">Error: <%=oxml.DataSets("Error").Fields("ErrDesc").FieldValue%></font></p>
			<%elseif len(trim(Request("txtNewPassword"))) = 0 and Request("Submitted") = "1" then%>
				<p><font color="#FF0000">Error: Please sepcify all information.</font></p>
			<%end if%>
			<form method="POST" action="ChangePassword.asp?ID=<%=Request("ID")%>" id="form1" name="form1">
			  <table border="0" width="100">
			    <tr>
			      <td width="26%">Old Password :</td>
			      <td width="74%"><input type="password" name="txtOldPassword" size="20"></td>
			    </tr>
			    <tr>
			      <td width="26%"></td>
			      <td width="74%"></td>
			    </tr>
			    <tr>
			      <td width="26%">New Password :</td>
			      <td width="74%"><input type="password" name="txtNewPassword" size="20"></td>
			    </tr>
			    <tr>
			      <td width="26%">Verify Password :</td>
			      <td width="74%"><input type="password" name="txtVerifyPwd" size="20"></td>
			    </tr>
			    <tr>
			      <td width="26%">Approval Code :</td>
			      <td width="74%">
                  <input type="password" name="txtAppCode" size="20"></td>
			    </tr>
			    <tr>
			      <td width="100%" colspan="2"><font size="2">Please leave the 
                  approval code field blank if you would like the system to 
                  automatically generate your approval code.</font></td>
			    </tr>
			    <tr>
			      <td width="26%"><input type="submit" value="Change Password" name="cmdChange"></td>
			      <td width="74%"></td>
			    </tr>
			  </table>
			  <input type="hidden" name="Submitted" value="1">
			</form>
		<%else%>
			<p align="center"><font color="#0000FF" align="center">Your Password Has Been Changed</p>
			<br><br>
			</font>
			</p>
		<%end if%>
    </td>
  </tr>
</table>

</body>
<%set oXML = Nothing%>
</html>
...
Рейтинг: 0 / 0
18.07.2013, 22:19
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38336246
Фотография hVostt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
hVostt
Участник
Ay-y,

так просто «конвертнуть» не получится. придется полностью переписать.
в aspx другой конвеер (в зависимости от выбранной технологии), а также совсем другой язык VB.NET/C# на выбор.
...
Рейтинг: 0 / 0
18.07.2013, 22:45
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38336259
-asp-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-asp-
Гость
Ay-yЕсть кусок очень старой программы, написанный на asp.
Сейчас переводим сервер на Windows 7 и этот кусок, ясное дело не работает.
Подскажите, как это с минимальными затратами перевести в aspx.
А включить поддержку ASP не судьба?
...
Рейтинг: 0 / 0
18.07.2013, 23:06
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38336260
Ay-y
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ay-y
Участник
Как?
...
Рейтинг: 0 / 0
18.07.2013, 23:08
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38336452
ShSerge
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ShSerge
Участник
Ay-yКак?
А зачем конвертировать, если и так работает?
...
Рейтинг: 0 / 0
19.07.2013, 10:01
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38336663
bazile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bazile
Участник
Ay-yКак?
Установи поддержку ASP через панель управления. Создай новый пул с classic pipeline. Назначь своему сайту этот пул.
...
Рейтинг: 0 / 0
19.07.2013, 11:53
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38336879
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Можно просто скопипастить этот текст в aspx, и он тоже будет работать. Только нужно убрать первую строчку и поправить VBS-код в соответствии с синтаксисом VB.NET:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
<%@ Page Language="VB" AutoEventWireup="false"
     ValidateRequest="false" Debug="true" 
    CodeFile="Default.aspx.vb" Inherits="_Default" %>
<html>

<head>
<meta http-equiv="Content-Language" content="en-us">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Change Password</title>
<%
	
    Dim oXML = CreateObject("TASXML2.CDataSet")
	
    if len(trim(Request("txtNewPassword"))) > 0 then
        oXML.Fields.add("SessionID", Request("ID"))
        oXML.Fields.add("OldPassword", Request("txtOldPassword"))
        oXML.Fields.add("NewPassword", Request("txtNewPassword"))
        oXML.Fields.add("VerifyPassword", Request("txtVerifyPwd"))
        oXML.Fields.add("Approval_Code", Request("txtAppCode"))
		
        Dim oLogon = CreateObject("Login.CLogin")
        oXML.LoadXML(oLogon.ChangePassword(oXML.xml))
        oLogon = Nothing
    end if
%>
...
Рейтинг: 0 / 0
19.07.2013, 13:33
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337236
ShSerge
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ShSerge
Участник
Antonariy,

А всё-таки, нафига конвертировать?
...
Рейтинг: 0 / 0
19.07.2013, 16:37
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337265
Ay-y
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ay-y
Участник
Не работает.
Object reference not set to an instance of an object.

Код вот такой
Код: html
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
<%@ Page Language="VB" AutoEventWireup="false"
     ValidateRequest="false" Debug="true"%>
<html>

<head>
<meta http-equiv="Content-Language" content="en-us">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Change Password</title>
<%
	
    Dim oXML = CreateObject("TASXML2.CDataSet")
	
    if len(trim(Request("txtNewPassword"))) > 0 then
        oXML.Fields.add("SessionID", Request("ID"))
        oXML.Fields.add("OldPassword", Request("txtOldPassword"))
        oXML.Fields.add("NewPassword", Request("txtNewPassword"))
        oXML.Fields.add("VerifyPassword", Request("txtVerifyPwd"))
        oXML.Fields.add("Approval_Code", Request("txtAppCode"))
		
        Dim oLogon = CreateObject("Login.CLogin")
        oXML.LoadXML(oLogon.ChangePassword(oXML.xml))
        oLogon = Nothing
    end if
%>
</head>
<%oXML = Nothing%>
</html>
...
Рейтинг: 0 / 0
19.07.2013, 16:49
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337311
Ay-y
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ay-y
Участник
bazileAy-yКак?
Установи поддержку ASP через панель управления. Создай новый пул с classic pipeline. Назначь своему сайту этот пул.
Попытались следовать указаниям Микрософта

To enable ASP on Windows Server 2008
1.Click Start, point to Control Panel, click Programs, and then click Turn Windows features on or off.

2.In Server Manager, click Add Roles.

3.On the Add Roles Wizard page, select Application Server, click Next three times, and then click Install.

Windows Server installs the new role.


Но оказалось что Application Server на странице нету.
...
Рейтинг: 0 / 0
19.07.2013, 17:09
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337318
bazile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bazile
Участник
Ay-yПопытались следовать указаниям Микрософта

To enable ASP on Windows Server 2008
В первом сообщении ты писал что переносите на Windows 7. Определись точно какая у вас ОС. Windows 7 и Windows Server 2008 имеют разное назначение и отличаются друг от друга.

Ay-yНо оказалось что Application Server на странице нету.
Скриншот покажи.
...
Рейтинг: 0 / 0
19.07.2013, 17:16
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337334
Ay-y
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ay-y
Участник
bazileAy-yПопытались следовать указаниям Микрософта

To enable ASP on Windows Server 2008
В первом сообщении ты писал что переносите на Windows 7. Определись точно какая у вас ОС. Windows 7 и Windows Server 2008 имеют разное назначение и отличаются друг от друга.

Ay-yНо оказалось что Application Server на странице нету.
Скриншот покажи.
Windows 8
...
Рейтинг: 0 / 0
19.07.2013, 17:24
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337335
Ay-y
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ay-y
Участник
bazileAy-yПопытались следовать указаниям Микрософта

To enable ASP on Windows Server 2008
В первом сообщении ты писал что переносите на Windows 7. Определись точно какая у вас ОС. Windows 7 и Windows Server 2008 имеют разное назначение и отличаются друг от друга.

Ay-yНо оказалось что Application Server на странице нету.
Скриншот покажи.
...
Рейтинг: 0 / 0
19.07.2013, 17:25
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337340
bazile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bazile
Участник
Ay-y, из скриншота видно что роль Application Server уже установлена. Теперь тебе надо открыть список установленныз features для него и выбрать поддержку ASP.

P.S. Windows 8 и Windows (Server) 2008 R2 это разные ОС. Первая клиентская, вторая серверная. Не путай их.
...
Рейтинг: 0 / 0
19.07.2013, 17:29
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337350
Ay-y
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ay-y
Участник
bazileAy-y, из скриншота видно что роль Application Server уже установлена. Теперь тебе надо открыть список установленныз features для него и выбрать поддержку ASP.

P.S. Windows 8 и Windows (Server) 2008 R2 это разные ОС. Первая клиентская, вторая серверная. Не путай их.
Спасибо, но тут поддержки АСР тоже не видно.
...
Рейтинг: 0 / 0
19.07.2013, 17:35
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337357
ShSerge
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ShSerge
Участник
Ay-y,

В третьий раз повторяю: ЗАЧЕМ чё-то куда-то конвертировать?
...
Рейтинг: 0 / 0
19.07.2013, 17:40
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337368
Ay-y
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ay-y
Участник
ShSergeAy-y,

В третьий раз повторяю: ЗАЧЕМ чё-то куда-то конвертировать?
Сайт не работает потому-что.
Надо или конвертировать, или заставить сервер работать с ASP, пока обе попытки не очень успешны.
...
Рейтинг: 0 / 0
19.07.2013, 17:45
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337386
bazile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bazile
Участник
Ay-yСпасибо, но тут поддержки АСР тоже не видно.
Не там смотришь значит. Попробуй сделать как описано здесь - http://www.iis.net/learn/application-frameworks/running-classic-asp-applications-on-iis-7-and-iis-8/classic-asp-not-installed-by-default-on-iis
...
Рейтинг: 0 / 0
19.07.2013, 18:06
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337415
Ay-y
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ay-y
Участник
bazileAy-yСпасибо, но тут поддержки АСР тоже не видно.
Не там смотришь значит. Попробуй сделать как описано здесь - http://www.iis.net/learn/application-frameworks/running-classic-asp-applications-on-iis-7-and-iis-8/classic-asp-not-installed-by-default-on-iis
И ещё раз спасибо,
Похоже что уже всё инсталлировано, но всё-равно не работает.
Где ещё копать?
...
Рейтинг: 0 / 0
19.07.2013, 18:33
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337458
bazile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bazile
Участник
Ay-yПохоже что уже всё инсталлировано, но всё-равно не работает.
Где ещё копать?
Понятие "не работает" очень широкое. Предлагаю сначала убедиться в работоспособности самого ASP на твоем сервере. Для этого:
1) Создай папку C:\Inetpub\wwwroot_test
2) Положи в него файл index.asp:
Код: plaintext
1.
2.
3.
<%
Response.Write("Test message")
%>


3) Открой IIS Manager
4) Создай новый пул TestAppPool c pipeline режимом = classic.
5) Создай новый сайт с корнем C:\Inetpub\wwwroot_test и пулом TestAppPool. Предварительно можно временно остановить "Default Web Site" чтобы не было конфликтов привязок и для упрощения тестирования.
6) Открой новый сайт в браузере - http://localhost
7) Если на зкране появится текст "Test message", то ASP работает и можно удалить тестовый сайт и пул. Если нет, то выкладывай ошибку - будем разбираться.
...
Рейтинг: 0 / 0
19.07.2013, 19:04
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337488
Ay-y
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ay-y
Участник
...
Рейтинг: 0 / 0
19.07.2013, 19:39
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337560
Ай
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ай
Участник
Блин, заработал всё.
Значит asp работает.
Что ещё может быть причиной?
...
Рейтинг: 0 / 0
19.07.2013, 21:22
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38337670
bazile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bazile
Участник
АйЧто ещё может быть причиной?
Мой хрустальный шар в ремонте поэтому без дополнительных пояснений помочь не смогу. Не работает файл из первого сообщения? В чем это выражается?
...
Рейтинг: 0 / 0
20.07.2013, 00:40
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38338192
Sergey Ch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey Ch
Участник
АйЧто ещё может быть причиной?
Вам надо дать необходимые права для той роли под которой Ваш classic asp pool работает.
Как я вижу из приведенного куска на первой странице Вы обращетесь к объекту "TASXML2.CDataSet" - бедитесь что он есть на Вашем сервере. Если есть то какова его разрядность - 32 или 64 bit (application pool для IIS может быть определен как 32 bit)...
Это относится и к "Login.CLogin"...

Good luck!

P.S. Из моей широкой практики перевода на новые OS, особенно W2008 R2 - дешевле и надежнее быстро переписать под новую платформу... Хотя бизнес не всегда это понимает...
...
Рейтинг: 0 / 0
21.07.2013, 14:44
| Ответить | Цитировать | Написать  
Конвертирование классической asp в aspx
    #38339759
Ay-y
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ay-y
Участник
Так, взят самый примитивный логон
Код: html
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
<%@ Language=VBScript %>
<html>

<head>
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>TAS Logon</title>

<%
	set oXML = createobject("TASXML2.CDataSet")
	set oLogon = createobject("Login.CLogin")
	oxml.LoadXML ologon.GetInitData()
	set ologon = nothing
%>

</head>

<body background="Images/Bkg.jpg">
<P>
<i><font color="#FFFFFF" face="Arial Black" size="4">Takata
Advanced Systems</font></i>
<P>
 
<form method="POST" action="MainMenu.asp">
  <table border="0" width="338">
    <tr>
      <td width="82"><font color="#FFFFFF">User Name :</font></td>
      <td width="242"><input type="text" name="txtUserName" size="29"></td>
    </tr>
    <tr>
      <td width="82"><font color="#FFFFFF">Password :</font></td>
      <td width="242"><input type="password" name="txtPassword" size="29"></td>
    </tr>
    <tr>
      <td width="82"><font color="#FFFFFF">Company :</font></td>
      <td width="242"><select size="1" name="cboCompany" style="width: 195">
		<%
			for x = 1 to oXML.Fields.count
				Response.Write "<option>" & oxml.Fields(x).fieldvalue & "</option>"
			next
		%>
        </select></td>
    </tr>
    <tr>
      <td width="82"></td>
      <td width="242"><input type="Submit" value="Logon" name="cmdLogon"></td>
    </tr>
  </table>
</form>

</body>
<%
set oXML = nothing
%>
</html>


Когда запускаешь на севере http://localhost/Logon.asp всё правильно работает.
Когда запускаю с именем сервера выдаёт 500 сервер ошибку, если использовать https:// то говорит что сертификат неправильный, если дать разрешение то всё работает нормально. Как правильно установить сайты так чтобы они не проверяли сертификаты?
...
Рейтинг: 0 / 0
22.07.2013, 22:15
| Ответить | Цитировать | Написать  
25 сообщений из 30, страница 1 из 2
  1  все
Форумы / ASP.NET [игнор отключен] [закрыт для гостей] / Конвертирование классической asp в aspx
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]