Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / ASP.NET [игнор отключен] [закрыт для гостей] / Конвертирование классической asp в aspx / 25 сообщений из 30, страница 1 из 2
  1  все
18.07.2013, 22:19
    #38336236
Ay-y
Ay-y
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
Есть кусок очень старой программы, написанный на 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:45
    #38336246
hVostt
hVostt
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
Ay-y,

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

А всё-таки, нафига конвертировать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.07.2013, 16:49
    #38337265
Ay-y
Ay-y
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
Не работает.
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, 17:09
    #38337311
Ay-y
Ay-y
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
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:16
    #38337318
bazile
bazile
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
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:24
    #38337334
Ay-y
Ay-y
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
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:25
    #38337335
Ay-y
Ay-y
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
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:29
    #38337340
bazile
bazile
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
Ay-y, из скриншота видно что роль Application Server уже установлена. Теперь тебе надо открыть список установленныз features для него и выбрать поддержку ASP.

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

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

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

В третьий раз повторяю: ЗАЧЕМ чё-то куда-то конвертировать?
Сайт не работает потому-что.
Надо или конвертировать, или заставить сервер работать с ASP, пока обе попытки не очень успешны.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.07.2013, 18:06
    #38337386
bazile
bazile
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
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:33
    #38337415
Ay-y
Ay-y
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
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, 19:04
    #38337458
bazile
bazile
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
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:39
    #38337488
Ay-y
Ay-y
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.07.2013, 21:22
    #38337560
Ай
Ай
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
Блин, заработал всё.
Значит asp работает.
Что ещё может быть причиной?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.07.2013, 00:40
    #38337670
bazile
bazile
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
АйЧто ещё может быть причиной?
Мой хрустальный шар в ремонте поэтому без дополнительных пояснений помочь не смогу. Не работает файл из первого сообщения? В чем это выражается?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.07.2013, 14:44
    #38338192
Sergey Ch
Sergey Ch
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в aspx
АйЧто ещё может быть причиной?
Вам надо дать необходимые права для той роли под которой Ваш classic asp pool работает.
Как я вижу из приведенного куска на первой странице Вы обращетесь к объекту "TASXML2.CDataSet" - бедитесь что он есть на Вашем сервере. Если есть то какова его разрядность - 32 или 64 bit (application pool для IIS может быть определен как 32 bit)...
Это относится и к "Login.CLogin"...

Good luck!

P.S. Из моей широкой практики перевода на новые OS, особенно W2008 R2 - дешевле и надежнее быстро переписать под новую платформу... Хотя бизнес не всегда это понимает...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.07.2013, 22:15
    #38339759
Ay-y
Ay-y
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Конвертирование классической asp в 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.
<%@ 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
| Ответить | Цитировать | Написать  
  1  все
Форумы / ASP.NET [игнор отключен] [закрыт для гостей] / Конвертирование классической asp в aspx / 25 сообщений из 30, страница 1 из 2
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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