有初始文件名使用GetSaveFileName的问题 GetSaveFileName问题
QT QFileDialog::getSaveFileName\u5982\u4f55\u628a\u6587\u4ef6\u9ed8\u8ba4\u4fdd\u5b58\u8def\u5f84\u8bbe\u4e3a\u684c\u9762\uff1bvoid QFileDialog::getSaveFileName( const QString & filter = QString() ),\u53ea\u9700\u8981\u5728\u8bbe\u7f6e\u9ed8\u8ba4\u4fdd\u5b58\u540d\u7684\u65f6\u5019\u5728\u540d\u5b57\u524d\u6dfb\u52a0\u8def\u5f84\u5c31\u884c\u4e86.
\u76f4\u63a5\u4f7f\u7528ofn.lpstrFileTitle \u548c ofn.nMaxFileTitle \u5373\u53ef\u3002
\u53e6\u5916\uff0c\u4f7f\u7528ofn.lpstrFile\u65e0\u6cd5\u89e3\u6790\u51fa\u6587\u4ef6\u540d\u662f\u4e0d\u53ef\u80fd\u7684\uff0c\u53ef\u4ee5\u8bd5\u8bd5\u4e0b\u9762\u7684\u529e\u6cd5\uff1a
1.\u8bf7\u786e\u8ba4opf.lpstrFile = "c:\\tmp\\test.txt", \u4e5f\u5c31\u662f\u8bf4\u53bb\u6389\u8f6c\u4e49\u7b26\u540e\u7684c:\tmp\test.txt
2.*p=='\\\\'\uff0c\u8fd9\u4e2a\u5f88\u5947\u602a\uff0c\u8fd9\u4e48\u591a\\u4e00\u822c\u4e0d\u662f\u5b57\u7b26\u4e32\u4e86\u5417\uff1f\u5982\u679c\u786e\u8ba41\u540e\u8fd8\u65e0\u6cd5\u89e3\u51b3\uff0c\u90a3\u4e48\u4ec5\u4fee\u6539.*p=='\\\\'\u5e94\u8be5\u5c31\u53ef\u4ee5\u67e5\u5230\u3002
\u5efa\u8bae\u8d34\u51fa\u4f60\u7684\u4ee3\u7801\u8ba9\u5927\u5bb6\u5e2e\u4f60\u770b
1. .lpstrFile = "123"改为 .lpstrFile = "123" & String(255 - 3, vbNullChar)
其中，255固定不变，3是“123”长度，也就是说，保持.lpstrFile长度为255
2. .nMaxFile = 512 改为 .nMaxFile = Len(.lpstrFile)
这一处可改可不改，建议改，因为这样才能让理论长度与实际长度对应，节省内存。
这样改过之后，就没有问题了。
定义一个字符串变量。让这个变量等于 “123”，长度是 512
用指针让 lpstrFile 指向这个变量。
绛旓細`GetOpenFileName`鍜宍GetSaveFileName`鍑芥暟鐨勯敊璇唬鐮佸寘鎷紦鍐插尯澶皬銆鏂囦欢鍚鏃犳晥鍜屽唴瀛樺垎閰嶄笉瓒崇瓑銆俙FindText`鍜宍ReplaceText`鍑芥暟鍙兘鍑虹幇鐨勯敊璇寘鎷紦鍐插尯鏃犳晥銆俉indows CE鏀寔棰濆鐨勯敊璇唬鐮侊紝濡俙CDERR_REGISTRYFAILURE`锛岃〃绀烘棤娉曡鍙栨敞鍐岃〃銆俙PrintDlg`鍑芥暟鐗规湁鐨勯敊璇唬鐮佸寘鎷細娌℃湁娉ㄥ唽鐨勭鍙ｆ垨鎵撳嵃鏈...
绛旓細'杩囪檻瀵硅瘽妗嗘枃浠剁被鍨 kuang.lpstrFilter = "鏂囨湰鏂囦欢 (*.TXT)" + Chr$(0) + "*.TXT" + Chr$(0) + "鎵鏈夋枃浠 (*.*)" + Chr$(0) + "*.*" + Chr$(0)'瀵硅瘽妗嗘爣棰樻爮鏂囧瓧 kuang.lpstrTitle = "淇濆瓨鏂囦欢鐨勮矾寰勫強鏂囦欢鍚..."i = GetSaveFileName(kuang) '鏄剧ず淇濆瓨鏂囦欢瀵硅瘽妗 If ...
绛旓細鍙鍚圠Z鎵闇
绛旓細111
绛旓細淇濆瓨鏃惰缃笅鏂囦欢缂栫爜
绛旓細鍒濆鍖栨槸棣栬姝ラ锛坕nitialize锛夈備笂浼犳枃浠剁殑鏂规硶鍖呮嫭upload銆save锛堟敮鎸佺墿鐞嗚矾寰勩佽櫄鎷熻矾寰勬垨鑷姩閫夋嫨锛夈getSize銆乬etFiles鑾峰彇鏂囦欢闆嗗悎銆乬etRequest鑾峰彇Request瀵硅薄浠ュ強璁剧疆鏂囦欢绫诲瀷闄愬埗绛夈備笅杞芥枃浠剁殑甯哥敤鏂规硶鏈塻etContentDisposition璁剧疆MIME澶淬乨ownloadFile鐢ㄤ簬涓嬭浇鎸囧畾鏂囦欢锛屾敮鎸佹洿鏀瑰唴瀹圭被鍨嬪拰鍙﹀瓨鏂囦欢鍚銆
绛旓細EXCELvba(1)璇诲彇鎸囧畾鏂囦欢澶逛笅鎵鏈夋枃浠跺す鐨勫悕瀛,骞跺偍瀛樺湪鎸囧畾鐨別xcel琛ㄦ牸涓(2)鏍规嵁鍌ㄥ瓨鍦╡xcel琛ㄦ牸涓殑鏂囦欢澶瑰悕瀛椤哄簭,鎵撳紑姣忎釜鏂囦欢澶,鐒跺悗鍐嶅叧闂鏂囦欢...Public Declare Function GetSaveFileName Lib "comdlg32" _ Alias "GetSaveFileNameA" _ (pOpenfilename As OPENFILENAME) As Long Public Declare Funct...
绛旓細鍥句功鐨勪俊鎭寘鎷浘涔︾紪鍙,鍚嶇О,鍑虹増绀,浠锋牸銆傝鍋氭垚鏂囦欢(鑳界洿鎺ョ敤vb鎵撳紑鐨勯偅绉)鍙戦佸埌[email protected] 璋㈣阿 灞曞紑 鎴戞潵绛 1涓洖绛 #鐑# 缃戞枃...needSave = False End If End If Dim fileName As String = GetOpenFile() If fileName <> "" Then currentFileName = fileName OpenFile() End...
绛旓細鎸囧悜鍖呭惈鍒濆鍖鏂囦欢鍚缂栬緫鎺т欢浣跨敤鐨勬枃浠跺悕鐨勭紦鍐层傚鏋滀笉闇瑕佸垵濮嬪,杩欎釜缂撳啿鐨勭涓涓瓧绗﹀繀椤绘槸NULL銆傚綋GetOpenFileName鎴GetSaveFileName鍑芥暟杩斿洖鎴愬姛鏃,杩欎釜缂撳啿鍖呭惈椹卞姩鍣,璺緞,鏂囦欢鍚,鍙婃墍閫夋嫨鐨勬枃浠剁殑鎵╁睍鍚嶃 濡傛灉OFN_ALLOWMULTISELECT鏍囪琚缃苟涓旂敤鎴烽夋嫨浜嗗涓枃浠,缂撳啿鍖呭惈浜嗗綋鍓嶇洰褰曚笅琚夋嫨鏂囦欢鐨勬枃浠跺悕...
绛旓細VB6.0鍙浣跨敤CommonDialog 鎺т欢瀹炵幇閫夋嫨璺緞銆佹墦寮璺緞銆傞氳繃浣跨敤 CommonDialog 鎺т欢鐨 ShowOpen 鍜 ShowSave 鏂规硶鍙樉绀衡滄墦寮鈥濆拰鈥滃彟瀛樹负鈥濆璇濇銆備袱涓璇濇鍧囧彲鐢ㄤ互鎸囧畾椹卞姩鍣紝鐩綍锛屾枃浠舵墿灞曞悕鍜鏂囦欢鍚銆傞櫎瀵硅瘽鐨勬爣棰樹笉鍚屽锛屽彟瀛樹负瀵硅瘽澶栬涓婁笌鎵撳紑瀵硅瘽鐩镐技 浠ｇ爜瀹炰緥锛歅rivate Sub Command1_Click...
