티스토리 뷰
Function strintCut( text )
strintCut = 0
If VarType( text ) <> 8 Then Exit Function
If Len( text ) < 1 Then Exit Function
With (CreateObject("ADODB.Stream"))
.Type = 2
.Charset = "utf-8"
.Open
.WriteText text
.Flush
strintCut = .Size - 3
.Close
End With
End Function
'serverSide > ASP' 카테고리의 다른 글
[ASP] (img src)이미지경로 추출 (0) | 2020.03.18 |
---|---|
[ASP]DEXT Upload Error '80004005' (0) | 2019.12.20 |
ASP에서 프로시저 사용 시 다국어 처리 (0) | 2019.04.24 |
[ASP] 1차 도메인 추출 (0) | 2019.04.22 |
카카오톡 API 로그인 로그인창 띄우기 (0) | 2019.04.04 |
댓글