AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

jj

Browse Source
This commit is contained in:
Jonathan Jenne
2019-01-22 12:01:02 +01:00
parent 79ca2e4a46
commit 468faa37ea
12 changed files with 400 additions and 142 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
EDMI_FILE_OPs/FileOp.vb
View File

@@ -53,7 +53,7 @@ Public Class FileOp
Dim oFileGUID = Await New_EDMIFile_CreateContainer(oFILENAME)
Dim oFileRecordID = Nothing
If Not IsNothing(oFileGUID) Then
Dim oSQL = $"SELECT FNEDMI_SET_RECORD(""TBEDMI_ADRESSE"",""{oUserName}"",FALSE,NULL,'','{oFileGUID}') FROM rdb$database;"
Dim oSQL = $"SELECT FNEDMI_SET_RECORD(""TBEDMI_ADRESSE"",""{oUserName}"",FALSE,NULL,"""",'{oFileGUID}') FROM rdb$database;"
oFileRecordID = Await New_EDMIFile_CreateDB_Record(oSQL)
End If
Return oFileRecordID