如何生成pdf文件:ASP生成PDF文件

以下使用方法和len,lt,right样

Function Strlength(Str)
    Temp_Str=Len(Str)
    For I=1 To Temp_Str
        Test_Str=(Mid(Str,I,1))
        If Asc(Test_Str)>0 Then
            Strlength=Strlength+1
        Else
            Strlength=Strlength+2
        End If
    Next
End Function
Function Strleft(Str,L)
    Temp_Str=Len(Str)
    For I=1 To Temp_Str
        Test_Str=(Mid(Str,I,1))
        Strleft=Strleft&Test_Str
        If Asc(Test_Str)>0 Then
            lens=lens+1
        Else
            lens=lens+2
        End If
            If lens>=L Then Exit For
    Next
End Function
Function Strright(Str,L)
    Temp_Str=Len(Str)
    For  i = Temp_Str to 1 step -1
        Test_Str=(Mid(Str,I,1))
        Strright=Test_Str&Strright
        If Asc(Test_Str)>0 Then
            lens=lens+1
        Else
            lens=lens+2
        End If
            If lens>=L Then Exit For
    Next
End Function

延伸阅读

• 2010-11-29-- 生成html文件,一键生成PDF文件HTML to PDF
• 2009-2-12-- java生成xml文件:vbs类生成xml文件
• 2009-2-12-- java生成xml文件:vbs类生成xml文件
• 2009-2-12-- asp生成word文档:使用ASP生成XML数据文档的方法