0
나는 다음과 같은 코드를변환 이미지 VB.net
Public Sub ConvertImage(ByVal Filename As String, _
ByVal DesiredFormat As System.Drawing.Imaging.ImageFormat, _
ByVal NewFilename As String)
' Takes a filename and saves the file in a new format
Try
Dim imgFile As System.Drawing.Image = _
System.Drawing.Image.FromFile(Filename)
imgFile.Save(NewFilename, DesiredFormat)
Catch ex As Exception
Throw ex
End Try
End Sub
Private Sub btnPrintVC40_Click(sender As System.Object, e As System.EventArgs) Handles btnPrintVC40.Click
Dim SigName As String
Dim SigNameNew As String
SigName = "SELECT Signature FROM vw_Report_VehicleCheckFTA WHERE VCID = " & CStr(lRiskAssessID)
SigNameNew = SigName.PadLeft(SigName.Length - 4)
ConvertImage(SigName, _
System.Drawing.Imaging.ImageFormat.Jpeg, _
SigNameNew & ".jpeg")
runReport("SELECT * FROM vw_Report_VehicleCheckFTA WHERE VCID = " & CStr(lRiskAssessID), "FTAVehicleCheck2.rpt")
End Sub
이 기본적으로이 무엇을해야 다음 Crystal 보고서를 시작, JPEG로 PNG 이미지를 변환 할 수 있습니다.
난 그냥 내 인생은 왜 알아낼 수 없습니다 위해 대신 나는 다음과 같은 예외를 얻을. 그리고 그 진짜 이름이 아니다 추측
OMG)
당신은 당신의 데이터베이스에서 데이터를 얻는 방법에 살펴 보셔야합니다, 당신은 단지 그것을 얻기 위해 공중에 약간의 문자열을 던질 수 없습니다. 금요일이라고 말할 수 없습니까 ?? 감사! –
문제 없음, TGIF; D –