c#下ppc如何调整图片大小?
来源:百度知道 编辑:UC知道 时间:2024/06/02 20:44:02
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
'上传
Dim upimg As New UploadImg
Dim bigpath As String '上传以后的地址
bigpath = upimg.PhotoSave(Me.FileUpload1)
'缩小
Dim minimg As String
Dim shink As New ShrinkImg
minimg = shink.Shrinkimg(bigpath, 150, 150)
'保存进数据库
Dim saveimg As New PhotoQuery
saveimg.PTitle = Me.TextBox1.Text
saveimg.PWriter = Me.TextBox2.Text
saveimg.Pcontent = Me.Textbox.Text
saveimg.PKind = Me.DropDownList1.SelectedValue
saveimg.Pbig = bigpath
saveimg.Pmin = minimg
saveimg.PhotoAdd()
Response.Redirect("photolist.aspx")
End Sub