ACCESS是不是不支持中文字符啊?我把excel中文导入access临时表.在从临时表中把中文插入access link的SQL表.中文就乱码了
access好像不支持N''
代码如下:
Set rs = CodeDb.OpenRecordset("SELECT temp_po.*, temp_po_guid.poi_guid, VEN.VEN_FOB, temp_po_guid.pom_guid, VEN.VEN_DefaultPurOrderAddress, VendorPurOrderAddress.VENPO_Contact, VEN.VEN_APTermsDesc, Item.IMA_UnitMeasure, Item.IMA_ItemName, Item.IMA_ItemID, Item.IMA_POInspFlag, Item.IMA_RecordID, Item.IMA_PurConvUnitMeasure, VEN.VEN_RecordID, VEN.VEN_Comments, VBA.VBA_PayName, VBA.VBA_PayAddress, VBA.VBA_PayCity, VBA.VBA_PayState, VBA.VBA_PayPostalCode, VBA.VBA_PayCountry, VBA.VBA_PayPhone, VBA.VBA_PayPhoneExt, VBA.VBA_PayFax, VBA.VBA_PayFaxExt, VBA.VBA_Counter,imv.IMV_MfgItemID,imv.IMV_POConvUnitMeasure, imv.IMV_POConvFactor, VEN.VEN_POName" & _
" FROM (((((temp_po_guid INNER JOIN temp_po ON (temp_po_guid.line = temp_po.line) AND (temp_po_guid.poid = temp_po.poid)) INNER JOIN Item ON temp_po.itemid = Item.IMA_ItemID) INNER JOIN VEN ON temp_po.venderid = VEN.VEN_VendorID) INNER JOIN VBA ON temp_po.venderid = VBA.VBA_VendorID) INNER JOIN VendorPurOrderAddress ON VEN.VEN_DefaultPurOrderAddress = VendorPurOrderAddress.VENPO_RecordID) INNER JOIN IMV ON (VEN.VEN_VendorID = IMV.IMV_VendorID) AND (Item.IMA_ItemID = IMV.IMV_ItemID) ", dbOpenDynaset, dbSeeChanges).OpenRecordset
rs.MoveFirst
Do While Not rs.EOF
'pod
sqlpod = "insert into pod (pod_purchorderid,pod_polinenbr,pod_requireddate,pod_requiredqty,"
sqlpod = sqlpod & "pod_pounitprice,pod_shipname,"
sqlpod = sqlpod & "pod_shipaddress,pod_shipcity,pod_shipstate,pod_shippostalcode,"
sqlpod = sqlpod & "POD_CompleteFlag,POD_POChangeFlag,POD_Upgrade,POD_Final,POD_PrevReceiptQty,"
sqlpod = sqlpod & "pod_shipcountry,pod_shipmethod,pod_itemid,pod_recordid,pod_poi_recordid,pod_inspectionflag,POD_PromiseDate)values("
sqlpod = sqlpod & "'" & rs!POID & "','" & rs!LINE & "','" & rs!requiredate & "','" & rs!requiredqty & "',"
sqlpod = sqlpod & "'" & rs!reprice & "','" & shipname & "',"
sqlpod = sqlpod & "'" & shipaddress & "','" & shipcity & "','" & shipstate & "','" & shipcode & "',"
sqlpod = sqlpod & "'0','0','0','0','0',"
sqlpod = sqlpod & "'" & shipcountry & "','" & shipmod & "','" & rs!ItemID & "','" & rs!pod_guid & "','" & rs!poi_guid & "','" & IIf(rs!IMA_POInspFlag = False, "0", "1") & "','" & CDate(rs!requiredate) & "')"
poicount = CInt(IIf(Nz(Dall("DLookup", "POI_Recordid", "POI", " POI_Recordid ='" & StringFromGUID(rs!poi_guid) & "' ", cn:=mcnxADO), "0") = "0", "0", "1"))
pomcount = CInt(IIf(Nz(Dall("DLookup", "POM_Recordid", "pom", " POM_Recordid ='" & StringFromGUID(rs!pom_guid) & "' ", cn:=mcnxADO), "0") = "0", "0", "1"))