INTOUCH自帶的就有,打印屏幕的命令
成都創(chuàng)新互聯(lián)網(wǎng)站建設服務商,為中小企業(yè)提供網(wǎng)站設計、做網(wǎng)站服務,網(wǎng)站設計,網(wǎng)站改版維護等一站式綜合服務型公司,專業(yè)打造企業(yè)形象網(wǎng)站,讓您在眾多競爭對手中脫穎而出成都創(chuàng)新互聯(lián)。
自己寫個時間條件運行那命令就可以了
PRINTSCREEN這個命令 具體怎么用 看下幫助
希望我的回答對你有所幫助
如有其他問題,可以繼續(xù)追問,您的采納是我前進的動力!
方法是:先獲取網(wǎng)頁代碼放在諸如richbox里面,在用這個控件的save方法存為格式為mht的網(wǎng)頁
提供兩個思路
用printscreen,將其保存到文件,再調用outlook發(fā)出去,但是您說的超出一屏,就麻煩了;
以下代碼保存為文件,引用自MSDN,由于我的SD版本不支持我的outlook,所以暫時無法給發(fā)送郵件的例子,請參考吧!
system.Windows.Forms.SendKeys.Send("%{PRTSC}")
? ? ? ?If Not System.Windows.Forms.Clipboard.GetDataObject() Is Nothing Then
? ? ? Dim oDataObj As IDataObject = System.Windows.Forms.Clipboard.GetDataObject()
? ? ? If oDataObj.GetDataPresent(System.Windows.Forms.DataFormats.Bitmap) Then
? ? ? ? ? Dim oImgObj As System.Drawing.Image = oDataObj.GetData(DataFormats.Bitmap, True)
? ? ? ? ? 'To Save as Bitmap
? ? ? ? ? oImgObj.Save("F:\Test.bmp", System.Drawing.Imaging.ImageFormat.Bmp)
? ? ? ? ? 'To Save as Jpeg
? ? ? ? ? oImgObj.Save("D:\Test.jpeg", System.Drawing.Imaging.ImageFormat.Jpeg)
? ? ? ? ? 'To Save as Gif
? ? ? ? ? oImgObj.Save("d:\Test.gif", System.Drawing.Imaging.ImageFormat.Gif)
? ? ? End If
? End If
2.另外出出報表,再調用outlook發(fā)出去,只給出數(shù)據(jù)性報表,而不一定是窗體本身;