Ssemi Laboratory

Written by Ssemi™(semin Seol), www.Ssemi.net

귀차니즘에 빠진 Ssemi™의 Library 제 3탄 - SP_CodingMaker를 소개합니다.

제가 쓰는 에디터 프로그램은 EditPlus입니다.
그러다 보니 모두 하드코딩(Hard Coding)을 하게 되는데요

ASP작업시에 Command 개체를 통해서 Stored Procedure를 사용하는 코드를 작성할 때, Parameter 값을 입력하게 됩니다.

With oCmd

   .ActiveConnection = strConnect

   .CommandType = 4

   .CommandText = "sp_Login"

   .Parameters.Append .CreateParameter("@UserID", 200, &H0001, 16, UserID) 

   .Parameters.Append .CreateParameter("@Password", 200, &H0001, 20, Password) 

   .Parameters.Append .CreateParameter("@OutError", 3, &H0002, 0) 

   .Execute, , 128

   OutError = .Parameters("@OutError").Value

   IF isNull(OutError) OR Len(OutError) = 0 Then OutError = 0 ELSE OutError = CLng(OutError) End IF

   SET oRs = .Execute

   .Parameters.Delete "@UserID"

   .Parameters.Delete "@Password"

   .Parameters.Delete "@OutError"

End With

이부분은 거의 뭐 직접 작성하기 보단, Ctrl + C (복사하기) 와 Ctrl + V (붙이기)로 작성을 해나가는데요.
이게 나름대로 귀찮은 작업니다. 이걸 간편히 하고자 부분 수정만 하면 편하게 사용할 수 있게 하나 만들어 놓았었습니다.
나름대로 지저분하게 만들어 놓았던 것을 약간 스타일링(!) 하고, 코드 좀 수정(!)해서 배포합니다.


Store Procedure Coding Maker

귀차니즘의 ASPer에게 이것이 아주 도움이 되기를 희망하면서..... ^_^

▶ 다운로드(Download)

▶ 사용법

파일을 열어보시면 아래와 같은 부분이 있습니다. 해당 정보를 입력해주세요.

'-----------------------------------------------------------

'    // 디비 연결 

'-----------------------------------------------------------

Dim DBSrv, DBName, DBID, DBPW

DBSrv = ""

DBName = ""

DBID = ""

DBPW = ""

'-----------------------------------------------------------

'    // 객체 이름 지정

'-----------------------------------------------------------

Dim RecordSetObjectName, CommandObjectName

RecordSetObjectName = "oRs"

CommandObjectName = "oCmd"

'-----------------------------------------------------------

후에 ASP를 실행하시면 아래와 같은 결과창이 뜨게 됩니다.
제일 아래는 DBHelper Class를 사용하는 사용자(?)를 위해 특별히(..) - 저도 요즘 써보고 있거든요;;;;

▶ 주의사항

@RETURN_VALUE를 안쓴다는 가정하에 진행된 스크립트 파일입니다.
파일안에서 @RETURN_VALUE에 대한 내용을 아예 삭제시켰거든요 ^_^;
MSSQL2000에서는 @RETURN_VALUE가 제대로 안먹어서 @변수 하나 만들어서 OUTPUT으로 빼서 사용하는편이 훨씬 좋아서요!

데이터타입을 Decimal 혹은 Numeric 값을 쓸 경우 Precision 과 NumericScale 을 정의해야 하는데,
이 부분을 제가 사용한 적이 없어서 코드에 넣어두지 않았습니다.

앞으로 업데이트 할 예정이니 ^_^ 일단은 사용해주시기 바랍니다.

Stored Procedure(저장 프로시져) 코딩을 쉽게 하자를 하다가 알아버린(!) 내용입니다.

* 저장 프로시져 파라미터 매칭값

Constant	Value	Description
AdArray (Does not apply to ADOX.)	0x2000	A flag value, always combined with another data type constant, that indicates an array of that other data type.
adBigInt	20	Indicates an eight-byte signed integer (DBTYPE_I8).
adBinary	128	Indicates a binary value (DBTYPE_BYTES).
adBoolean	11	Indicates a boolean value (DBTYPE_BOOL).
adBSTR	8	Indicates a null-terminated character string (Unicode) (DBTYPE_BSTR).
adChapter	136	Indicates a four-byte chapter value that identifies rows in a child rowset (DBTYPE_HCHAPTER).
adChar	129	Indicates a string value (DBTYPE_STR).
adCurrency	6	Indicates a currency value (DBTYPE_CY). Currency is a fixed-point number with four digits to the right of the decimal point. It is stored in an eight-byte signed integer scaled by 10,000.
adDate	7	Indicates a date value (DBTYPE_DATE). A date is stored as a double, the whole part of which is the number of days since December 30, 1899, and the fractional part of which is the fraction of a day.
adDBDate	133	Indicates a date value (yyyymmdd) (DBTYPE_DBDATE).
adDBTime	134	Indicates a time value (hhmmss) (DBTYPE_DBTIME).
adDBTimeStamp	135	Indicates a date/time stamp (yyyymmddhhmmss plus a fraction in billionths) (DBTYPE_DBTIMESTAMP).
adDecimal	14	Indicates an exact numeric value with a fixed precision and scale (DBTYPE_DECIMAL).
adDouble	5	Indicates a double-precision floating-point value (DBTYPE_R8).
adEmpty	0	Specifies no value (DBTYPE_EMPTY).
adError	10	Indicates a 32-bit error code (DBTYPE_ERROR).
adFileTime	64	Indicates a 64-bit value representing the number of 100-nanosecond intervals since January 1, 1601 (DBTYPE_FILETIME).
adGUID	72	Indicates a globally unique identifier (GUID) (DBTYPE_GUID).
adIDispatch	9	Indicates a pointer to an IDispatch interface on a COM object (DBTYPE_IDISPATCH). Note   This data type is currently not supported by ADO. Usage may cause unpredictable results.
adInteger	3	Indicates a four-byte signed integer (DBTYPE_I4).
adIUnknown	13	Indicates a pointer to an IUnknown interface on a COM object (DBTYPE_IUNKNOWN). Note   This data type is currently not supported by ADO. Usage may cause unpredictable results.
adLongVarBinary	205	Indicates a long binary value (Parameter object only).
adLongVarChar	201	Indicates a long string value (Parameter object only).
adLongVarWChar	203	Indicates a long null-terminated Unicode string value (Parameter object only).
adNumeric	131	Indicates an exact numeric value with a fixed precision and scale (DBTYPE_NUMERIC).
adPropVariant	138	Indicates an Automation PROPVARIANT (DBTYPE_PROP_VARIANT).
adSingle	4	Indicates a single-precision floating-point value (DBTYPE_R4).
adSmallInt	2	Indicates a two-byte signed integer (DBTYPE_I2).
adTinyInt	16	Indicates a one-byte signed integer (DBTYPE_I1).
adUnsignedBigInt	21	Indicates an eight-byte unsigned integer (DBTYPE_UI8).
adUnsignedInt	19	Indicates a four-byte unsigned integer (DBTYPE_UI4).
adUnsignedSmallInt	18	Indicates a two-byte unsigned integer (DBTYPE_UI2).
adUnsignedTinyInt	17	Indicates a one-byte unsigned integer (DBTYPE_UI1).
adUserDefined	132	Indicates a user-defined variable (DBTYPE_UDT).
adVarBinary	204	Indicates a binary value (Parameter object only).
adVarChar	200	Indicates a string value (Parameter object only).
adVariant	12	Indicates an Automation Variant (DBTYPE_VARIANT). Note   This data type is currently not supported by ADO. Usage may cause unpredictable results.
adVarNumeric	139	Indicates a numeric value (Parameter object only).
adVarWChar	202	Indicates a null-terminated Unicode character string.
adWChar	130	Indicates a null-terminated Unicode character string (DBTYPE_WSTR).

* SQL자료형과 ADO파라미터개체의 Type속성매칭  

SQL Server Data Type	ADO Data Type
bigint	adBigInt
binary	adBinary
bit	adBoolean
char	adChar
datetime	adDBTimeStamp
decimal	adNumeric
float	adDouble
image	adVarbinary
int	adInteger
money	adCurrency
nchar	adWChar
ntext	adLongVarWChar
numeric	adNumeric
nvarchar	adVarWChar
real	adSingle
smalldatetime	adTimeStamp
smallint	adSmallInt
smallmoney	adCurrency
sql_variant	adVariant
sysname	adWChar
text	adLongVarChar
timestamp	adBinary
tinyint	adVarbinary
uniqueidentifier	adGUID
varbinary	adVarbinary
varchar	adVarChar

* 출처와 다르게 부분 스스로 수정한 곳

※ 출처 - SQLER

• 저장 프로시져 파라미터 매칭값
• SQL자료형과 ADO파라미터개체의 Type속성매칭