小编the*_*i11的帖子

编写Excel VBA以从Access接收数据

我正在编写一个excel应用程序,它从Access数据库中提取工作.当用户打开Excel工具时,数据表需要从我创建的Access数据库中填充其中一个工作表.我一直在excel中编写VBA代码,我收到运行时错误:"429"ActiveX组件无法创建对象.

其他问题都是从Access编写的,但我相信我需要从Excel工作簿文件中编写此代码.我编写的代码在Workbook_Open()函数中,以便在用户打开文件时收集数据.非常感谢你的帮助.顺便说一句,我正在使用Access 2007和Excel 2010.

Private Sub Workbook_Open()
    'Will fill the first listbox with data from the Access database
    Dim DBFullName As String
    Dim TableName As String
    Dim FieldName As String
    Dim TargetRande As String

    DBFullName = "D:\Tool_Database\Tool_Database.mdb"

    Dim db As DAO.Database, rs As Recordset
    Dim intColIndex As Integer

    Set TargetRange = Range("A1")
    Set db = OpenDatabase(DBFullName)
    Set rs = db.OpenRecordset("SELECT * FROM ToolNames WHERE Item = 'Tool'", dbReadOnly)

    ' Write the field names
    For intColIndex = 0 To …
Run Code Online (Sandbox Code Playgroud)

excel ms-access vba excel-vba

10
推荐指数
1
解决办法
6万
查看次数

基于VBA中的模板创建新的Excel文件

我正在Excel中构建一个应用程序,使用户可以从已构建的现有基于Excel的工具列表中进行选择.他们将选择特定工具并点击"创建新"按钮.单击此按钮后,将要求用户命名该文件.输入名称后,需要创建一个新工作簿并将其放在该特定工具的项目文件夹中.我在代码中实现此功能时遇到问题.我已经能够找到实现从活动工作簿复制模板的代码示例,但没有用于完全创建另一个excel文件中的内容.

我相信我需要复制用户需要重新创建的工作簿,然后更改名称并将文件放在所需的位置.

我会发布一些代码来展示我到目前为止所做的工作,但我还没有真正取得进展.

谢谢,

excel vba

7
推荐指数
1
解决办法
3万
查看次数

将iOS应用程序连接到wifly模块

我有一个处于AdHoc模式的Wifly模块(即它创建了自己的本地wifi网络),我想在我的iOS应用程序中编程连接到Wifly并来回发送数据.

当从计算机与Wifly通信时,您必须通过终端仿真器发送命令.有谁知道如何从iOS应用程序这样做?

谢谢

serial-port objective-c wifi ios

7
推荐指数
1
解决办法
1638
查看次数

IBAction没有被调用

我正在为iPad构建一个带界面构建器的应用程序.滚动视图占据屏幕的大部分,除了底部的一小部分.滚动向下启用.在底部的小部分(不在scrollview内),有一个连接到IBAction的UIButton:

- (IBAction)submit:(id)sender; 
Run Code Online (Sandbox Code Playgroud)

并实施如下:

- (IBAction)submit:(id)sender
{
    NSLog(@"submit called");
}
Run Code Online (Sandbox Code Playgroud)

我已经无数次地将IBActions连接到IB中的按钮并且从未遇到过问题......但由于某种原因,这并没有被调用.我通过选择按钮 - >连接检查器 - >在里面修改 - >文件所有者 - >提交来连接它...有人有这个问题吗?

iphone ipad ibaction ios

7
推荐指数
1
解决办法
8769
查看次数

将JSON数组解析为对象?

我正在尝试用Python解析一些数据我有一些JSON:

{
    "data sources": [
        "http://www.gcmap.com/"
    ],
    "metros": [
        {
            "code": "SCL",
            "continent": "South America",
            "coordinates": {
                "S": 33,
                "W": 71
            },
            "country": "CL",
            "name": "Santiago",
            "population": 6000000,
            "region": 1,
            "timezone": -4
        },
        {
            "code": "LIM",
            "continent": "South America",
            "coordinates": {
                "S": 12,
                "W": 77
            },
            "country": "PE",
            "name": "Lima",
            "population": 9050000,
            "region": 1,
            "timezone": -5
        }
    ]
}
Run Code Online (Sandbox Code Playgroud)

如果我想将"metros"数组解析为Python类Metro对象的数组,我将如何设置该类?

我刚在想:

class Metro(object):
    def __init__(self):
        self.code = 0
        self.name = ""
        self.country = ""
        self.continent = ""
        self.timezone …
Run Code Online (Sandbox Code Playgroud)

python json

7
推荐指数
3
解决办法
4万
查看次数

从iOS应用程序发送帖子到PHP脚本不工作...简单的解决方案就像

我之前已经做了好几次了但是由于某些原因我无法通过这个帖子...我尝试了设置为_POST且没有的变量的php脚本......当它们未设置为发布时它工作精细.这是我的iOS代码:

NSDate *workingTill = timePicker.date;
NSDateFormatter *formatter = [[NSDateFormatter alloc] init];
[formatter setDateFormat:@"HH:mm"];
NSString *time = [formatter stringFromDate:workingTill];

NSString *post = [NSString stringWithFormat:@"shift=%@&username=%@", time, usernameString];

NSData *postData = [post dataUsingEncoding:NSUTF8StringEncoding allowLossyConversion:NO];
NSString *postLength = [NSString stringWithFormat:@"%d", [post length]];

NSURL *url = [NSURL URLWithString:@"http://wowow.php"];
NSMutableURLRequest *request = [NSMutableURLRequest requestWithURL:url cachePolicy:NSURLRequestUseProtocolCachePolicy timeoutInterval:60.0];
[request setHTTPMethod:@"POST"];
NSLog(@"%@", post);
[request setValue:postLength forHTTPHeaderField:@"Content-Length"];
[request setHTTPBody:postData];

[NSURLConnection connectionWithRequest:request delegate:nil];

[self.navigationController popToRootViewControllerAnimated:YES];
Run Code Online (Sandbox Code Playgroud)

这里是php的一大块,POST变量不在正确的位置?

<?php
function objectsIntoArray($arrObjData, $arrSkipIndices = array())
{
    $arrData = array();

    // if input is object, …
Run Code Online (Sandbox Code Playgroud)

php iphone http ios

6
推荐指数
1
解决办法
7757
查看次数

使用grunt,bower,节点模块部署到heroku

我正在为heroku部署一个卑鄙的应用程序,并且正在使用bower和grunt.我应该在git repo中包含我的节点模块吗?如果没有,我真的不确定我需要如何部署,因为post脚本引用了节点模块的bower安装.我应该在git repo中包含我的bower_components吗?这似乎不是我应该因为不是后记的全部内容执行bower安装在heroku上?但是当我这样做时,我得到一个错误.这是我的凉亭依赖:

"dependencies": {
    "angular": "1.2.x",
    "angular-mocks": "~1.2.x",
    "jquery": "1.10.2",
    "bootstrap": "~3.1.1",
    "angular-bootstrap" : "0.11.0"
  }
Run Code Online (Sandbox Code Playgroud)

还有我的package.json

{
  "main": "server.js",
  "engines": {
    "node": "0.10.29"
  },
  "dependencies": {
    "express": "~3.4.x",
    "mongoose": "~3.6.x",
    "mongodb": "^1.4.0",
    "ejs": "*",
    "email-templates" : "1.0.0",
    "crypto": "0.0.3",
    "lodash": "~2.4.1",
    "aws-sdk": "2.0.0-rc11",
    "passport" : "~0.1.17",
    "passport-local" : "~0.1.6",
    "connect-flash" : "~0.1.1",
    "winston": "0.6.x",
    "gm"    : "1.16.0",
    "apn" : "1.5.2",
    "bcrypt-nodejs" : "latest",
    "angular-wizard": "latest",
    "point-in-polygon": "latest",
    "node-mailgun": "0.0.2",
    "nodemailer"  : "0.7.0",
    "passport-facebook" : "1.0.3"
  },
  "devDependencies": { …
Run Code Online (Sandbox Code Playgroud)

git heroku node.js

6
推荐指数
1
解决办法
2619
查看次数

猫鼬有条件地填充子文档

我有一个如下所示的架构:

var UserSchema = new Schema({
  name              : { type: String, required: true },
  email             : { type: String, lowercase: true },
  fences            : [{type: Schema.Types.ObjectId, ref: 'Group'}]
});

var GroupMemberSchema = new Schema({ 
    user  : { type: Schema.Types.ObjectId, ref: 'User', required: true },
  status  : { type: String, default : 'Invited' }
});

var GroupSchema = new Schema({
  name          : String,
  members       : [GroupMemberSchema],
  type          : String
});
Run Code Online (Sandbox Code Playgroud)

组和用户将导出为其自己的集合。我有一个端点 api/users/me,我想在其中获取我的用户和所有组。在组内,我想填充我的成员的用户。我用这段代码可以正常工作:

User.findOne({
      _id: userId
    })
    .populate('groups')
    .exec(function(err, user) { 
      if …
Run Code Online (Sandbox Code Playgroud)

mongoose mongodb node.js

6
推荐指数
1
解决办法
7656
查看次数

将mamp端口设置为80和3306

我有apache和mySQL运行默认的MAMP端口(分别是8888和8889),一切似乎都有效,但是当我将端口切换到80为Apache和3306为mySQL时,mySQL服务器无法重启.

我正在尝试将MAMP设置为在这些端口上运行,因为显然这对于​​在Dreamweaver中进行开发是最佳的...因此,鉴于我希望为Dreamweaver提供理想的开发环境,是否有办法使用3306端口?或者,潜在的问题是什么?

谢谢

mysql apache mamp dreamweaver

5
推荐指数
2
解决办法
3万
查看次数

iOS应用仅在首次使用该应用时发送提醒视图

我想在用户第一次打开应用程序时显示警报视图.在他们打开应用程序后,他们点击按钮,该按钮推动导航控制器堆栈上的表格视图.如果这是第一次打开表视图,则应该有一个警报视图,显示告诉用户他们可以单击要编辑的单元格.

我怎样才能做到这一点?

谢谢

iphone uialertview ios

4
推荐指数
1
解决办法
1336
查看次数

在excel中复制和重命名未打开的工作簿

我试图复制位于一个文件路径的整个未打开的工作簿,重命名并将其保存到新目录...我有重命名和保存的问题,这是我的代码到目前为止:

Private Sub new_file_Click()
Dim ActBook As Workbook, NewFile As String
Dim ToolFilePath As String, DestFilePath As String, NewToolName As String
NewToolName = InputBox("Enter the Tool Name.")

MsgBox (Tools_ListBox.Value)
ToolFilePath = GetToolPath(Tools_ListBox.Value)
ToolFilePath = GetPath & ToolFilePath

DestFilePath = GetPath & GetDestPath(Tools_ListBox.Value) & NewToolName & ".xlsm"

Set ActBook = Workbooks.Add(ToolFilePath)
ActBook.SaveAs DestFilePath
ActBook.Close True
Run Code Online (Sandbox Code Playgroud)

我要复制的文件位于ToolFilePath中的路径中,我想要将其重命名为的是DestFilePath,其中包含excel .xlsm扩展名.

我哪里错了?

谢谢

excel vba

2
推荐指数
1
解决办法
2万
查看次数

excel vba sql语句返回单个字符串

我正在为访问数据库编写一个sql语句,无论输入如何,都将返回一个唯一值.我正在使用此代码但是我在执行语句中遇到类型不匹配.

strSQL = "SELECT FilePath " _
    & "FROM ToolFiles " _
    & "WHERE Project_Num = '" & theSelectedProj & "'" _
    & "AND Tool_Name = '" & theSelectedProjName & "'"

filePath = cn.Execute(strSQL)
Run Code Online (Sandbox Code Playgroud)

有没有办法从sql语句返回一个字符串?

谢谢

excel ms-access vba

2
推荐指数
1
解决办法
2888
查看次数

excel vba从表单中卸载内容

我有一个用户窗体,当用户单击工作表中的按钮时打开该用户窗体.单击按钮后,如果用户输入了一些数据,然后决定关闭表单,则先前输入的数据将保留在表单中.如何(在代码中)我摆脱了那些数据,所以每次点击按钮时它都会以默认值打开?

目前我只是用

form.Show
Run Code Online (Sandbox Code Playgroud)

单击按钮时

form.Hide
Run Code Online (Sandbox Code Playgroud)

当用户点击表单中的取消按钮时.

谢谢!

excel vba excel-vba

0
推荐指数
1
解决办法
1692
查看次数