logo

한국어
글 수 29
번호
제목
글쓴이
29 Classic ASP에서 Array의 특정 index 제거
홈지기
2015-06-16 1313
Dim collections() collections = Array("A","B","C","D","E","F","G") Dim newCollections() Dim iCnt : iCnt = 0 Dim item For Each item In collections If (CStr(item) <> "A" AND CStr(item) <> "B" AND CStr(item) <> "C") Then ReDim Preserve newColle...  
28 ASP에서 콜론(:)의 의미..
홈지기
2014-12-17 1728
ASP에서 작업하다보면, Dim a : a = Reqeust("a") 와 같이 작업하는 경우가 있다. 콜론 연산자는 단지 여러줄에 걸쳐 사용해야 되는 구문을 한줄로 사용할때 사용한다. Dim a,b a = 0 b=1 과 같은 문장을 다음과 같이 한줄로 작성이 가능하다. Dim a, b : a=0 ...  
27 ByVal, ByRef 프로그래밍시 주의
홈지기
2014-06-16 4711
ASP에서 Function 정의시 파라미터 앞에 ByVal, ByRef를 명시하지 않으면 ByRef가 기본이므로 프로그래밍시 꼭 유의하자!  
26 동적배열 작업, ReDim Preserve
홈지기
2014-04-28 6562
일반적인 배열 선언하기 view source print? <% '배열선언 Dim arrData(3) %> 배열이 선언된 이후부터는 배열 크기가 고정되어 사이즈 조절이 불가능하다. Error : This array is fixed or temporarily locked 동적으로 배열 선언하기 view source print? <% '...  
25 Visual Basic 6.0 IDE에서 마우스 스크롤 안될때.. file
납득이
2013-10-04 7854
 
24 콤보박스에 년/월 채우기
홈지기
2013-07-04 7963
Visual Basic의 콤포박스에 년/월 채우기 소스입니다. 예전에 사용했던 코드인데, 올려봅니다. ㅎㅎ Private Sub UserForm_Initialize() Dim Yr As Long Dim Mn As Long Dim CurryYear As Long Dim iY As Long Dim CurrMonth As Long Dim CurrYear As Long Cm...  
23 [Visual Basic] 문자열 추출하기
홈지기
2013-07-04 8670
' VB에서 문자열 추출하기 ' 예로 ListBox1.Text = "삼성전자{OA}시스템" ' 아래와 같은 정보로 strSearchText 에 "OA" 문자열을 반환 Dim strSearchText as String strSearchText = Trim(Mid(ListBox1.Text , InStr(ListBox1.Text, "{") , InStr(ListBox1.Tex...  
22 끝 문자 잘라내기
홈지기
2013-07-04 8076
끝 문자만 잘라내는 일이 많이 있죠?? Loop문으로 StringBuilder에 구분자를 넣거나 할때, 간단하지만, 외우기 힘들때도 있죠... ㅋㅋ strName = mid(name, 1, len(name)-1)  
21 현재 디렉토리 위치 알아내기
홈지기
2013-07-04 8251
ASP에서 현재 디렉토리 위치를 알려면.. Current_Dir = Server.MapPath(".") + "\" Response.Write Current_Dir  
20 중복되지 않는 유니크(unique)한 파일명을 반환하는 함수
홈지기
2013-07-04 8458
중복되지 않는 파일명을 반환하는 함수 예를 들어 DirectoryPath에 "abc.pdf" 가 이미 있을때, strFileName 파라메터로 동일한 "abc.pdf" 를 호출하면, abc(1).pdf 를 반환 Function GetUniqueName(byRef strFileName, DirectoryPath) Dim strName, strExt ' ...  
19 시간비교
홈지기
2013-07-04 7187
FirstDate = "2004-04-12 오전 12:00:00" MyDate = Now Result = DateDiff("h", FirstDate, MyDate) ' 113은 원하는 시점와 현재시점을 시간으로 환산한 수치다 If Result > 113 or Result < 0 Then ' 이부분에 시간사이의 실행할 부분을 넣는다. End If  
18 C# DLL을 ASP에서 사용하기 (2번째 예)
홈지기
2013-07-04 8886
Thumbnail 컴포넌트 예제)먼저 .NET Framework 이 있어야겠죠 다음은 dll 로 만들 C# 소스입니다 //CSWebUtil.cs using System; using System.Drawing; using System.Drawing.Imaging; namespace CSWebUtil { public class Thumbnail { private Image SrcImage...  
17 ASP로 원격지 MySQL사용하기 (OLEDB)
홈지기
2013-07-04 9247
아시는 분들도 있겠지만... ^^ ODBC로는 연결이 잘되는데 OLEDB로 연결하려고 삽질 했네요 ㅡㅡ' 이렇게 간단한걸... 1.준비물 MyOLEDB3.exe (http://www.mysql.com/downloads/download.php?file=Downloads/Win32/MyOLEDB3.exe&pick=mirror) 또는 첨부파일...  
16 ASP에서 PHP의 timestamp 값을 구하기
홈지기
2013-07-04 8046
많은 분들이 ASP에서 PHP의 timestamp 값을 구하는 방법을 물어보시던데요. ASP에서 PHP의 time(); 으로 구해지는 값, 즉, timestamp 값을 구하는 방법은 간단합니다. DateDiff 라는 함수를 사용하면 되죠 이함수는 두 날짜 데이터 사이의 gap을 구해주는 함수...  
15 이번달의 마지막 날짜 구하기
홈지기
2013-07-04 8287
objDate=Date 이번달의 마지막 날짜=DateDiff("d",objDate,DateAdd("m",1,objDate)) objDate=Date objDate=DateAdd("m",1,objDate) 다음달의 마지막 날짜=DateDiff("d",objDate,DateAdd("m",1,objDate))  
14 [ASP] 글 내용에 하이퍼링크 자동으로 걸리게 처리
홈지기
2013-07-04 7739
'하이퍼링크 자동으로 걸리게 만들기 Function ereg_replace(ptrn, replStr, strng) Dim regEx Set regEx = New RegExp regEx.Pattern = ptrn regEx.IgnoreCase = True regEx.Global = True ereg_replace = regEx.Replace(strng, replStr) End Function conten...  
13 ASP에서 C# dll 사용 예)
홈지기
2013-07-04 8236
//컴파일 위치 이동 cd \kci\wwwroot\kci\bin //컴파일 C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\csc /t:library /out:kci_libs.dll /debug+ /optimize+ kci_libs.cs //서버에 등록 C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\regasm kci_libs.dll /...  
12 ASP에서 다중 체크박스 값 넘기기
홈지기
2013-07-04 10400
'a.asp 넘길때,, for i = 0 to MAX <input type="checkbox" name="allow" value="시퀀스값"> next ' b.asp 받을때,, 체크한 시퀀스 값만 받아온다. for i = 1 to Request("allow").count Response.Write Request("allow")(i) next 주의) 이것은 선택한 값만 ...  
11 ASP 이미지 사이즈 구하기
홈지기
2013-07-04 8320
Sub GetImageSize(ByVal f, ByRef x, ByRef y) Dim p Set p = LoadPicture(f) x = CLng(CDbl(p.Width) * 24 / 635) ' CLng 의 라운드 오프의 기능을 이용하고 있다. y = CLng(CDbl(p.Height) * 24 / 635) ' CLng 의 라운드 오프의 기능을 이용하고 있다. Set ...  
10 [ASP] 다운로드 페이지
홈지기
2013-07-04 7682
download.asp '파일을 하나 만들어보겠습니다. <% file = Request.Form ("file") '파일 이름 Response.ContentType = "application/unknown" 'ContentType 를 선언합니다. Response.AddHeader "Content-Disposition","attachment; filename=" & file '헤...