POS 2019 全新架構開發(24) Web 電子發票-01

客戶很急 , 我只能快速加工
Web APP 功能大致還是會跟 Windows APP 差不多
差異在Module及GUI操作了
整個POS結構.發票列印模組在 Windows APP 已定制,所以將GUI操作搞定,整個移植嵌入就很快能完成功能了!
底下是Web for PC . 平板 . 手機的樣版,初步已完成! 接下來就是編輯資料了...
---

MSSQL 當自動識別欄位需要Insert資料時應該怎麼辦 ?

SET IDENTITY_INSERT (Transact-SQL)
--
大量匯入資料時保留識別值 (SQL Server)
--
當自動識別欄位需要Insert資料時應該怎麼辦 ?
--

SET IDENTITY_INSERT TABLE_NAME ON; 允許填入
SET IDENTITY_INSERT TABLE_NAME OFF; 不允許填入

POS 2019 全新架構開發(24) Web 電子發票-序

今天客戶總算確定要開發 Web 版 - 開立電子發票
B2C 分2階段: 共通載具及會員載具
本要一次到位,我說這會員部分;算是第一次經驗還要含API驗證 ; 我無法保證如期完工
於是讓步,先共通載具後;再來補申請上會員載具
總算是有分段,不然真的沒把握這才短短一個月內就要完成驗收及跑文
--
windows app 就暫時歇歇 , 工作來了 ; 先處理開發 Web 這案子
未來還是會貼些展示成果功能畫面上來

visual studio 2019 ASPNET Disable SSL

在 visual studio 2015 關閉 SSL 很簡單,在visual studio 2019 卻摸不著頭序
查到這篇 How to Disable SSL on asp.net MVC5?
就是在屬性頁 Web  https 改成 http 後 , 就能將 SSL 關閉
如底下圖:

How to copy all files from one directory to another in vb.net

引用來源:How to copy all files from one directory to another in vb.net
--
Public Function CopyDirectory(ByVal SrcPath As String, ByVal DestPath As String, Optional _
ByVal bQuiet As Boolean = False) As Boolean
        If Not System.IO.Directory.Exists(SrcPath) Then
            Throw New System.IO.DirectoryNotFoundException("The directory " & SrcPath & " does not exists")
        End If
        If System.IO.Directory.Exists(DestPath) AndAlso Not bQuiet Then
            If MessageBox.Show("directory " & DestPath & " already exists." & vbCrLf & _
            "If you continue, any files with the same name will be overwritten", _
            "Continue?", MessageBoxButtons.OKCancel, MessageBoxIcon.Question, _
            MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.Cancel Then Exit Function
        End If

        'add Directory Seperator Character (\) for the string concatenation shown later
        If DestPath.Substring(DestPath.Length - 1, 1) <> System.IO.Path.DirectorySeparatorChar Then
            DestPath += System.IO.Path.DirectorySeparatorChar
        End If
        If Not System.IO.Directory.Exists(DestPath) Then System.IO.Directory.CreateDirectory(DestPath)
        Dim Files As String()
        Files = System.IO.Directory.GetFileSystemEntries(SrcPath)
        Dim element As String
        For Each element In Files
            If System.IO.Directory.Exists(element) Then
                'if the current FileSystemEntry is a directory,
                'call this function recursively
                CopyDirectory(element, DestPath & System.IO.Path.GetFileName(element), True)
            Else
                'the current FileSystemEntry is a file so just copy it
                System.IO.File.Copy(element, DestPath & System.IO.Path.GetFileName(element), True)
            End If
        Next
        Return True
    End Function

Gr POS 單機版

Gr POS 單機版 下載GrPOS安裝
---
從打造到今天,應該快滿2個月時間了
第一階段已完成 , 一般店已夠測試使用
再來將加入[促銷行為] [ 後台進銷存] [標籤列印]
---
功能如下:
★池龍工作室★  產品 : Gr POS

【週邊】
二聯式發票機型號:RP-U420,WP-520  [速率:19200]
出單機:收據格式紙寬80mm,電子發票格式紙寬57mm

【系統更新】
01.目前尚未完成系統自動更新機制,請使用手動更新方式
02.註冊店家,更新版本後可協助移轉資料;須遠端處理

【20191025】 版本:1.0.0.0
01.開放測試,未註冊;測試時間截止日期至:2020/02/28止
02.電子發票,只開放給正式店家使用(須跟國稅局提出電子發票申請)

功能完全開放:
1.[前台] 收銀所有功能
2.[後台] 1.系統設定,2.基本資料

未來功能會陸續完成並開放,請隨時關注官網動態

POS 2019 全新架構開發(23) 第一階段完成,將釋放測試版

今天趕了一下進度和資料調整
將會在近2日釋放測試版 , 試一下水溫
當然了 , 沒人用 ; 我不在意
因後面的進度還好多 , 距離我規劃的完整版 ; 還須好長時間才能完成
提早放出來,只是要讓市場開始關注
至於價位,我還在拿捏;未定價位
----
底下就每次進系統都會出現的 [系統資訊]

POS 2019 全新架構開發(23) 二聯式發票機 列印(2)

傳統發票列印,會因明細多寡來決定當次發票張數的量
這部分也是列印發票的重點及發票號碼張數計算
---
目前POS的第一階段,已完成!
這1-2天將會整理打包,會釋放試用版本出來!
基本功能:
1.收銀適用所有行業別
2.印收據 , 二聯式發票
*電子發票鎖定,只有正式店家才開放使用*
*三聯式發票機應該剩S-103而已,等有正式客戶再加進來*
*客顯.錢櫃.貼紙機.條碼機等也是一樣,都等有正式客戶再加進來*
*這些週邊都簡單,不需花多少時間!!  現寫一堆,給蚊子叮嗎 ~ *
---