using Model; using System; using System.Collections.Generic; using System.Data; using System.Data.SqlClient; using System.IO; using System.Windows.Forms; namespace DataImport { public partial class Form1 : Form { public List<string> _photoFilePathLi…
CREATE PROCEDURE 存储过程名称 is cursor c_tab is select * from user_tab_columns t r_tab user_tab_columns%rowtype; v_cell ); sql_str ); data_length number; begin open c_tab; loop fetch c_tab into r_tab; exit when c_tab%notfound; v_cell:=''; data_length:,);…
Sub InsertPic() Dim myfile As FileDialog Set myfile = Application.FileDialog(msoFileDialogFilePicker) With myfile .InitialFileName = "F:\" If .Show = -1 Then For Each fn In .SelectedItems Set mypic = Selection.InlineShapes.AddPicture(FileName:=f…
感谢会飞的鱼大牛~ Public fp$, obmapp As Object Sub kk() 文件夹浏览器 Application.ScreenUpdating = False Set fso = CreateObject("scripting.filesystemobject") If fp = "" Then Exit Sub Set ff = fso.getfolder(fp) Documents.Add DocumentType:=wdNewBlankDo…