Search Results for 'asp'

ATOM Icon

3 POSTS

  1. 2005/04/20 How to use Asp by Visual Studio 2000/2003 with debug. by 나현재
  2. 2004/11/30 frWm(asp) => frWm(php) 포팅일지. by 나현재
  3. 2004/11/17 asp2php사용기 by 나현재

How to use Asp by Visual Studio 2000/2003 with debug.

0. DNS setting : create server domain.- optional

1. IIS server setting.
1.1 create iis web with site host header.(must using dns url)
1.2 adapt server extension (Front page extension)
1.3 set web site property.
1.3.1 home directory=>application protect =>medium to higher
1.3.2 home directory=>organization=>application debugging => Debugging flag to TRUE
1.4 assert server extension

2. Create visual studio project.
2.1 start Visual Studio 2000/2003 .
2.2 create new project
2.2.1 type: asp.net project
2.2.2 location write "http://"+url ex) http://site.mydomain.com
2.2.3 write server's admin id & pwd

3. Set visual studio project.
3.1 (right)click project name and select property
3.2 select debug in property page.
3.3 unset asp.net debug
3.4 set asp debug

4. Test the code.
4.1 create new asp file(by adding new html file and rename )
4.2 add the asp code "<% response.write(1/0)%>"
4.3 set start file by mouse right click.
4.3 press f5 key.
4.4 if you meet error in upper code, you can debug asp code with visual studio.



* We can not debug asp.net and asp code at same visual studio project, if u know how to do, tell me, please...!!

** This way cant not apply remote server, if u know how to do,tel me, please..!

*** Sorry for my bad english..kekek..!!

Written by NaHyunJae(http://j.finfra.com)
Copyright Finfra(http://www.finfra.com) All Rights Reserved

Posted by 나현재

2005/04/20 14:45 2005/04/20 14:45
Tag
,
Response
0 Trackbacks , 0 Comments
RSS :
http://j.finfra.com/tt/rss/response/231

frWm(asp) => frWm(php) 포팅일지.

개요.
asp로 작성된 코드를 php로 변환.
포팅 프로그램의 개선.

포팅전 준비한 사항.php기본적인 학습.
asp2php프로그램 테스트.

목적물
포팅된 소스의 테스트.
포팅된 소스에 smarty를 이용한 템플릿 적용.
frWm을 순수 분리형 모듈로 완성. (suid형태)
asp2php의 포팅 안되는 코드 목록 작성.
asp2php를 파이썬의 하위 모듈로 만들어서 완벽한 포팅 프로그램으로 변화시킴.

예상 기간
포팅준비 : 일주일전부터 현재.
포팅기간 : 현재 부터 일주일.
포팅툴 개선 : 포팅 완료후 틈나는대로.



포팅 전면 취소

Posted by 나현재

2004/11/30 11:03 2004/11/30 11:03
Tag
, ,
Response
0 Trackbacks , 0 Comments
RSS :
http://j.finfra.com/tt/rss/response/143

asp2php사용기

프로그램 다운로드 : http://asp2php.mikekohn.net/
asp2php-0.76.23.zip



사용법

C:\asp2php>
C:\asp2php>asp2php lib.asp
-----------------------------------------------------
asp2php 0.76.23 - Septemer 8, 2004
Copyright 1998-2004 By Michael Kohn (mike@mikekohn.net)
For info and latest: http://asp2php.naken.cc/
This program falls under the GPL License (http://www.gnu.org/)
-----------------------------------------------------

Opening file: lib.asp
Creating file: lib.php

currdeffunct=0 functptr=12 (GetUniqueName)
currdeffunct=1 functptr=12 (cutString)
currdeffunct=2 functptr=12 (strLenReturn)
currdeffunct=3 functptr=12 (replaceURL)
currdeffunct=4 functptr=12 (replaceEmail)
currdeffunct=5 functptr=12 (autoMailLink)
currdeffunct=6 functptr=12 (viewErrMsg)
currdeffunct=7 functptr=12 (prdt)
currdeffunct=8 functptr=12 (DateView)
currdeffunct=9 functptr=12 (DevInfoPrt)
currdeffunct=10 functptr=12 (crypticCode)
currdeffunct=11 functptr=12 (crypticPassword)
Done.

C:\asp2php>


결과물

* Source
[CODE] //////////// 파일중복업로드시 덮어씌움 방지 함수 ////////// Function GetUniqueName(byRef strFileName, DirectoryPath) Dim strName, strExt strName = Mid(strFileName, 1, InstrRev(strFileName, ".") - 1) ' 확장자를 제외한 파일명을 얻는다. strExt = Mid(strFileName, InstrRev(strFileName, ".") + 1) '확장자를 얻는다 If Trim(LCase(strExt))="asp" Then strExt = strExt & ".txt" End If '확장명이 asp인 파일을 txt파일로 바꿈 If Trim(LCase(strExt))="aspx" Then strExt = strExt & ".txt" End If '확장명이 aspx인 파일을 txt파일로 바꿈 strFileName = strName & "." & strExt '파일이름 재결합 Dim fso Set fso = Server.CreateObject("Scripting.FileSystemObject") Dim bExist : bExist = True '우선 같은이름의 파일이 존재한다고 가정 Dim strFileWholePath : strFileWholePath = DirectoryPath & "\" & strName & "." & strExt '저장할 파일의 완전한 이름(완전한 물리적인 경로) 구성 Dim countFileName : countFileName = 0 '파일이 존재할 경우, 이름 뒤에 붙일 숫자를 세팅함. Do While bExist ' 우선 있다고 생각함. If (fso.FileExists(strFileWholePath)) Then ' 같은 이름의 파일이 있을 때 countFileName = countFileName + 1 '파일명에 숫자를 붙인 새로운 파일 이름 생성 strFileName = strName & "(" & countFileName & ")." & strExt strFileWholePath = DirectoryPath & "\" & strFileName Else bExist = False End If Loop GetUniqueName = strFileWholePath End Function [/CODE]


*Target
[CODE]//////////// 파일중복업로드시 덮어씌움 방지 함수 ////////// function GetUniqueName($byRef$strFileName,$DirectoryPath) { extract($GLOBALS); $strName=substr($strFileName,0,(strrpos($strFileName,".") ? strrpos($strFileName,".")+1 : 0)-1); // 확장자를 제외한 파일명을 얻는다. ; $strExt=substr($strFileName,(strrpos($strFileName,".") ? strrpos($strFileName,".")+1 : 0)+1-1); //확장자를 얻는다 ; if (trim(strtolower($strExt))=="asp") { $strExt=$strExt.".txt"; } ; //확장명이 asp인 파일을 txt파일로 바꿈 ; } if (trim(strtolower($strExt))=="aspx") { $strExt=$strExt.".txt"; } ; //확장명이 aspx인 파일을 txt파일로 바꿈 ; } $strFileName=$strName.".".$strExt; //파일이름 재결합 ; // $fso is of type "Scripting.FileSystemObject" $bExist=true; //우선 같은이름의 파일이 존재한다고 가정 $strFileWholePath=$DirectoryPath."\".$strName.".".$strExt; //저장할 파일의 완전한 이름(완전한 물리적인 경로) 구성 $countFileName=0; //파일이 존재할 경우, 이름 뒤에 붙일 숫자를 세팅함. while($bExist) // 우선 있다고 생각함. { if ((file_exists($strFileWholePath))) { // 같은 이름의 파일이 있을 때 $countFileName=$countFileName+1; //파일명에 숫자를 붙인 새로운 파일 이름 생성 ; $strFileName=$strName."(".$countFileName.").".$strExt; $strFileWholePath=$DirectoryPath."\".$strFileName; } else { $bExist=false; } } $GetUniqueName=$strFileWholePath; return $function_ret; } [/CODE]


* 결과 : 하나의 파일에 대해서는 어느정도 잘되나 모든 구문까지 완벽히 변환되는 것은 아님.

written by NaHyunJae(http://j.finfra.com)

Posted by 나현재

2004/11/17 13:19 2004/11/17 13:19
Tag
,
Response
0 Trackbacks , 0 Comments
RSS :
http://j.finfra.com/tt/rss/response/109
« Previous : 1 : Next »
블로그 이미지

Insufficient memory! So,Blog is my 2nd Brain!

- 나현재

Notices

Archives

Authors

  1. 나현재

Calendar

«   2012/02   »
일 월 화 수 목 금 토
      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      

Site Stats

Total hits:
202429
Today:
0
Yesterday:
18