UWInfo Blog

搜尋

搜尋意見

文章分類-#Author#

[所有文章分類]

無法載入檔案或組件 'FredCK.FCKeditorV2' 或其相依性的其中之一。存在某個不正常的 API 呼叫。 (發生例外狀況於 HRESULT: 0x800300FA (STG_E_ABNORMALAPIEXIT))

More...

Bike, 2012/6/9 上午 08:26:48

CKEditor 中貼上剪貼簿(clipboard) 中的圖片

在 Chrome 中, 可以直接把圖片用 ajax 傳到 Server 上. 請參考在 Chrome 中, 直接把剪貼簿中的圖片用貼上的方式上傳到 Server 但若是要在 CKEditor 中貼上圖片, 會遇到一些問題, 主要的原因是 Past Event 綁定的方法不太一樣: 其中 ".<% = me.txtContent.ClientId %>" 要換成 textarea 的 id

$(document).ready(function () {

CKEDITOR.replace('<% = me.txtContent.ClientId %>', {

on: {

instanceReady: function (ev) {

this.dataProcessor.writer.setRules('p', {

indent: false, //縮排

breakBeforeOpen: true, // <P>之前是否換行

breakAfterOpen: true, // <P>之後是否換行

breakBeforeClose: false, // </P>之前是否換行

breakAfterClose: true // </P>之後是否換行

});

}

},

toolbar: 'basic'

});

});



$(document).ready(function () {

if (parseInt(window.navigator.appVersion.match(/Chrome\/(\d+)\./)[1]) >= 12) {

function bindPasteInCK() {

$("iframe").contents().find("body").bind('paste', imagePasteOnPaste);

}



CKEDITOR.instances.<% = me.txtContent.ClientId %>.on("instanceReady", bindPasteInCK);

}

});

參考資料: http://fogbugz.stackexchange.com/questions/8744/bugmonkey-paste-image-into-case-what-does-wiki-do-with-images

More...

Bike, 2012/6/4 下午 06:01:15

在 Chrome 中, 直接把剪貼簿(Clipboard)中的圖片用貼上的方式上傳到 Server

Client Side 的 HTML 如下: (若要在 CKEditor 中使用, 請參考: CKEditor 中貼上剪貼簿(clipboard) 中的圖片)

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">



<html xmlns="http://www.w3.org/1999/xhtml">

<head>

<title></title>

<script type="text/javascript" src="/Scripts/jquery-1.7.1.min.js"></script>



<script type="text/javascript">

$(document).ready(function () {

$(window).bind("paste", function () {

if (event.clipboardData) {

var clipboardData, found;

found = false;

clipboardData = event.clipboardData;



Array.prototype.forEach.call(clipboardData.items, function (item, i) {

if (item.type.indexOf("image") !== -1) {

var blob = clipboardData.items[i].getAsFile();

var URL = window.URL || window.webkitURL;

var source = URL.createObjectURL(blob);



pastedImage = new Image();

pastedImage.src = source;

pastedImage.onload = function () {

var canvas = document.createElement("canvas");

var ctx = canvas.getContext("2d");



canvas.width = pastedImage.width;

canvas.height = pastedImage.height;

ctx.drawImage(pastedImage, 0, 0);



var base64 = canvas.toDataURL();

base64 = base64.substring(base64.indexOf("iVBOR"));



$.ajax({

url: "/API/AddTaskImages.aspx",

async: false,

type: "POST",

data: ({

Image: base64

}),

dataType: "html",

success: function (msg) {

var oRes;

try {

oRes = eval(msg);

}

catch (err) {

alert("無法解析傳回資料 !");

alert(msg);

alert(err);

}

if (oRes.success) {

alert("Upload Success..");

//alert(oRes.msg);

$("#MyImageDataLoadDemo").attr("src", oRes.msg);

} else {

alert(oRes.msg);

}

},

error: function (xhr, ajaxOptions, thrownError) {

alert(xhr.status);

alert(thrownError);

}

})

};



return false;

}

});

}

});

});

</script>

</head>

<body>







<div id="hold">

<div id="imgHold"><img src="" id="MyImageDataLoadDemo"></div>

<div>Click on the area above and ctrl+p an image to paste</div>

</div>

</body>

</html>

Server Side 的程式碼如下:



Partial Class API_AddTaskImages

Inherits System.Web.UI.Page



Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load

'DB.sysconfig.Path.TaskAttachment



Dim Base64 As String = Me.Request("Image")

'UW.JSON.WriteErrorMessage(Base64)



'Return





Dim imageBytes As Byte() = Convert.FromBase64String(Me.Request("Image"))



Dim ms As System.IO.MemoryStream = New System.IO.MemoryStream(imageBytes, 0, imageBytes.Length)



ms.Write(imageBytes, 0, imageBytes.Length)

Dim image As System.Drawing.Image = System.Drawing.Image.FromStream(ms, True)



Dim map As Bitmap





Dim Filename As String = Now.ToString("yyyyMMddHHmmssfff") & ".png"



Try

System.IO.Directory.CreateDirectory(DB.sysconfig.Path.TaskAttachment & "UploadImages")

image.Save(DB.sysconfig.Path.TaskAttachment & "UploadImages\" & Filename, System.Drawing.Imaging.ImageFormat.Png)



UW.JSON.WriteSuccessMessage(DB.sysconfig.URL.TaskAttachment & "UploadImages/" & Filename)

Catch ex As Exception

UW.JSON.WriteErrorMessage(ex.ToString)

End Try



End Sub

End Class

More...

Bike, 2012/6/3 上午 02:33:36

Resize images using jQuery

<script type="text/javascript" src="/scripts/jquery.ae.image.resize.min.js"></script>

<script type="text/javascript">

   $(document).ready(function () {

      $("div._content img").aeImageResize({ width: 250 });

   });

</script>

<script type="text/javascript">

  $(document).ready(function () {

    $(".resizeme").aeImageResize({ width: 450 });

  });

</script>

資料來源：http://adeelejaz.com/blog/resize-images-on-fly-using-jquery/

More...

Reiko, 2012/5/14 下午 02:02:37

在列印前把列印的內容使用圖檔存備份

主要是使用 Printing.PreviewPrintController 的產生預覽圖片的功能來儲存列印內容, 再把圖片送到印表機, 以保証列印內容和儲存的圖檔是一致的. 值得一提的是, 在預覽時可以使用不同的印表機, 以便讓產生較小的圖檔, 否則有時會發生 GDI+ 的錯誤.

Sample 如下:

Imports System.Drawing.Printing

Namespace X
Partial Public Class PrintSomething
Dim PD As PrintDocument

Dim ppc As New Printing.PreviewPrintController()

Dim TotalPage As Int32 = 0

        ''' <summary>
        ''' 第幾次列印, 用來控制寫出的圖檔
        ''' </summary>
        ''' <remarks></remarks>
        Dim PrintCount As Int32 = 1

Dim PageCount As Int32 = 1

            :
            :
            :

        Sub New(ByVal oPM As DB.PackingListMain, ByVal dtDetail As DataTable, dtUsedCoupon As DataTable)
            '初始化資料
            :
            :
            :
        End Sub

Sub InitPrintDocument()
'在這裡設定 PrintDocument 的紙張, 印表機, 邊界, 橫印或直印

PD = New PrintDocument

            :
            :
            :

End Sub

Sub print()
InitPrintDocument()

PD.PrintController = ppc

            ' 第一次先把列印結果存在 Printing.PreviewPrintController 中
            AddHandler PD.PrintPage, AddressOf GeneratePreview

'再來儲存圖片
AddHandler PD.EndPrint, AddressOf SaveImage

PD.Print()
End Sub

Dim ppi() As Printing.PreviewPageInfo
Dim PrintPage As Int32 = 0

Sub SaveImage(ByVal sender As Object, ByVal ev As PrintEventArgs)

PrintDebug("Save Image Start, " & Now.ToString("yyyy-MM-dd HH:mm:ss.fff"))

            '把圖檔存起來
            Dim TF As String = Now.ToString("yyyyMMddHHmmss") ' DB.SysConfig.Path.LocalDataRoot
            Dim PathLocal As String = "C:\PrintLog\" & TF.Substring(0, 4) & "-" & TF.Substring(4, 2) & "\"
            Dim PathPackingListSheetImage As String = DB.SysConfig.PackingListSheetImage & TF.Substring(0, 4) & "-" & TF.Substring(4, 2) & "\"

System.IO.Directory.CreateDirectory(PathLocal)
System.IO.Directory.CreateDirectory(PathPackingListSheetImage)

Dim LatestImages As String = ""
ppi = ppc.GetPreviewPageInfo()

For x As Integer = 0 To ppi.Length - 1
Dim Filename As String = TF & "_" & Me.oPM.Id & "_" & x & ".png"

ppi(x).Image.Save(PathLocal & Filename, System.Drawing.Imaging.ImageFormat.Png)
Next

            '把圖檔印出來
            For x As Integer = 0 To ppi.Length - 1
  '建立新的 PrintDocument
                InitPrintDocument()

                If CST.WebConfig.Server_NAME = "測試主機" Then
                    UW.WU.DebugWriteLine("PrinterName: " & Me.PD.PrinterSettings.PrinterName)
                    UW.WU.DebugWriteLine("PaperSize: " & PD.DefaultPageSettings.PaperSize.PaperName)

                    PD.DocumentName = "PackingList"
                    PD.PrinterSettings.PrintFileName = "C:\PDF\PackingList" & Now.ToString("yyyyMMddHHmmss") & "_" & PrintPage & ".prn"
                    PD.PrinterSettings.PrintToFile = True

'PD.PrinterSettings.
End If

                '很奇怪, 這裡不會分頁, 所以要一張一張印
                AddHandler PD.PrintPage, AddressOf pd_PrintPage2
                PD.Print()

PrintPage += 1

Next
End Sub

        Private Sub pd_PrintPage2(ByVal sender As Object, ByVal ev As PrintPageEventArgs)
            '很奇怪, 這裡不會分頁, 所以要一張一張印
            ev.Graphics.DrawImage(ppi(PrintPage).Image, 0, 0)
            ev.HasMorePages = False
        End Sub

        Private Sub GeneratePreview(ByVal sender As Object, ByVal ev As PrintPageEventArgs)
            ' 列印內容
        End Sub

End Class
End Class

End Namespace

More...

Bike, 2012/5/3 下午 04:00:38

外掛 Lazy Load-延遲載入網頁圖片

資料來源：http://www.dotblogs.com.tw/demarco/archive/2010/08/03/16980.aspx

為了減輕server loading
圖片的顯示加上了JQuery外掛 Lazy Load
讓圖片延遲載入

瀏覽器拉到該可視範圍內
圖片才載入

前提必須有jquery

接著需下載
queryLoader.js
jquery.lazyload.mini.js

塞進所用呈現的檔案內

 <head>

	  <title>test</title>

	  <script type="text/javascript" src="jquery-1.2.6.pack.js"></script>

	  <link rel="stylesheet" href="queryLoader.css" type="text/css" />

	  <script type='text/javascript' src='jquery.lazyload.mini.js'></script>

	</head>

並加上

 <script type="text/javascript">

	  $("img").lazyload({ effect: "fadeIn" });

	</script>

img就是html的

<img src="/images/001.gif" />

下載Lazy Load網址：http://www.appelsiini.net/projects/lazyload

More...

Reiko, 2012/3/28 下午 02:23:40

無法載入檔案或組件 'FredCK.FCKeditorV2' 或其相依性的其中之一。 存在某個不正常的 API 呼叫。 (發生例外狀況於 HRESULT: 0x800300FA (STG_E_ABNORMALAPIEXIT))

無法載入檔案或組件 'FredCK.FCKeditorV2' 或其相依性的其中之一。存在某個不正常的 API 呼叫。 (發生例外狀況於 HRESULT: 0x800300FA (STG_E_ABNORMALAPIEXIT))